NEOMATRIX Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Данный топик предназначен только для обсуждения типовых задач на Visual Basic. Обсуждение задач на VBA (а именно, Excel, Word, Access) строго запрещено! Пишите в соответствующих топиках.   Родственные топики: Excel VBA - часть 1, часть 2 - все вопросы по Excel VBA туда Word VBA все вопросы по Word VBA туда Access все вопросы по программированию в Access туда VBScript - программирование "удобняшек" на VBScript QBasic - типовые задачи на QBasic   Date Time Functions In Visual Basic VB6's Trig, Math, Financial, Boolean, and Random functions Visual Basic 6 String Functions VB6 Number System Functions (Hex, Oct, Etc) VB6's DateAdd function   Functions (Visual Basic) Keywords and Members by Task Visual Basic Reference   Visual Basic String Manipulation Tutorials   Top 10 Visual Basic Sins   Учебники: Visual Basic для студентов и школьников. Культин Н. (2010) Занимательное программирование на Visual Basic.NET. Климов А. (2005) Visual Basic в задачах и примерах. Сафронов (2009) Visual Basic 2012 на примерах. Зиборов В. (2012) Всего записей: 202 | Зарегистр. 29-12-2004 | Отправлено: 19:30 16-11-2005 | Исправлено: XPerformer, 10:07 28-10-2014

sVIKs Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору ммм, да, неужели никто не может помочь? Всего записей: 357 | Зарегистр. 22-02-2005 | Отправлено: 23:43 28-10-2008

RER_27 Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Ребята, может кто поможет........ Препод ничего не объясняя задал задание:     Создать проект, в котором  с помощью псевдографических операторов                 построить графики функций, полученных от интегрирования системы                 дифференциальных уравнений вида:                                   dYa/dX = - A1*Ya                                   dYb/dX = A1*Ya – A2*Yb                                     dYc/dX = A2*Yb                               при:    Ya(0) = A0;     Yb(0) = 0       Yc(0) = 0               Коэффициенты   полинома задать на    форме.   Из   полученного   графика               выбрать произвольный  диапазон, в котором методом трапеций необходимо                 определить значение определенного интеграла с заштриховыванием                 интегральной области.   .... примерно видел, что создаются Text1 и Text2, Command1 .... а куда чего вводить, чтобы график этот вышел не знаю.   Всего записей: 52 | Зарегистр. 13-04-2007 | Отправлено: 20:38 01-11-2008 | Исправлено: RER_27, 20:39 01-11-2008

sVIKs Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Я повторюсь, но...   Надо с микрофона получить звук и разложить на частоты(спектр частот).Я знаю, делается это с помощью БПФ(сам модуль БПФ у меня есть, взято с alglib.sources.ru), а вот дальше проблема, не знаю как пользоваться данным модулем, да и не совсем понятно как это потом можно вывести, причем так, чтобы можно было разложить на диапазон высоких и низких частот, может кто-то сможет помочь? Был бы безмерно благодарен. Всего записей: 357 | Зарегистр. 22-02-2005 | Отправлено: 20:45 05-11-2008

GuitarloverX Newbie Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору ItsJustMe Спасибо. Вопросы сняты, подсказали Всего записей: 8 | Зарегистр. 22-01-2008 | Отправлено: 18:56 09-11-2008

RER_27 Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Ребята, может кто поможет........   Препод ничего не объясняя задал задание:       Создать проект, в котором  с помощью псевдографических операторов                 построить графики функций, полученных от интегрирования системы                 дифференциальных уравнений вида:                                     dYa/dX = - A1*Ya                                     dYb/dX = A1*Ya – A2*Yb                                     dYc/dX = A2*Yb                                 при:    Ya(0) = A0;     Yb(0) = 0       Yc(0) = 0                 Коэффициенты   полинома задать на    форме.   Из   полученного   графика                 выбрать произвольный  диапазон, в котором методом трапеций необходимо                 определить значение определенного интеграла с заштриховыванием                 интегральной области.     .... примерно видел, что создаются Text1 и Text2, Command1   .... а куда чего вводить, чтобы график этот вышел не знаю.       ..... хотя бы что вводить в Text1 ; Text2 и Command1 Всего записей: 52 | Зарегистр. 13-04-2007 | Отправлено: 15:02 10-11-2008

