📄 form1.frm
字号:
Height = 2175
Left = 8280
TabIndex = 5
Top = 2760
Width = 1935
Begin VB.CommandButton Command6
Caption = "确定"
Height = 375
Index = 11
Left = 1320
Style = 1 'Graphical
TabIndex = 17
Top = 1680
Width = 495
End
Begin VB.CommandButton Command6
Caption = "取消"
Height = 375
Index = 10
Left = 720
Style = 1 'Graphical
TabIndex = 16
Top = 1680
Width = 495
End
Begin VB.CommandButton Command6
Caption = "0"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 0
Left = 120
Style = 1 'Graphical
TabIndex = 15
Top = 1680
Width = 495
End
Begin VB.CommandButton Command6
Caption = "3"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 3
Left = 1320
Style = 1 'Graphical
TabIndex = 14
Top = 1200
Width = 495
End
Begin VB.CommandButton Command6
Caption = "2"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 2
Left = 720
Style = 1 'Graphical
TabIndex = 13
Top = 1200
Width = 495
End
Begin VB.CommandButton Command6
Caption = "1"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 1
Left = 120
Style = 1 'Graphical
TabIndex = 12
Top = 1200
Width = 495
End
Begin VB.CommandButton Command6
Caption = "6"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 6
Left = 1320
Style = 1 'Graphical
TabIndex = 11
Top = 720
Width = 495
End
Begin VB.CommandButton Command6
Caption = "5"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 5
Left = 720
Style = 1 'Graphical
TabIndex = 10
Top = 720
Width = 495
End
Begin VB.CommandButton Command6
Caption = "4"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 4
Left = 120
Style = 1 'Graphical
TabIndex = 9
Top = 720
Width = 495
End
Begin VB.CommandButton Command6
Caption = "9"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 9
Left = 1320
Style = 1 'Graphical
TabIndex = 8
Top = 240
Width = 495
End
Begin VB.CommandButton Command6
Caption = "8"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 8
Left = 720
Style = 1 'Graphical
TabIndex = 7
Top = 240
Width = 495
End
Begin VB.CommandButton Command6
Caption = "7"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 7
Left = 120
Style = 1 'Graphical
TabIndex = 6
Top = 240
Width = 495
End
End
Begin VB.CommandButton Command4
Caption = "自动输出试卷 到文件"
Height = 375
Index = 0
Left = -67080
TabIndex = 4
Top = 3600
Width = 2055
End
Begin VB.TextBox Text3
Height = 3735
Left = -72360
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 3
Top = 720
Width = 7935
End
Begin VB.TextBox Text1
BeginProperty Font
Name = "宋体"
Size = 72
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1575
Left = 8760
MaxLength = 3
TabIndex = 1
Top = 600
Width = 1455
End
Begin VB.Label Label13
Caption = "点击打开“试卷.txt”文件"
Height = 255
Left = -69960
TabIndex = 56
Top = 3000
Width = 2175
End
Begin VB.Shape Shape2
BackColor = &H00C00000&
BackStyle = 1 'Opaque
BorderColor = &H00C00000&
BorderStyle = 0 'Transparent
Height = 135
Left = -67260
Top = 4080
Width = 15
End
Begin VB.Label Label12
Caption = $"Form1.frx":1E1D
Height = 975
Left = -70200
TabIndex = 55
Top = 1080
Width = 5295
End
Begin VB.Label Label11
Caption = "说明:"
Height = 255
Left = -70200
TabIndex = 54
Top = 720
Width = 615
End
Begin VB.Label lblCompany
BackStyle = 0 'Transparent
Caption = "Iridescent Sky 2004 hz_jons@sina.com QQ:358750064 "
ForeColor = &H00404040&
Height = 255
Left = -69480
TabIndex = 43
Top = 4680
Width = 5055
End
Begin VB.Image Image1
Height = 315
Left = -69960
Picture = "Form1.frx":1F36
Stretch = -1 'True
Top = 4560
Width = 315
End
Begin VB.Label Label10
Caption = "历史答题记录"
Height = 255
Index = 1
Left = -72000
TabIndex = 40
Top = 480
Width = 1455
End
Begin VB.Label Label10
Caption = "上一次答题记录"
Height = 255
Index = 0
Left = -74760
TabIndex = 39
Top = 480
Width = 1455
End
Begin VB.Label Label4
AutoSize = -1 'True
Caption = "题"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 3
Left = 5400
TabIndex = 35
Top = 4440
Width = 285
End
Begin VB.Label Label4
AutoSize = -1 'True
Caption = "答错"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 2
Left = 4080
TabIndex = 34
Top = 4440
Width = 570
End
Begin VB.Label Label4
AutoSize = -1 'True
Caption = "题"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 1
Left = 5400
TabIndex = 33
Top = 3960
Width = 285
End
Begin VB.Label Label4
AutoSize = -1 'True
Caption = "共答"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 0
Left = 4080
TabIndex = 32
Top = 3960
Width = 570
End
Begin VB.Label Label3
AutoSize = -1 'True
Caption = "0"
BeginProperty Font
Name = "宋体"
Size = 21.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 435
Left = 4680
TabIndex = 31
Top = 4320
Width = 225
End
Begin VB.Label Label2
AutoSize = -1 'True
Caption = "0"
BeginProperty Font
Name = "宋体"
Size = 21.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 435
Left = 4680
TabIndex = 30
Top = 3840
Width = 225
End
Begin VB.Label Label9
Alignment = 2 'Center
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "00:00"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -