📄 menu51.frm
字号:
VERSION 5.00
Begin VB.Form winmenu51
BorderStyle = 0 'None
Caption = "Form2"
ClientHeight = 8130
ClientLeft = 0
ClientTop = 0
ClientWidth = 11880
LinkTopic = "Form2"
MDIChild = -1 'True
ScaleHeight = 8130
ScaleWidth = 11880
ShowInTaskbar = 0 'False
Begin VB.Timer Timer1
Interval = 300
Left = 720
Top = 480
End
Begin VB.Frame Frame1
BorderStyle = 0 'None
Height = 6430
Left = 240
TabIndex = 1
Top = 840
Width = 11520
Begin VB.Frame Frame3
BorderStyle = 0 'None
Height = 2175
Left = 1440
TabIndex = 35
Top = 3000
Visible = 0 'False
Width = 5295
Begin VB.TextBox Text2
Height = 270
Left = 2160
TabIndex = 48
Top = 720
Width = 2055
End
Begin VB.TextBox Text1
Height = 270
Left = 2160
MaxLength = 5
TabIndex = 46
Top = 1400
Width = 1455
End
Begin VB.CommandButton Command1
Caption = "确定且退出"
Height = 375
Left = 1200
TabIndex = 41
Top = 2280
Width = 2655
End
Begin VB.ComboBox Combo1
Height = 300
Left = 2160
TabIndex = 40
Top = 1740
Width = 2055
End
Begin VB.Label Label17
Caption = "平方米"
Height = 255
Left = 3720
TabIndex = 47
Top = 1480
Width = 855
End
Begin VB.Label Label6
Caption = "销 售 面 积:"
Height = 255
Left = 600
TabIndex = 45
Top = 1440
Width = 1215
End
Begin VB.Shape Shape2
BorderWidth = 3
Height = 375
Left = 3600
Top = 720
Width = 735
End
Begin VB.Label Label46
Caption = "房屋销售控制"
Height = 255
Left = 2040
TabIndex = 42
Top = 240
Width = 1335
End
Begin VB.Label Label45
Caption = "销 售 状 况："
Height = 255
Left = 600
TabIndex = 39
Top = 1800
Width = 1335
End
Begin VB.Label Label44
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 2160
TabIndex = 38
Top = 1080
Width = 855
End
Begin VB.Label Label43
Caption = "编 号："
Height = 375
Left = 600
TabIndex = 37
Top = 1080
Width = 1455
End
Begin VB.Label Label41
Caption = "当前控制单元："
Height = 375
Left = 600
TabIndex = 36
Top = 720
Width = 1455
End
End
Begin VB.Line lineh
Index = 23
X1 = 360
X2 = 360
Y1 = 4800
Y2 = 6480
End
Begin VB.Line lineh
Index = 21
Visible = 0 'False
X1 = 10920
X2 = 10920
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 20
Visible = 0 'False
X1 = 10440
X2 = 10440
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 19
Visible = 0 'False
X1 = 9960
X2 = 9960
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 18
Visible = 0 'False
X1 = 9480
X2 = 9480
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 17
Visible = 0 'False
X1 = 9000
X2 = 9000
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 16
Visible = 0 'False
X1 = 8520
X2 = 8520
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 15
Visible = 0 'False
X1 = 8040
X2 = 8040
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 14
Visible = 0 'False
X1 = 7560
X2 = 7560
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 13
Visible = 0 'False
X1 = 7080
X2 = 7080
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 12
Visible = 0 'False
X1 = 6600
X2 = 6600
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 11
Visible = 0 'False
X1 = 6120
X2 = 6120
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 10
Visible = 0 'False
X1 = 5640
X2 = 5640
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 9
Visible = 0 'False
X1 = 5160
X2 = 5160
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 8
Visible = 0 'False
X1 = 4680
X2 = 4680
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 7
Visible = 0 'False
X1 = 4200
X2 = 4200
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 6
Visible = 0 'False
X1 = 3720
X2 = 3720
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 5
Visible = 0 'False
X1 = 3240
X2 = 3240
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 4
Visible = 0 'False
X1 = 2760
X2 = 2760
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 3
Visible = 0 'False
X1 = 2280
X2 = 2280
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 2
Visible = 0 'False
X1 = 1800
X2 = 1800
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 22
Visible = 0 'False
X1 = 360
X2 = 11520
Y1 = 5880
Y2 = 5880
End
Begin VB.Line lineh
Index = 1
Visible = 0 'False
X1 = 1320
X2 = 1320
Y1 = 5880
Y2 = 6480
End
Begin VB.Line lineh
Index = 0
Visible = 0 'False
X1 = 840
X2 = 840
Y1 = 5880
Y2 = 6480
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
Caption = "Label19"
Height = 255
Index = 96
Left = 10800
TabIndex = 145
Top = 5040
Width = 615
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
Caption = "Label19"
Height = 255
Index = 95
Left = 10800
TabIndex = 144
Top = 5520
Width = 615
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
Caption = "Label19"
Height = 255
Index = 94
Left = 10920
TabIndex = 143
Top = 6000
Width = 615
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
Caption = "Label19"
Height = 255
Index = 93
Left = 10440
TabIndex = 142
Top = 6000
Width = 615
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
Caption = "Label19"
Height = 255
Index = 92
Left = 9960
TabIndex = 141
Top = 6000
Width = 615
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
Caption = "Label19"
Height = 255
Index = 91
Left = 9480
TabIndex = 140
Top = 6000
Width = 615
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
Caption = "Label19"
Height = 255
Index = 90
Left = 9000
TabIndex = 139
Top = 6000
Width = 615
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
Caption = "Label19"
Height = 255
Index = 89
Left = 8520
TabIndex = 138
Top = 6000
Width = 615
End
Begin VB.Label lamj
BackStyle = 0 'Transparent
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -