📄 set_dt.frm
字号:
VERSION 5.00
Object = "{FE0065C0-1B7B-11CF-9D53-00AA003C9CB6}#1.1#0"; "COMCT232.OCX"
Begin VB.Form set_dt
Caption = "调整日期,时间"
ClientHeight = 2970
ClientLeft = 4860
ClientTop = 2370
ClientWidth = 4230
ControlBox = 0 'False
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 2970
ScaleWidth = 4230
Begin VB.Timer Timer1
Interval = 1000
Left = 0
Top = 1785
End
Begin VB.CommandButton Command2
Cancel = -1 'True
Caption = "取消(&X)"
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 2730
TabIndex = 3
Top = 2520
Width = 975
End
Begin VB.CommandButton Command1
Caption = "确定(&O)"
Default = -1 'True
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 420
TabIndex = 2
Top = 2520
Width = 975
End
Begin VB.Frame Frame2
Caption = "时间:"
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2295
Left = 2160
TabIndex = 1
Top = 60
Width = 1695
Begin ComCtl2.UpDown UpDowns
Height = 375
Left = 1200
TabIndex = 19
Top = 450
Width = 270
_ExtentX = 476
_ExtentY = 661
_Version = 327681
Enabled = -1 'True
End
Begin VB.TextBox Textm
Alignment = 1 'Right Justify
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 720
TabIndex = 14
Text = "10"
Top = 1680
Width = 495
End
Begin VB.TextBox Textf
Alignment = 1 'Right Justify
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 720
TabIndex = 13
Text = "10"
Top = 1065
Width = 495
End
Begin VB.TextBox Texts
Alignment = 1 'Right Justify
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 720
TabIndex = 12
Text = "10"
Top = 450
Width = 495
End
Begin ComCtl2.UpDown UpDownf
Height = 375
Left = 1200
TabIndex = 20
Top = 1065
Width = 270
_ExtentX = 476
_ExtentY = 661
_Version = 327681
Enabled = -1 'True
End
Begin ComCtl2.UpDown UpDownm
Height = 375
Left = 1200
TabIndex = 21
Top = 1680
Width = 270
_ExtentX = 476
_ExtentY = 661
_Version = 327681
Enabled = -1 'True
End
Begin VB.Label Labmiao
Alignment = 1 'Right Justify
AutoSize = -1 'True
Caption = "秒:"
Height = 180
Left = 400
TabIndex = 11
Top = 1755
Width = 270
End
Begin VB.Label Labfen
Alignment = 1 'Right Justify
AutoSize = -1 'True
Caption = "分:"
Height = 180
Left = 400
TabIndex = 10
Top = 1140
Width = 270
End
Begin VB.Label Labshi
Alignment = 1 'Right Justify
AutoSize = -1 'True
Caption = "时:"
Height = 180
Left = 400
TabIndex = 9
Top = 525
Width = 270
End
End
Begin VB.Frame Frame1
Caption = "日期:"
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2295
Left = 180
TabIndex = 0
Top = 60
Width = 1695
Begin ComCtl2.UpDown UpDown1
Height = 375
Index = 0
Left = 1215
TabIndex = 16
Top = 450
Width = 270
_ExtentX = 476
_ExtentY = 661
_Version = 327681
Enabled = -1 'True
End
Begin ComCtl2.UpDown UpDown1
Height = 375
Index = 1
Left = 1210
TabIndex = 17
Top = 1065
Width = 270
_ExtentX = 476
_ExtentY = 661
_Version = 327681
Enabled = -1 'True
End
Begin ComCtl2.UpDown UpDown1
Height = 375
Index = 2
Left = 1210
TabIndex = 18
Top = 1680
Width = 270
_ExtentX = 476
_ExtentY = 661
_Version = 327681
Enabled = -1 'True
End
Begin VB.TextBox Comboyue
Alignment = 1 'Right Justify
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -