📄 frmpeera.frm
字号:
TabIndex = 103
Top = 3240
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "11号台"
Height = 375
Index = 13
Left = 4800
TabIndex = 102
Top = 2760
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "10号台"
Height = 375
Index = 14
Left = 4800
TabIndex = 101
Top = 2280
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "9号台"
Height = 375
Index = 15
Left = 4800
TabIndex = 100
Top = 1800
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "8号台"
Height = 375
Index = 16
Left = 4800
TabIndex = 99
Top = 1320
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "7号台"
Height = 375
Index = 17
Left = 4800
TabIndex = 98
Top = 840
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "6号台"
Height = 375
Index = 18
Left = 1080
TabIndex = 97
Top = 3240
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "5号台"
Height = 375
Index = 19
Left = 1080
TabIndex = 96
Top = 2760
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "4号台"
Height = 375
Index = 20
Left = 1080
TabIndex = 95
Top = 2280
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "3号台"
Height = 375
Index = 21
Left = 1080
TabIndex = 94
Top = 1800
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "2号台"
Height = 375
Index = 22
Left = 1080
TabIndex = 93
Top = 1320
Width = 855
End
Begin VB.Label Label2
BackColor = &H00FFFF80&
BorderStyle = 1 'Fixed Single
Caption = "1号台"
Height = 375
Index = 23
Left = 1080
TabIndex = 92
Top = 840
Width = 855
End
End
Begin VB.Frame Frame6
Caption = "计时器"
BeginProperty Font
Name = "楷体_GB2312"
Size = 21.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 4815
Left = 10800
TabIndex = 57
Top = 4440
Width = 3735
Begin VB.CommandButton Command2
Caption = "取消计时"
BeginProperty Font
Name = "楷体_GB2312"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 360
TabIndex = 61
Top = 3960
Width = 1455
End
Begin VB.CommandButton cmdTStart
Caption = "计时启动"
BeginProperty Font
Name = "楷体_GB2312"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 2040
TabIndex = 59
Top = 3960
Width = 1455
End
Begin VB.Timer Timer2
Interval = 1000
Left = 360
Top = 3480
End
Begin VB.TextBox Text2
Alignment = 2 'Center
BackColor = &H00FFFF00&
BeginProperty Font
Name = "楷体_GB2312"
Size = 99.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 2415
Left = 600
MaxLength = 2
TabIndex = 58
Text = "60"
Top = 720
Width = 2535
End
Begin MediaPlayerCtl.MediaPlayer MediaPlayer2
Height = 375
Left = 960
TabIndex = 60
Top = 3480
Visible = 0 'False
Width = 495
AudioStream = -1
AutoSize = 0 'False
AutoStart = -1 'True
AnimationAtStart= -1 'True
AllowScan = -1 'True
AllowChangeDisplaySize= -1 'True
AutoRewind = 0 'False
Balance = 0
BaseURL = ""
BufferingTime = 5
CaptioningID = ""
ClickToPlay = -1 'True
CursorType = 0
CurrentPosition = -1
CurrentMarker = 0
DefaultFrame = ""
DisplayBackColor= 0
DisplayForeColor= 16777215
DisplayMode = 0
DisplaySize = 4
Enabled = -1 'True
EnableContextMenu= -1 'True
EnablePositionControls= -1 'True
EnableFullScreenControls= 0 'False
EnableTracker = -1 'True
Filename = "chimes.wav"
InvokeURLs = -1 'True
Language = -1
Mute = 0 'False
PlayCount = 1
PreviewMode = 0 'False
Rate = 1
SAMILang = ""
SAMIStyle = ""
SAMIFileName = ""
SelectionStart = -1
SelectionEnd = -1
SendOpenStateChangeEvents= -1 'True
SendWarningEvents= -1 'True
SendErrorEvents = -1 'True
SendKeyboardEvents= 0 'False
SendMouseClickEvents= 0 'False
SendMouseMoveEvents= 0 'False
SendPlayStateChangeEvents= -1 'True
ShowCaptioning = 0 'False
ShowControls = -1 'True
ShowAudioControls= -1 'True
ShowDisplay = 0 'False
ShowGotoBar = 0 'False
ShowPositionControls= -1 'True
ShowStatusBar = 0 'False
ShowTracker = -1 'True
TransparentAtStart= 0 'False
VideoBorderWidth= 0
VideoBorderColor= 0
VideoBorder3D = 0 'False
Volume = -600
WindowlessVideo = 0 'False
End
Begin VB.Line Line8
X1 = 3120
X2 = 3240
Y1 = 3120
Y2 = 3240
End
Begin VB.Line Line7
X1 = 600
X2 = 480
Y1 = 3120
Y2 = 3240
End
Begin VB.Line Line6
X1 = 3240
X2 = 3120
Y1 = 600
Y2 = 720
End
Begin VB.Line Line5
X1 = 480
X2 = 600
Y1 = 600
Y2 = 720
End
Begin VB.Shape Shape2
BorderWidth = 2
FillColor = &H00C0C000&
FillStyle = 0 'Solid
Height = 2895
Left = 360
Top = 480
Width = 3015
End
End
Begin VB.Frame Frame3
Caption = "抢答显示"
BeginProperty Font
Name = "楷体_GB2312"
Size = 21.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 4815
Left = 6600
TabIndex = 52
Top = 4440
Width = 3855
Begin VB.Frame Frame5
Caption = "抢答锁定时间设定"
BeginProperty Font
Name = "楷体_GB2312"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1215
Left = 480
TabIndex = 62
Top = 3480
Width = 1935
Begin VB.TextBox txtLockTime
BeginProperty Font
Name = "楷体_GB2312"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 345
Left = 240
TabIndex = 65
Text = "30"
Top = 360
Width = 615
End
Begin VB.CommandButton cmdLTPlus
Caption = "+"
BeginProperty Font
Name = "楷体_GB2312"
Size = 21.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 435
Left = 240
TabIndex = 64
Top = 720
Width = 375
End
Begin VB.CommandButton cmdLTDec
Caption = "-"
BeginProperty Font
Name = "楷体_GB2312"
Size = 21.75
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -