form1.frm
来自「我自己编写和收集一些主要的VB的能实现的功能都基本集合在一起了」· FRM 代码 · 共 114 行
FRM
114 行
VERSION 5.00
Begin VB.Form Form1
BorderStyle = 3 'Fixed Dialog
Caption = "复选框的外观风格"
ClientHeight = 2865
ClientLeft = 45
ClientTop = 330
ClientWidth = 6495
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 2865
ScaleWidth = 6495
ShowInTaskbar = 0 'False
StartUpPosition = 3 '窗口缺省
Begin VB.Frame Frame3
Caption = "已装入图形的图形风格复选框"
Height = 1455
Left = 3360
TabIndex = 5
Top = 1200
Width = 2895
Begin VB.CheckBox Check7
Caption = "Check7"
Height = 855
Left = 1560
Picture = "Form1.frx":0000
Style = 1 'Graphical
TabIndex = 9
Top = 360
Value = 1 'Checked
Width = 1095
End
Begin VB.CheckBox Check6
Caption = "Check6"
Height = 855
Left = 240
Picture = "Form1.frx":01BB
Style = 1 'Graphical
TabIndex = 8
Top = 360
Width = 1095
End
End
Begin VB.Frame Frame2
Caption = "未装图形的图形风格复选框"
Height = 1455
Left = 240
TabIndex = 4
Top = 1200
Width = 2895
Begin VB.CheckBox Check5
Caption = "Check5"
Height = 855
Left = 1560
Style = 1 'Graphical
TabIndex = 7
Top = 360
Value = 1 'Checked
Width = 1095
End
Begin VB.CheckBox Check4
Caption = "Check4"
Height = 855
Left = 240
Style = 1 'Graphical
TabIndex = 6
Top = 360
Width = 1095
End
End
Begin VB.Frame Frame1
Caption = "处于不同状态的标准复选框"
Height = 855
Left = 240
TabIndex = 0
Top = 120
Width = 6015
Begin VB.CheckBox Check3
Caption = "Check3"
Height = 255
Left = 4200
TabIndex = 3
Top = 360
Value = 2 'Grayed
Width = 1335
End
Begin VB.CheckBox Check2
Caption = "Check2"
Height = 255
Left = 2280
TabIndex = 2
Top = 360
Value = 1 'Checked
Width = 1335
End
Begin VB.CheckBox Check1
Caption = "Check1"
Height = 255
Left = 240
TabIndex = 1
Top = 360
Width = 1215
End
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?