📄 frm_settings.frm
字号:
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form Frm_settings
BorderStyle = 1 'Fixed Single
Caption = "Administer settings"
ClientHeight = 3630
ClientLeft = 45
ClientTop = 330
ClientWidth = 7860
Icon = "Frm_settings.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MDIChild = -1 'True
MinButton = 0 'False
ScaleHeight = 3630
ScaleWidth = 7860
Begin VB.CommandButton cmd_finedel
Caption = "Delete fine"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 240
TabIndex = 18
ToolTipText = "Format Fine info. database"
Top = 3120
Width = 1455
End
Begin VB.CommandButton cmd_default
Caption = "Default"
Default = -1 'True
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 3000
TabIndex = 14
ToolTipText = "Set Default settings"
Top = 3120
Width = 1095
End
Begin VB.CommandButton cmd_apply
Caption = "Apply"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 6600
TabIndex = 17
ToolTipText = "Apply settings"
Top = 3120
Width = 1095
End
Begin VB.CommandButton cmd_cancel
Caption = "OK"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 5400
TabIndex = 16
ToolTipText = "Ok"
Top = 3120
Width = 1095
End
Begin VB.CommandButton cmd_Change
Caption = "Change"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 4200
TabIndex = 15
ToolTipText = "Click to modify"
Top = 3120
Width = 1095
End
Begin VB.TextBox Text5
Height = 285
Left = 12960
TabIndex = 21
Text = "Text5"
Top = 2280
Width = 1935
End
Begin TabDlg.SSTab SSTab1
Height = 2775
Left = 240
TabIndex = 20
Top = 240
Width = 7425
_ExtentX = 13097
_ExtentY = 4895
_Version = 393216
Tabs = 2
TabHeight = 538
TabMaxWidth = 2999
ForeColor = 8388608
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
TabCaption(0) = "Library"
TabPicture(0) = "Frm_settings.frx":24A2
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "Frame1"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Fra_mem"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).ControlCount= 2
TabCaption(1) = "Administrator"
TabPicture(1) = "Frm_settings.frx":24BE
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "cmd_deletea"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).Control(1)= "txt_welcome"
Tab(1).Control(1).Enabled= 0 'False
Tab(1).Control(2)= "txt_splash"
Tab(1).Control(2).Enabled= 0 'False
Tab(1).Control(3)= "fra_form"
Tab(1).Control(3).Enabled= 0 'False
Tab(1).Control(4)= "fra_pass"
Tab(1).Control(4).Enabled= 0 'False
Tab(1).Control(5)= "Label2"
Tab(1).Control(5).Enabled= 0 'False
Tab(1).Control(6)= "lbl_time"
Tab(1).Control(6).Enabled= 0 'False
Tab(1).Control(7)= "lbl_wl"
Tab(1).Control(7).Enabled= 0 'False
Tab(1).Control(8)= "lbl_spl"
Tab(1).Control(8).Enabled= 0 'False
Tab(1).ControlCount= 9
Begin VB.CommandButton cmd_deletea
Caption = "Delete All"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = -69600
MaskColor = &H8000000F&
TabIndex = 19
ToolTipText = "Format the Database"
Top = 2160
Width = 1575
End
Begin VB.TextBox txt_welcome
Height = 285
Left = -72240
Locked = -1 'True
TabIndex = 10
Top = 2160
Width = 1575
End
Begin VB.TextBox txt_splash
Height = 285
Left = -72240
Locked = -1 'True
TabIndex = 9
Top = 1800
Width = 1575
End
Begin VB.Frame fra_form
Caption = "Open form"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000040&
Height = 1455
Left = -69720
TabIndex = 35
Top = 480
Width = 1815
Begin VB.OptionButton opt_tl
Caption = "Top left"
Enabled = 0 'False
ForeColor = &H00800000&
Height = 255
Left = 240
TabIndex = 11
Top = 360
Width = 1455
End
Begin VB.OptionButton opt_ce
Caption = "Screen center"
Enabled = 0 'False
ForeColor = &H00800000&
Height = 255
Left = 240
TabIndex = 12
Top = 720
Width = 1455
End
Begin VB.OptionButton opt_def
Caption = "Default"
Enabled = 0 'False
ForeColor = &H00800000&
Height = 255
Left = 240
TabIndex = 13
Top = 1080
Width = 975
End
End
Begin VB.Frame fra_pass
Caption = "Password settings"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000040&
Height = 1215
Left = -74760
TabIndex = 32
Top = 480
Width = 4935
Begin VB.TextBox txt_pass1
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00400000&
Height = 285
IMEMode = 3 'DISABLE
Left = 1920
Locked = -1 'True
PasswordChar = "*"
TabIndex = 7
Top = 360
Width = 2775
End
Begin VB.TextBox txt_pass2
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00400000&
Height = 285
IMEMode = 3 'DISABLE
Left = 1920
Locked = -1 'True
PasswordChar = "*"
TabIndex = 8
Top = 720
Width = 2775
End
Begin VB.Label lbl_p1
Caption = "Password"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -