📄 calendar.frm
字号:
Index = 14
Left = 60
Picture = "Calendar.frx":1CB1A
Top = 2130
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 13
Left = 4455
Picture = "Calendar.frx":1DBFE
Top = 1710
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 12
Left = 3720
Picture = "Calendar.frx":1ECE2
Top = 1710
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 11
Left = 2985
Picture = "Calendar.frx":1FDC6
Top = 1710
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 10
Left = 2250
Picture = "Calendar.frx":20EAA
Top = 1710
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 9
Left = 1515
Picture = "Calendar.frx":21F8E
Top = 1710
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 8
Left = 795
Picture = "Calendar.frx":23072
Top = 1710
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 7
Left = 60
Picture = "Calendar.frx":24156
Top = 1710
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 6
Left = 4455
Picture = "Calendar.frx":2523A
Top = 1290
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 4
Left = 2985
Picture = "Calendar.frx":2631E
Top = 1290
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 3
Left = 2250
Picture = "Calendar.frx":27402
Top = 1290
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 2
Left = 1515
Picture = "Calendar.frx":284E6
Top = 1290
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 1
Left = 795
Picture = "Calendar.frx":295CA
Top = 1290
Width = 750
End
Begin VB.Image ImagePress
Height = 420
Index = 0
Left = 60
Picture = "Calendar.frx":2A6AE
Top = 1290
Width = 750
End
Begin VB.Label Display
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "一九九九 四 月"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00400000&
Height = 240
Left = 3360
TabIndex = 11
Top = 330
Width = 1680
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "月"
BeginProperty Font
Name = "隶书"
Size = 18
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00400000&
Height = 360
Index = 1
Left = 2700
TabIndex = 10
Top = 225
Width = 390
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "年"
BeginProperty Font
Name = "隶书"
Size = 18
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00400000&
Height = 360
Index = 0
Left = 1230
TabIndex = 7
Top = 225
Width = 390
End
Begin VB.Line Line1
Index = 6
X1 = 60
X2 = 5190
Y1 = 3810
Y2 = 3810
End
Begin VB.Line Line2
BorderColor = &H00FFFFFF&
Index = 6
X1 = 60
X2 = 5220
Y1 = 3825
Y2 = 3825
End
Begin VB.Line Line1
Index = 5
X1 = 90
X2 = 5190
Y1 = 2970
Y2 = 2970
End
Begin VB.Line Line2
BorderColor = &H00FFFFFF&
Index = 5
X1 = 90
X2 = 5190
Y1 = 2985
Y2 = 2985
End
Begin VB.Line Line1
Index = 4
X1 = 90
X2 = 5190
Y1 = 2565
Y2 = 2565
End
Begin VB.Line Line2
BorderColor = &H00FFFFFF&
Index = 4
X1 = 90
X2 = 5190
Y1 = 2580
Y2 = 2580
End
Begin VB.Line Line1
Index = 3
X1 = 90
X2 = 5190
Y1 = 2145
Y2 = 2145
End
Begin VB.Line Line2
BorderColor = &H00FFFFFF&
Index = 3
X1 = 90
X2 = 5190
Y1 = 2160
Y2 = 2160
End
Begin VB.Line Line1
Index = 2
X1 = 90
X2 = 5190
Y1 = 1710
Y2 = 1710
End
Begin VB.Line Line2
BorderColor = &H00FFFFFF&
Index = 2
X1 = 90
X2 = 5190
Y1 = 1725
Y2 = 1725
End
Begin VB.Line Line1
Index = 1
X1 = 90
X2 = 5190
Y1 = 1290
Y2 = 1290
End
Begin VB.Line Line2
BorderColor = &H00FFFFFF&
Index = 1
X1 = 90
X2 = 5190
Y1 = 1305
Y2 = 1305
End
Begin VB.Line Line3
Index = 7
X1 = 4455
X2 = 4455
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line4
BorderColor = &H00FFFFFF&
Index = 7
X1 = 4470
X2 = 4470
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line3
Index = 6
X1 = 3720
X2 = 3720
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line4
BorderColor = &H00FFFFFF&
Index = 6
X1 = 3735
X2 = 3735
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line3
Index = 5
X1 = 2985
X2 = 2985
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line4
BorderColor = &H00FFFFFF&
Index = 5
X1 = 3000
X2 = 3000
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line3
Index = 4
X1 = 2250
X2 = 2250
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line4
BorderColor = &H00FFFFFF&
Index = 4
X1 = 2265
X2 = 2265
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line3
Index = 3
X1 = 5190
X2 = 5190
Y1 = 840
Y2 = 3825
End
Begin VB.Line Line4
BorderColor = &H00FFFFFF&
Index = 3
X1 = 5205
X2 = 5205
Y1 = 840
Y2 = 3825
End
Begin VB.Line Line3
Index = 2
X1 = 1515
X2 = 1515
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line4
BorderColor = &H00FFFFFF&
Index = 2
X1 = 1530
X2 = 1530
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line3
Index = 1
X1 = 795
X2 = 795
Y1 = 855
Y2 = 3785
End
Begin VB.Line Line4
BorderColor = &H00FFFFFF&
Index = 1
X1 = 810
X2 = 810
Y1 = 855
Y2 = 3785
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "星期六"
Height = 180
Index = 6
Left = 4560
TabIndex = 6
Top = 1005
Width = 540
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "星期五"
Height = 180
Index = 5
Left = 3825
TabIndex = 5
Top = 1005
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -