3. Ознакомиться с файлом формы, например формы frm2.frm. Файл формы содержит значения установленных свойств для всех объектов графического интерфейса (форма frm2 и кнопка стсЩомики2), а также программный код событийной процедуры стсЩомики2_С1юк().
файл тхя&з фермат Вид сграека
|
|
VERSION 5 00
| *
|
eegin VB Form frm2
| "~
|
BackColor = 4H00FFFFFF&
|
|
caption = домики 2
|
|
ClientHeight = 2496
|
|
CllentLeft = 4140
|
|
ClientTop ж 3300
|
|
Clientwidth» 4092
|
|
LinkTopic = Forml"
|
|
ScaleHeight» 2496
|
|
Scalewidth = 4092
|
|
Begin VB commandButton атс1Домики2
|
|
Caption = домики
|
|
Height - 492
|
|
Left = 2160
|
|
Tablndex = 0
|
|
Top = 1920
|
|
Width = 1452
|
|
tnd
|
|
End
|
|
Private Sub апёДомикиг ClickO
|
|
frm2 Scale (0, 170)-(350, 0)
|
|
Call frml Домик2(10, 50, 50, 10)
|
|
Call frml Домик2(60, 150, 100, 40)
|
|
Call frml Домик2(160, 320, 110, 50)
|
|
End Sub
il (I
| J
|
Файл Правка Формат Вид Справка
|
Attribute
| VB_Name = 'Мое
| ulel'
|
|
|
| A
|
Publ
| с Sub Домик 3(XI, X2
| , Yl,
| Y2
| *s Single.
|
|
frmi
| Line
| (XI,
| Y1)-(X2,
| W),
| R
|
|
|
|
trmS
| Line
| (XI
| Y1)-(X2,
| Yl)
|
|
|
|
|
frmrl
| Line
| (XI,
| Y1)-((X1
| + iO)
| / 2
| Yl + Yl
| / 2)
|
trm<
| Line
| ((XI
| + X2) / 2
| , Yl
| t Yl
| / 71
| (W,
| Yl) -J
|
End Si
| >ub
|
| I
| I
|
|
| (
| iTa
|
4. Ознакомиться с фай
лом стандартного про
граммного модуля Мо-
dulel.bas. Файл
содержит глобальную общую процедуру ДомикЗ(X1,X2,Y1,Y2 As Single).
Проект, состоящий из текстовых файлов самого проекта, программных модулей форм и стандартных программных модулей, может выполняться только в самой системе программирования Visual Basic. Для того чтобы получить приложение, то есть программу, которая может выполняться непосредственно в среде операционной системы, необходимо осуществить компиляцию проекта в исполняемый файл (типа ехе).
Приложение интегрирует программный код и графический интерфейс в одном исполняемом файле, который может запускаться вне системы программирования Visual Basic.
5. Сохранить проект в форме приложения. Для компиляции проекта в исполнимый файл ввести команду [File-Make...].