Как сделать ввод на одной форме,а вывод на другой?

@Maximum_Shock · Регистрация: 09.02.2014

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

Как осуществить ввод данных на одной форме через textbox,а вывод на другой форме?

@sco43 · 07.04.2014, 20:56

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

@aptos · 07.04.2014, 21:03

Вводишь данные в TextBox компонент, и выводить куда? На форму просто или в какой-то компонент на форме?

@Maximum_Shock · 07.04.2014, 21:04 **[ТС]**

вывожу в label на другой форме

@aptos · 07.04.2014, 21:10

Если названия форм Form1 и Form2 то так:

Visual Basic
1
2
3
Private Sub Text1_Change()
Form2.Label1.Caption = Form1.Text1
End Sub

Текст будет отображаться в Label после каждого изменения TextBox.

@gehh · 08.04.2014, 15:36

Visual Basic

1. Private Sub Text1_Change()
2. Form2.Label1.Caption = Form1.Text1
3. End Sub
.............
Мне интересно. Почему во 2-ой строке сокращенная запись?
Сократить можно, но не так.
2. Form2.Label1.Caption = Text1.Text
Может я что-то не понимаю?

@Казанский · 08.04.2014, 15:44

gehh, что не так? Работает, и так работает:

Visual Basic
1
Form2.Label1 = Text1

@gehh · 08.04.2014, 15:54

Я все понял. Что может передать текстовое поле метке?
Строку!! Значит и указывать ничего не надо. Надо полагать,
что верно и обратное. А вот тогда другой вопрос.
Может ли объект Image получить картинку от Picture,
Без указания свойства?

@The trick · 08.04.2014, 16:18

gehh, есть такое понятие в VB - свойство по умолчанию, вот это оно и есть, и это имеет смысл, т.к. запись Label1 = Text1 не имеет смысла без этого.

@aptos · 08.04.2014, 16:21

Я просто опечатался, а оказывается что-то умное сделал

@Казанский · 08.04.2014, 16:53

Вообще, лучше не полагаться на свойство по умолчанию, а прописывать свойство явно.
В Excel свойством диапазона по умолчанию является Value (значение или массив значений).
Попробуйте пройти по шагам эту простую программу и посмотрите, что происходит:

Visual Basic
1
2
3
4
5
6
7
8
Sub TestRangeDefaultProperty()
Dim r As Range, v()
Set r = Range("a1:b2")
r = "=RAND()"     'если выражение является формулой, вводится формула
v = r             'v - массив значений диапазона Variant(1 to 2, 1 to 2)
r.Value = r.Value 'замена формул на значения, можно r = v
r = r             'что произошло o_O???
End Sub

@sco43 · 08.04.2014, 17:00

А если во второй форме будет text1?

@Антихакер32 · 08.04.2014, 17:53

Надо посылать сообщения окну через API
Можно так-же посылать сообщения встроенной ф-ей SendKeys !

Visual Basic
1
2
SendKeys "Hello !" , True 
SendKeys "{ENTER}" , True

Добавлено через 12 минут

Сообщение от The trick

такое понятие в VB - свойство по умолчанию

да и свойство по умолчанию задаёться в
собственных компонентах так ...
tools >> procedure attributes >>advanced >> Procedure ID [свойство] >> (Default)

Добавлено через 11 минут
Пример

Visual Basic
1
2
3
4
5
Property Mytext let (new_value) ...
 m_Mytext = new_value
 
Property Mytext get () ...
 Mytext = m_Mytext

myObj.mytext = "hello"
тоже что и
myObj = "hello"

Новые блоги и статьи Все статьи Все блоги /
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .

@Maximum_Shock 0 / 0 / 0 Регистрация: 09.02.2014 Сообщений: 12

	Как сделать ввод на одной форме,а вывод на другой? 07.04.2014, 20:32. Показов 1892. Ответов 12 Метки нет (Все метки) Как осуществить ввод данных на одной форме через textbox,а вывод на другой форме? 0

@sco43 670 / 163 / 22 Регистрация: 27.01.2012 Сообщений: 372
	07.04.2014, 20:56
	В модуле класса объявить открытую переменную. Ее будут видеть все формы проекта. 0

@aptos 13 / 13 / 3 Регистрация: 04.06.2013 Сообщений: 156
	07.04.2014, 21:03
	Вводишь данные в TextBox компонент, и выводить куда? На форму просто или в какой-то компонент на форме? 0

@Maximum_Shock 0 / 0 / 0 Регистрация: 09.02.2014 Сообщений: 12
	07.04.2014, 21:04 [ТС]
	вывожу в label на другой форме 0

@gehh 159 / 104 / 124 Регистрация: 01.04.2014 Сообщений: 466 Записей в блоге: 7
	08.04.2014, 15:36
	Visual Basic 1. Private Sub Text1_Change() 2. Form2.Label1.Caption = Form1.Text1 3. End Sub ............. Мне интересно. Почему во 2-ой строке сокращенная запись? Сократить можно, но не так. 2. Form2.Label1.Caption = Text1.Text Может я что-то не понимаю? 0

@gehh 159 / 104 / 124 Регистрация: 01.04.2014 Сообщений: 466 Записей в блоге: 7
	08.04.2014, 15:54
	Я все понял. Что может передать текстовое поле метке? Строку!! Значит и указывать ничего не надо. Надо полагать, что верно и обратное. А вот тогда другой вопрос. Может ли объект Image получить картинку от Picture, Без указания свойства? 0

@The trick Модератор 10057 / 3902 / 884 Регистрация: 22.02.2013 Сообщений: 5,853 Записей в блоге: 79
	08.04.2014, 16:18
	gehh, есть такое понятие в VB - свойство по умолчанию, вот это оно и есть, и это имеет смысл, т.к. запись Label1 = Text1 не имеет смысла без этого. 1

@aptos 13 / 13 / 3 Регистрация: 04.06.2013 Сообщений: 156
	08.04.2014, 16:21
	Я просто опечатался, а оказывается что-то умное сделал 0

@sco43 670 / 163 / 22 Регистрация: 27.01.2012 Сообщений: 372
	08.04.2014, 17:00
	А если во второй форме будет text1? 0

Как сделать ввод на одной форме,а вывод на другой?

Решение