frmdlgwindow.frm
来自「多种图表的绘制及其运用」· FRM 代码 · 共 1,075 行 · 第 1/3 页
FRM
1,075 行
VERSION 5.00
Begin VB.Form frmDlgWindow
Caption = "Window Editor"
ClientHeight = 5055
ClientLeft = 60
ClientTop = 345
ClientWidth = 7095
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 5055
ScaleWidth = 7095
StartUpPosition = 2 'CenterScreen
Begin VB.CommandButton cmdOK
Caption = "OK"
Height = 465
Left = 5835
TabIndex = 0
Top = 4515
Width = 1185
End
Begin VB.PictureBox picWin
Height = 3585
Left = 60
ScaleHeight = 3525
ScaleWidth = 4305
TabIndex = 19
Top = 120
Width = 4365
Begin VB.TextBox objTBOX
Height = 360
Index = 0
Left = 450
TabIndex = 34
Text = "objTBOX"
Top = 1290
Visible = 0 'False
Width = 1305
End
Begin VB.PictureBox objPIC
AutoRedraw = -1 'True
Height = 945
Index = 0
Left = 2580
ScaleHeight = 59
ScaleMode = 3 'Pixel
ScaleWidth = 64
TabIndex = 31
Top = 240
Visible = 0 'False
Width = 1020
End
Begin VB.PictureBox pSel
Appearance = 0 'Flat
BackColor = &H00800000&
BorderStyle = 0 'None
FillColor = &H00FFFFFF&
ForeColor = &H00FFFFFF&
Height = 110
Index = 7
Left = 1080
MousePointer = 9 'Size W E
ScaleHeight = 105
ScaleWidth = 105
TabIndex = 30
Top = 2250
Visible = 0 'False
Width = 110
End
Begin VB.PictureBox pSel
Appearance = 0 'Flat
BackColor = &H00800000&
BorderStyle = 0 'None
FillColor = &H00FFFFFF&
ForeColor = &H00FFFFFF&
Height = 110
Index = 6
Left = 1080
MousePointer = 6 'Size NE SW
ScaleHeight = 105
ScaleWidth = 105
TabIndex = 29
Top = 2520
Visible = 0 'False
Width = 110
End
Begin VB.PictureBox pSel
Appearance = 0 'Flat
BackColor = &H00800000&
BorderStyle = 0 'None
FillColor = &H00FFFFFF&
ForeColor = &H00FFFFFF&
Height = 110
Index = 5
Left = 1395
MousePointer = 7 'Size N S
ScaleHeight = 105
ScaleWidth = 105
TabIndex = 28
Top = 2550
Visible = 0 'False
Width = 110
End
Begin VB.PictureBox pSel
Appearance = 0 'Flat
BackColor = &H00800000&
BorderStyle = 0 'None
FillColor = &H00FFFFFF&
ForeColor = &H00FFFFFF&
Height = 110
Index = 4
Left = 1740
MousePointer = 8 'Size NW SE
ScaleHeight = 105
ScaleWidth = 105
TabIndex = 27
Top = 2535
Visible = 0 'False
Width = 110
End
Begin VB.PictureBox pSel
Appearance = 0 'Flat
BackColor = &H00800000&
BorderStyle = 0 'None
FillColor = &H00FFFFFF&
ForeColor = &H00FFFFFF&
Height = 110
Index = 3
Left = 1740
MousePointer = 9 'Size W E
ScaleHeight = 105
ScaleWidth = 105
TabIndex = 26
Top = 2265
Visible = 0 'False
Width = 110
End
Begin VB.PictureBox pSel
Appearance = 0 'Flat
BackColor = &H00800000&
BorderStyle = 0 'None
FillColor = &H00FFFFFF&
ForeColor = &H00FFFFFF&
Height = 110
Index = 2
Left = 1740
MousePointer = 6 'Size NE SW
ScaleHeight = 105
ScaleWidth = 105
TabIndex = 25
Top = 1980
Visible = 0 'False
Width = 110
End
Begin VB.PictureBox pSel
Appearance = 0 'Flat
BackColor = &H00800000&
BorderStyle = 0 'None
FillColor = &H00FFFFFF&
ForeColor = &H00FFFFFF&
Height = 110
Index = 1
Left = 1395
MousePointer = 7 'Size N S
ScaleHeight = 105
ScaleWidth = 105
TabIndex = 24
Top = 1965
Visible = 0 'False
Width = 110
End
Begin VB.PictureBox pSel
Appearance = 0 'Flat
BackColor = &H00800000&
BorderStyle = 0 'None
FillColor = &H00FFFFFF&
ForeColor = &H00FFFFFF&
Height = 110
Index = 0
Left = 1080
MousePointer = 8 'Size NW SE
ScaleHeight = 105
ScaleWidth = 105
TabIndex = 23
Top = 1995
Visible = 0 'False
Width = 110
End
Begin VB.CommandButton objBUTTON
Caption = "objBUTTON"
Height = 480
Index = 0
Left = 705
TabIndex = 21
Top = 600
Visible = 0 'False
Width = 1245
End
Begin VB.TextBox objTAREA
Height = 660
Index = 0
Left = 1950
MousePointer = 1 'Arrow
MultiLine = -1 'True
ScrollBars = 3 'Both
TabIndex = 20
Text = "frmDlgWindow.frx":0000
Top = 1380
Visible = 0 'False
Width = 1590
End
End
Begin VB.Frame fraEvents
Caption = " Events "
Height = 1575
Left = 4560
TabIndex = 2
Top = 2100
Width = 2520
Begin VB.ComboBox cmbFunction2
Height = 315
ItemData = "frmDlgWindow.frx":000B
Left = 1065
List = "frmDlgWindow.frx":0012
TabIndex = 7
Top = 990
Width = 1335
End
Begin VB.ComboBox cmbFunction1
Height = 315
ItemData = "frmDlgWindow.frx":001D
Left = 1065
List = "frmDlgWindow.frx":0024
TabIndex = 6
Top = 360
Width = 1335
End
Begin VB.Label lblFunc2
Alignment = 1 'Right Justify
AutoSize = -1 'True
Caption = "Right Click:"
Height = 195
Left = 120
TabIndex = 18
Top = 1080
Width = 810
End
Begin VB.Label lblFunc1
Alignment = 1 'Right Justify
AutoSize = -1 'True
Caption = "Left Click:"
Height = 195
Left = 120
TabIndex = 16
Top = 435
Width = 705
End
End
Begin VB.Frame fraProperties
Caption = " Properties "
Height = 1890
Left = 4545
TabIndex = 1
Top = 165
Width = 2475
Begin VB.TextBox txtName
Height = 360
Left = 945
TabIndex = 4
Top = 255
Width = 1320
End
Begin VB.TextBox txtCaption
Height = 360
Left = 945
TabIndex = 5
Top = 690
Width = 1320
End
Begin VB.Label lblName
Alignment = 1 'Right Justify
AutoSize = -1 'True
Caption = "Name: "
Height = 195
Left = 105
TabIndex = 17
Top = 345
Width = 510
End
Begin VB.Label lblText
Alignment = 1 'Right Justify
AutoSize = -1 'True
Caption = "Caption: "
Height = 195
Left = 105
TabIndex = 15
Top = 795
Width = 630
End
End
Begin VB.Frame fraToolBar
Height = 1260
Left = 90
TabIndex = 3
Top = 3750
Width = 5580
Begin VB.CommandButton cmdAdd
Caption = "Text Box"
Height = 450
Index = 3
Left = 120
TabIndex = 8
Top = 255
Width = 1260
End
Begin VB.ComboBox cmbFuncOnResize
Height = 315
ItemData = "frmDlgWindow.frx":002F
Left = 1125
List = "frmDlgWindow.frx":0036
TabIndex = 13
Top = 855
Width = 1545
End
Begin VB.CommandButton cmdDelete
Caption = "Delete"
Height = 330
Left = 4725
TabIndex = 12
Top = 375
Width = 735
End
Begin VB.ComboBox cmbFuncOnLoad
Height = 315
ItemData = "frmDlgWindow.frx":0041
Left = 3720
List = "frmDlgWindow.frx":0048
TabIndex = 14
Top = 855
Width = 1620
End
Begin VB.CommandButton cmdAdd
Caption = "Picture"
Height = 450
Index = 2
Left = 1447
TabIndex = 9
Top = 255
Width = 1035
End
Begin VB.CommandButton cmdJavaTest
Caption = "Java Test"
BeginProperty Font
Name = "Arial"
Size = 6.75
Charset = 0
Weight = 400
Underline = 0 'False
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?