Legio Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору А что непонятно-то?.. Кроме "интегрирования системы дифференциальных уравнений" (про которое я давно и успешно забыл и которого VB не умеет, насколько мне известно -- если я правильно интерпретирую задачу, конечно же) всё довольно просто. В Text1 и Text2, скорее всего, те самые "коэффициенты полинома" и вводятся. По нажатию на Command1 рисуется график для заданных коэффициентов (как предполагается выбирать "произвольный диапазон", правда, не очень понятно -- но хоть inputbox'ами устанавливать, главное откуда-нибудь установить). Границы графика, судя по условиям, должны быть прописаны самостоятельно где-то внутри программы. Равно как и шаг, с которым будет рисоваться график (ну, там, от -100 до 100 с шагом 0,1, скажем -- типа такого вот). Непосредственно для рисования в данном случае нужен будет только Line. Заштрихованные прямоугольники тоже рисуются им, да; заполнение прямоугольника -- штриховка в данном случае -- задаётся свойством FillStyle, если рисовать будете по форме -- свойством FillStyle формы, если по PictureBox'у -- свойством FillStyle PictureBox'а и т. п. Ещё неплохо понять, как работают Scale*-свойства, но это не очень сложно, а можно и вовсе без этого обойтись.   Так что, повторюсь, что непонятно-то? Всего записей: 695 | Зарегистр. 01-08-2003 | Отправлено: 18:50 10-11-2008

RER_27 Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Legio   Не понятно как задавать массив.....DIM и т.д., как выглядит прога...... С пределами и шагом графика можно позже разобраться.... подогнать.... Чайник я в этом.... и препод говорит: "додумывайте сами".... вот так. Если можешь и есть возможность помоги. Методичка - так нагляднее. Лаба2, вариант 10 Всего записей: 52 | Зарегистр. 13-04-2007 | Отправлено: 09:26 11-11-2008

RER_27 Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Ну всё....... двойка обеспечена. Всего записей: 52 | Зарегистр. 13-04-2007 | Отправлено: 12:05 18-11-2008

dneprcomp Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Igor_V_Mitichev http://vb.mvps.org/samples/project.asp?id=DirDrill http://www.xtremevbtalk.com/archive/index.php/t-5050.html http://www.codeproject.com/KB/vb/dirsinc.aspx http://www.visualbasic.happycodings.com/Files_Directories_Drives/code55.html   http://www.google.com/search?hl=en&q=vb+dir+recursive Цитата: оно  у меня не работает почему-то...   Цитата: To use FileSystemObject, you must select the Microsoft Scripting Run-time in the Project References dialog box for your project.     http://support.microsoft.com/kb/186118 http://www.virtualsplat.com/tips/visual-basic-fso.asp Цитата: То есть вот эту set fso = CreateObject("Scripting.FileSystemObject") достаточно один раз объявить на все случаи жизни, или для каждого файла ее надо по-новой объявлять?   Достаточно однго присвоения. Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 20:51 25-11-2008 | Исправлено: dneprcomp, 23:39 25-11-2008

Legio Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору dneprcomp Оно, боюсь, по другому поводу не работает -- на снэпшоте Set вне процедуры/функции написан. Всего записей: 695 | Зарегистр. 01-08-2003 | Отправлено: 21:21 25-11-2008

dneprcomp Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Legio Ты прав. Совершенно не обратил внимания. Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 23:32 25-11-2008

Legio Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Ну, хм, типа да, переменную надо объявить (ровно потому, что Option Explicit выставлено). И если Microsoft Scripting Run-Time, как верно заметил dneprcom, подключено -- всё должно будет работать.   Добавлено: Цитата: та же самая потеха Совершенно другая. В первом случае было вполне по делу написано -- "Invalid outside procedure". В этом, и тоже по делу, -- "Variable not defined". Всего записей: 695 | Зарегистр. 01-08-2003 | Отправлено: 18:05 26-11-2008

dneprcomp Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Igor_V_Mitichev Путаешь объявление - Dim с присвоением - Set В конце концов, можешь делать обе в процедуре. Но тогда в другой процедуре надо будет объявлять опять(смотри SCOPE или в хелпе)   PS. Переменную надо объявлять не потому, что Option Explicit выставлено, а потому, что НАДО Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 21:33 26-11-2008 | Исправлено: dneprcomp, 21:44 26-11-2008

Barbukas Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Извините, ошибочно написал не в тот форум!   Прошу модератора удалить данное сообщение! Всего записей: 48 | Зарегистр. 17-06-2006 | Отправлено: 22:13 27-11-2008 | Исправлено: Barbukas, 22:22 27-11-2008

sadasaf BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору есть список сайтов (грубо говоря папки). необходимо в каждой конкретной папке (задан список) добавить конкретных юзеров (также задаются) и дать им конкретные права (Read Execute, Read Execute Modify).   т.е. допустим папка А, если есть в неё добавляется юзер А1, в папку А2 если есть юзер А1 и А2... ну это уже лирика.   Далее разрешить наследование и принудительно заменить права всем чайлдам текущими правами (2 галочки в Advanced Options)     Интересует как это автоматизировать, опыта с VB совсем нет, но что-то мне подсказывает что в cmd это сделать нереально Всего записей: 216 | Зарегистр. 18-08-2008 | Отправлено: 04:16 03-12-2008

apexfmm Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору sadasaf Даже не думай, установка прав доступа - это API + вызов системных библиотек. Поройся в готовых модулях (интернет тебе в руки!) и пошукай установку прав доступа. ---------- -Если вы не испытываете желания преступить хоть одну из десяти заповедей - значит, с вами что-то не так [WINXP SP3eng, Intel P75, CoreDuoE7400 2.8GHz, 2Gb DDR2, Radeon HD4830] Всего записей: 782 | Зарегистр. 28-04-2005 | Отправлено: 10:42 03-12-2008

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Задачи на Visual Basic (VB).

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование