📄 form1.frm
字号:
ScaleMode = 3 'Pixel
ScaleWidth = 13
TabIndex = 1
Top = 7920
Visible = 0 'False
Width = 255
End
Begin VB.Frame Frame4
Caption = "Status"
Height = 2415
Left = 5880
TabIndex = 91
Top = 30
Width = 2175
Begin VB.Label lblZNum
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "Overlook Appartments"
BeginProperty Font
Name = "Arial"
Size = 6.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 100
Top = 840
Width = 1935
End
Begin VB.Label Label2
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "Zone Title"
Height = 255
Index = 4
Left = 120
TabIndex = 98
Top = 600
Width = 1935
End
Begin VB.Label lblLV
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "$100"
Height = 255
Left = 120
TabIndex = 97
Top = 1440
Width = 1935
End
Begin VB.Label Label2
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "$ Land Value $"
Height = 255
Index = 3
Left = 120
TabIndex = 96
Top = 1200
Width = 1935
End
Begin VB.Label lblGrowth
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "0"
Height = 255
Left = 960
TabIndex = 101
Top = 2040
Width = 1095
End
Begin VB.Label Label2
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "Growth"
Height = 255
Index = 1
Left = 120
TabIndex = 93
Top = 2040
Width = 735
End
Begin VB.Label lblSPOP
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "0"
Height = 255
Left = 960
TabIndex = 99
Top = 1800
Width = 1095
End
Begin VB.Label Label2
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "Pop."
Height = 255
Index = 2
Left = 120
TabIndex = 95
Top = 1800
Width = 735
End
Begin VB.Label lblZone
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "Residential"
Height = 255
Left = 960
TabIndex = 94
Top = 240
Width = 1095
End
Begin VB.Label Label2
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "Zone"
Height = 255
Index = 0
Left = 120
TabIndex = 92
Top = 240
Width = 735
End
End
Begin VB.PictureBox BlackBird
AutoRedraw = -1 'True
AutoSize = -1 'True
BackColor = &H00000000&
Height = 495
Left = 5280
ScaleHeight = 29
ScaleMode = 3 'Pixel
ScaleWidth = 29
TabIndex = 111
Top = 240
Visible = 0 'False
Width = 495
End
Begin VB.PictureBox BirdMask
AutoRedraw = -1 'True
AutoSize = -1 'True
BackColor = &H00FFFFFF&
Height = 495
Index = 0
Left = 4800
ScaleHeight = 29
ScaleMode = 3 'Pixel
ScaleWidth = 29
TabIndex = 112
Top = 840
Visible = 0 'False
Width = 495
End
Begin VB.PictureBox BirdMask
AutoRedraw = -1 'True
AutoSize = -1 'True
BackColor = &H00FFFFFF&
Height = 495
Index = 1
Left = 4800
ScaleHeight = 29
ScaleMode = 3 'Pixel
ScaleWidth = 29
TabIndex = 113
Top = 1320
Visible = 0 'False
Width = 495
End
Begin VB.PictureBox BirdMask
AutoRedraw = -1 'True
AutoSize = -1 'True
BackColor = &H00FFFFFF&
Height = 495
Index = 2
Left = 4800
ScaleHeight = 29
ScaleMode = 3 'Pixel
ScaleWidth = 29
TabIndex = 114
Top = 1800
Visible = 0 'False
Width = 495
End
Begin VB.PictureBox BirdMask
AutoRedraw = -1 'True
AutoSize = -1 'True
BackColor = &H00FFFFFF&
Height = 495
Index = 3
Left = 4800
ScaleHeight = 29
ScaleMode = 3 'Pixel
ScaleWidth = 29
TabIndex = 115
Top = 2280
Visible = 0 'False
Width = 495
End
Begin VB.Frame Frame5
Caption = "FreeBes"
Height = 960
Left = 5880
TabIndex = 104
Top = 4090
Width = 2175
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
Height = 255
Index = 36
Left = 840
ScaleHeight = 13
ScaleMode = 3 'Pixel
ScaleWidth = 13
TabIndex = 108
Top = 240
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 35
Left = 600
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 107
Top = 240
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 34
Left = 360
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 106
Top = 240
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 33
Left = 120
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 105
Top = 240
Width = 255
End
End
Begin VB.Frame Frame3
Caption = "Road $2000"
Height = 1335
Left = 120
TabIndex = 77
Top = 5060
Width = 1095
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 20
Left = 720
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 102
Top = 240
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 19
Left = 720
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 78
Top = 960
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 14
Left = 720
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 79
Top = 600
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 18
Left = 360
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 83
Top = 960
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 13
Left = 360
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 80
Top = 720
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 17
Left = 120
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 82
Top = 960
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 12
Left = 120
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 81
Top = 720
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 16
Left = 360
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 84
Top = 480
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 11
Left = 360
ScaleHeight = 17
ScaleMode = 3 'Pixel
ScaleWidth = 17
TabIndex = 87
Top = 240
Width = 255
End
Begin VB.PictureBox Selector
AutoRedraw = -1 'True
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 255
Index = 15
Left = 120
ScaleHeight = 17
ScaleMode = 3 'Pixel
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -