📄 frmmain.frm
字号:
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 23
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 22
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 21
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 20
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 19
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 18
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 17
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 16
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 15
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 14
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 13
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 12
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 11
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 10
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 9
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 8
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 7
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 6
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 5
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 4
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 3
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 2
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 1
X1 = 0
X2 = 70
Y1 = 0
Y2 = 0
End
Begin VB.Line LineMove
BorderColor = &H000000FF&
Index = 0
X1 = 2430
X2 = 2500
Y1 = 256
Y2 = 256
End
Begin VB.Line Line4
BorderColor = &H00C0C0C0&
X1 = 2500
X2 = 2500
Y1 = 240
Y2 = 960
End
Begin VB.Line Line3
BorderColor = &H00FFFFFF&
X1 = 2420
X2 = 2420
Y1 = 240
Y2 = 960
End
Begin VB.Line Line2
BorderColor = &H80000005&
X1 = 2520
X2 = 2520
Y1 = 240
Y2 = 960
End
Begin VB.Line Line1
BorderColor = &H00C0C0C0&
X1 = 2400
X2 = 2400
Y1 = 240
Y2 = 960
End
Begin VB.Label Lbl24
BackStyle = 0 'Transparent
Caption = "2 4 点"
BeginProperty Font
Name = "楷体_GB2312"
Size = 21.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0080FF80&
Height = 495
Left = 3120
TabIndex = 7
Top = 360
Width = 1455
End
Begin VB.Label LblCai
BackStyle = 0 'Transparent
Caption = "猜数字"
BeginProperty Font
Name = "楷体_GB2312"
Size = 21.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0080FF80&
Height = 495
Left = 600
TabIndex = 6
Top = 360
Width = 1455
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "猜数字"
BeginProperty Font
Name = "楷体_GB2312"
Size = 21.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 610
TabIndex = 49
Top = 370
Visible = 0 'False
Width = 1455
End
Begin VB.Label Label6
BackStyle = 0 'Transparent
Caption = "2 4 点"
BeginProperty Font
Name = "楷体_GB2312"
Size = 21.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 3130
TabIndex = 50
Top = 370
Visible = 0 'False
Width = 1455
End
End
Begin VB.Timer Timer1
Interval = 100
Left = 0
Top = 1920
End
Begin MSComctlLib.ImageList ImageList1
Left = 2160
Top = 3000
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 8
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmMain.frx":0442
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmMain.frx":0896
Key = ""
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmMain.frx":0CEA
Key = ""
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmMain.frx":113E
Key = ""
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmMain.frx":1592
Key = ""
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmMain.frx":19E6
Key = ""
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmMain.frx":1E3A
Key = ""
EndProperty
BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmMain.frx":228E
Key = ""
EndProperty
EndProperty
End
Begin VB.CommandButton Command1
Cancel = -1 'True
Caption = "Command1"
Height = 180
Left = 600
TabIndex = 21
Top = 2520
Width = 255
End
Begin VB.Frame Frame5
BackColor = &H00FF0000&
BorderStyle = 0 'None
Caption = "Frame5"
Height = 2055
Left = 480
TabIndex = 42
ToolTipText = "点击查看使用方法"
Top = 240
Width = 4935
Begin VB.Label Label8
BackStyle = 0 'Transparent
Caption = "作者：尉肖宁"
BeginProperty Font
Name = "方正舒体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0080FFFF&
Height = 375
Left = 1200
TabIndex = 44
ToolTipText = "点击查看使用方法"
Top = 960
Width = 2295
End
Begin VB.Label Label7
BackStyle = 0 'Transparent
Caption = "数字游戏系列之一"
BeginProperty Font
Name = "方正舒体"
Size = 24
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0080FF80&
Height = 495
Left = 360
TabIndex = 43
ToolTipText = "点击查看使用方法"
Top = 240
Width = 4215
End
Begin VB.Label Label10
BackStyle = 0 'Transparent
Caption = "作者：尉肖宁"
BeginProperty Font
Name = "方正舒体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1210
TabIndex = 51
Top = 970
Width = 2175
End
Begin VB.Label Label13
BackStyle = 0 'Transparent
Caption = "数字游戏系列之一"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -