📄 frmmain.frm
字号:
VERSION 5.00
Begin VB.Form frmMain
BackColor = &H00FFFFFF&
BorderStyle = 1 'Fixed Single
ClientHeight = 7200
ClientLeft = 15
ClientTop = 15
ClientWidth = 9600
ControlBox = 0 'False
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 480
ScaleMode = 3 'Pixel
ScaleWidth = 640
StartUpPosition = 1 'CenterOwner
Begin VB.PictureBox mnuHelp
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 975
Left = 6720
ScaleHeight = 975
ScaleWidth = 2280
TabIndex = 17
Top = 3173
Visible = 0 'False
Width = 2280
Begin VB.Line Line4
BorderWidth = 3
X1 = 0
X2 = 0
Y1 = 0
Y2 = 2040
End
Begin VB.Label cmdHelpAbout
BackStyle = 0 'Transparent
Caption = "About"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 19
Top = 480
Width = 1335
End
Begin VB.Label cmdHelpContents
BackStyle = 0 'Transparent
Caption = "Contents"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 18
Top = 0
Width = 2055
End
End
Begin VB.PictureBox mnuInternet
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 2415
Left = 6720
ScaleHeight = 2415
ScaleWidth = 2895
TabIndex = 20
Top = 3893
Visible = 0 'False
Width = 2895
Begin VB.Label cmdInternetAmazon
BackStyle = 0 'Transparent
Caption = "Amazon.com"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 24
Top = 0
Width = 2535
End
Begin VB.Label cmdInternetChapters
BackStyle = 0 'Transparent
Caption = "Chapters.ca"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 23
Top = 1440
Width = 2175
End
Begin VB.Label cmdInternetBarnesandNoble
BackStyle = 0 'Transparent
Caption = "Barnes and Noble"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 1215
Left = 120
TabIndex = 22
Top = 480
Width = 2655
End
Begin VB.Label cmdInternetYahoo
BackStyle = 0 'Transparent
Caption = "Yahoo! Canada"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 21
Top = 1920
Width = 2175
End
Begin VB.Line Line5
BorderWidth = 3
X1 = 0
X2 = 0
Y1 = 0
Y2 = 2640
End
End
Begin VB.PictureBox mnuAdmin
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 1935
Left = 6720
ScaleHeight = 1935
ScaleWidth = 1935
TabIndex = 6
Top = 1493
Visible = 0 'False
Width = 1935
Begin VB.Line Line1
BorderWidth = 3
X1 = 0
X2 = 0
Y1 = 0
Y2 = 2640
End
Begin VB.Label cmdAdminSettings
BackStyle = 0 'Transparent
Caption = "Settings"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 10
Top = 1440
Width = 1815
End
Begin VB.Label cmdAdminReports
BackStyle = 0 'Transparent
Caption = "Reports"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 9
Top = 960
Width = 1575
End
Begin VB.Label cmdAdminPatrons
BackStyle = 0 'Transparent
Caption = "Patrons"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 8
Top = 480
Width = 1215
End
Begin VB.Label cmdAdminBooks
BackStyle = 0 'Transparent
Caption = "Books"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 7
Top = 0
Width = 1095
End
End
Begin VB.PictureBox mnuBrowse
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 975
Left = 6720
ScaleHeight = 975
ScaleWidth = 2295
TabIndex = 11
Top = 2093
Visible = 0 'False
Width = 2295
Begin VB.Label cmdBrowseBooks
BackStyle = 0 'Transparent
Caption = "Books"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 13
Top = 0
Width = 1335
End
Begin VB.Label cmdBrowsePatrons
BackStyle = 0 'Transparent
Caption = "Patrons"
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 120
TabIndex = 12
Top = 480
Width = 2055
End
Begin VB.Line Line2
BorderWidth = 3
X1 = 0
X2 = 0
Y1 = 0
Y2 = 2040
End
End
Begin VB.PictureBox mnuCirc
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 0 'None
BeginProperty Font
Name = "Times New Roman"
Size = 21.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 1455
Left = 6720
ScaleHeight = 1455
ScaleWidth = 2295
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -