Программа модульной структуры для расчета переходного процесса в заданной электрической цепи
Отчет по практике - Компьютеры, программирование
Другие отчеты по практике по предмету Компьютеры, программирование
µмого приложения, включая процесс ввода с клавиатуры допустимых значений исходных параметров моделируемой электрической цепи.
Функциональность формы Ввода можно реализовать с помощью следующего набора элементов управления, которые должны быть размещены на ее поверхности и приведены в таблице 1:
Таблица 1 - Характеристика элементов для формы Ввода
ОбъектСвойствоЗначение свойстваForm1CaptionВвод параметров нелинейной цепиLabel1CaptionВведите R1, ОмText1TextEmptyLabel2CaptionВведите R2, ОмText2TextEmptyLabel3CaptionВведите Ik, АText3TextEmptyLabel4CaptionВремя интегрирования, сText4TextEmptyLabel5CaptionПараметр индуктивности, АText5TextEmptyLabel6CaptionПараметр индуктивности, ВText6TextEmptyLabel7CaptionЧисло точекText7TextEmptyCommand1CaptionOKPicture1Picture(Bitmap)Picture2Picture(Bitmap)
На рисунке 4 представлен экранный вид формы Ввода в режиме выполнения
численный интегрирование электрический цепь
Рисунок 4 - Форма Ввода в режиме выполнения
Вторая дочерняя Форма Form2 должна обеспечивать реализацию команды Интегрирование из функционального меню проектируемого приложения, включая процесс интегрирования потокосцепления и расчет переходных процессов изменения Тока через индуктивность и ЭДС самоиндукции в исходной электрической цепи. Для реализации такой функциональности на поверхности формы необходимо установить следующий набор элементов управления, который представлен в таблице 2:
Таблица 2 - Характеристика элементов для формы Интегрирования
ОбъектСвойствоЗначение свойстваForm2CaptionИнтегрированиеForm2MDIChildTrueLabel1CaptionЗаряд на конденсатореLabel2CaptionТок и напряжение на конденсатореLabel3CaptionНачать интегрирование?ProgressBar1CaptionProgressBar2CaptionCommand1CaptionДаCommand2CaptionВозврат в меню
На рисунке 5 представлен экранный вид Form 2 формы интегрирования в режиме выполнения:
Рисунок 5 - Form 2 форма Интегрирования в режиме выполнения
Третья дочерняя Форма Form3 должна обеспечивать реализацию команды Таблица из функционального меню проектируемого приложения, включая вывод в графы таблицы следующих числовых последовательностей, полученных на этапе интегрирования и расчета переходных процессов: T (i) - физическое время, P (i) - потокосцепление, IL (i) - ток через индуктивность, UL (i) - ЭДС самоиндукции. Для реализации такой функциональности на поверхности формы необходимо установить следующий набор элементов управления, приведенный в таблице 3:
Таблица 3 - Характеристика элементов для формы Таблица
ОбъектСвойствоЗначение свойстваForm3CaptionТаблица переходных процессов в нелинейном конденсатореForm3MDIChildTrueMSFlexGrid1AllowBigSelectionTrueCommand1CaptionПроцессыCommand2CaptionВозврат в меню
На рисунке 6 представлен экранный вид Form 3 в режиме выполнения:
Рисунок 6 - Form 3 форма Таблицы в режиме выполнения
Четвертая дочерняя Форма Form4 должна обеспечивать реализацию команды Графики из функционального меню проектируемого приложения, включая вывод на поверхность формы следующих табулированных функций времени, полученных на этапе интегрирования: P (t)- потокосцепление, IL (t)- Ток через индуктивность, UL (t) - ЭДС самоиндукции. Для реализации такой функциональности на поверхности формы необходимо установить следующий набор элементов управления, приведенный в таблице 4:
Таблица 4 - Характеристика элементов для формы Графики
ОбъектСвойствоЗначение свойстваForm4CaptionГрафики переходных процессов в нелинейном конденсатореMDIChildTrueFrame1CaptionГрафики переходных процессовOption1CaptionQ(t)Option2CaptionUc(t)Option3CaptionIc(t)Command1CaptionВозврат в меню
Рисунок 7 - Form 4 форма Графики в режиме выполнения
Ниже представлен код приложения. Описание кода выполнено в комментариях по тексту процедур. Формы в режиме выполнения представлены выше, в процессе описания разработки приложения.
Стандартный модуль проекта:
Public R1 As Double
Public R2 As DoubleE As DoubleA As DoubleB As DoubleTi As DoubleN As LongQ() As DoubleUс() As DoubleIс() As DoubleT() As Double
Модуль родительской формы:
Процедура загрузки родительской формы
Private Sub MDIForm_Load().Show
End Sub
Процедура запуска команды меню Ввод
Sub MnuVvod_Click()
Form1.ShowSub
Процедура запуска команды меню Интегрирование
Sub MnuInteg_Click()2.ShowSub
Процедура запуска команды меню Таблица
Sub MnuTabl_Click()
Form3.ShowSub
Процедура запуска команды меню Графики
Sub MnuGraf_Click()
Form4.ShowSub
Процедура запуска команды меню Каскад
Sub MnuKskad_Click().Arrange vbCascadeSub
Процедура запуска команды меню Вертикаль
Sub MnuVert_Click()
MDIForm1.Arrange vbVerticalSub
Модуль формы для выполнения команды ввод:
Процедура обработки события Click на командной кнопке формы. Здесь выполняются преобразования текстовых значений исходных параметров
цепи, введенных через текстовые поля на Form1, в арифметические значения
глобальных переменных типа Double и LongSub Command1_Click()= CDbl(Text1.Text) 'Преобразование текстового значения в
арифметическое значение глобальной переменной типа Double
R2 = CDbl(Text2.Text)= CDbl(Text3.Text)= CDbl(Text5.Text)= CDbl(Text6.Text)
N = CLng(Text7.Text) 'Преобразование текстового значения в
арифметическое значение глобальной переменной типа Long
Ti = CDbl(Text4.Text)Me 'Выгрузить форму Form1
End Sub
Процедура инициализации формы Form1 и установка стартовых значений свойств
Private Sub Form_Initialize()= 8= True.Height = 15000.Width = 15000
End Sub
Процедура загрузки формы Form1 и инициализации ее текстовых полей
Private Sub Form1_Load().Text = Empty.Text = Empty.Text = Empty.Text = Empty.Text = Empty.Text = Empty.Text = Empty
End Sub
Модуль формы для выполнения команды интегрировать
Процедура обработки со