Формы. При повторном открытии формы сбрасываются результаты вывода данных

@Harvy · Регистрация: 29.04.2009

Студворк — интернет-сервис помощи студентам

Создал 2 формы. В 1й форме проходит расчет различных выражений. Данные расчета присваиваются переменным.
Ввожу данные
Нажимаю кнопку "расчет"

После расчета нажимаю кнопку "Вывод данных" и открывается форма в которой я вывожу данные. Данные выводятся. Все вроде бы хорошо. Но после закрытия формы с выводом данных и последующем ее открытии все TextBox где должны быть данные пустые. Нужно снова нажимать "расчет", что б в форме "вывод данных" опять появились результаты в TextBox ах. Я могу продублировать код из кнопки расчет в Form_load поидее. И все будет работать, Но

можно ли сделать так чтоб при открытии формы в Form_Load была сделана каким то образом ссылка на кнопку "рассчет"? Не хочу дублировать в Form_load код.

Заранее спасибо.

@Toxa33rus · 10.05.2009, 12:10

Call Form1.Raschet()
А может лучше в первой форме рассчитанные данные засунуть в какой-нибудь массив и при открытии второй формы (событие OnLoad вроде) заполнять из него?

@Harvy · 11.05.2009, 00:33 **[ТС]**

А можно по подробнее как это работает? Я не очень долго занимаюсь программированием.

@Toxa33rus · 12.05.2009, 09:36

Из второй формы можно инициировать нажатие на кнопку в первой форме:
Call Form1.CommandButton_Click()

@Мухаммаджон · 04.03.2011, 07:59

Для этого надо использовать Модул.
Вот код модуля.

Visual Basic
1
2
3
4
5
Dim k As Integer
Dim s As Integer
Public Sub Function Rashet(Byval Chislo1 as Integer, Chislo2 As Integer)
Rashet = Chislo1+ Chislo2)
End Function

Все просто. Все написанные функции или методы в модуле используется в любом форме Проекта

Код формы.

Visual Basic
1
2
3
Private Sub Command1_Click()
Text1.Text =Rashet(1,2)
End Sub

Новые блоги и статьи Все статьи Все блоги /
Символьное дифференцирование igorrr37 13.02.2026 / * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .

@Harvy 2 / 2 / 0 Регистрация: 29.04.2009 Сообщений: 18

	Формы. При повторном открытии формы сбрасываются результаты вывода данных 10.05.2009, 03:29. Показов 2838. Ответов 4 Метки нет (Все метки) Создал 2 формы. В 1й форме проходит расчет различных выражений. Данные расчета присваиваются переменным. Ввожу данные Нажимаю кнопку "расчет" После расчета нажимаю кнопку "Вывод данных" и открывается форма в которой я вывожу данные. Данные выводятся. Все вроде бы хорошо. Но после закрытия формы с выводом данных и последующем ее открытии все TextBox где должны быть данные пустые. Нужно снова нажимать "расчет", что б в форме "вывод данных" опять появились результаты в TextBox ах. Я могу продублировать код из кнопки расчет в Form_load поидее. И все будет работать, Но можно ли сделать так чтоб при открытии формы в Form_Load была сделана каким то образом ссылка на кнопку "рассчет"? Не хочу дублировать в Form_load код. Заранее спасибо. 0

@Toxa33rus 3921 / 922 / 125 Регистрация: 16.04.2009 Сообщений: 1,962
	10.05.2009, 12:10
	Call Form1.Raschet() А может лучше в первой форме рассчитанные данные засунуть в какой-нибудь массив и при открытии второй формы (событие OnLoad вроде) заполнять из него? 0

@Harvy 2 / 2 / 0 Регистрация: 29.04.2009 Сообщений: 18
	11.05.2009, 00:33 [ТС]
	А можно по подробнее как это работает? Я не очень долго занимаюсь программированием. 0

@Toxa33rus 3921 / 922 / 125 Регистрация: 16.04.2009 Сообщений: 1,962
	12.05.2009, 09:36
	Из второй формы можно инициировать нажатие на кнопку в первой форме: Call Form1.CommandButton_Click() 0