📄 frmnew.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0"; "RICHTX32.OCX"
Object = "{38911DA0-E448-11D0-84A3-00DD01104159}#1.1#0"; "COMCT332.OCX"
Begin VB.Form FrmNew
Caption = "New Message"
ClientHeight = 7170
ClientLeft = 60
ClientTop = 630
ClientWidth = 7995
Icon = "FrmNew.frx":0000
LinkTopic = "Form1"
ScaleHeight = 7170
ScaleWidth = 7995
StartUpPosition = 2 'CenterScreen
Begin VB.Timer Timer1
Interval = 1000
Left = 7200
Top = 1080
End
Begin MSComctlLib.ListView LVFiles
Height = 1455
Left = 0
TabIndex = 9
Top = 5640
Visible = 0 'False
Width = 6975
_ExtentX = 12303
_ExtentY = 2566
View = 3
Arrange = 1
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = -1 'True
HoverSelection = -1 'True
_Version = 393217
SmallIcons = "ImageList2"
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
NumItems = 0
End
Begin MSComctlLib.ImageList ImageList1
Left = 6720
Top = 480
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 25
ImageHeight = 25
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 7
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":068A
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":0ADE
Key = ""
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":3292
Key = ""
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":36E6
Key = ""
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":3B3A
Key = ""
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":3E56
Key = ""
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":42AA
Key = ""
EndProperty
EndProperty
End
Begin ComCtl3.CoolBar CoolBar1
Height = 525
Left = 0
TabIndex = 7
Top = 0
Width = 7575
_ExtentX = 13361
_ExtentY = 926
BandCount = 2
BandBorders = 0 'False
VariantHeight = 0 'False
_CBWidth = 7575
_CBHeight = 525
_Version = "6.0.8450"
Child1 = "Toolbar1"
MinHeight1 = 465
FixedBackground1= 0 'False
NewRow1 = 0 'False
AllowVertical1 = 0 'False
MinHeight2 = 360
NewRow2 = 0 'False
Begin MSComctlLib.Toolbar Toolbar1
Height = 465
Left = 165
TabIndex = 8
Top = 30
Width = 7185
_ExtentX = 12674
_ExtentY = 820
ButtonWidth = 2381
ButtonHeight = 820
Style = 1
TextAlignment = 1
ImageList = "ImageList1"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 4
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "&Send "
Description = "MnuNew"
Object.ToolTipText = "Send"
ImageIndex = 1
Style = 5
BeginProperty ButtonMenus {66833FEC-8583-11D1-B16A-00C0F0283628}
NumButtonMenus = 1
BeginProperty ButtonMenu1 {66833FEE-8583-11D1-B16A-00C0F0283628}
Text = "Send as an Email"
EndProperty
EndProperty
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "&Print "
Description = "MnuDel"
Object.ToolTipText = "Print"
ImageIndex = 2
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Caption = "&Reply "
Object.ToolTipText = "Reply"
ImageIndex = 3
EndProperty
EndProperty
End
End
Begin VB.TextBox Text1
Height = 285
Index = 1
Left = 1080
TabIndex = 0
Text = "Text1"
Top = 1320
Width = 6015
End
Begin VB.TextBox Text1
BackColor = &H00FFFFFF&
Height = 285
Index = 0
Left = 1080
TabIndex = 4
Text = "Text1"
Top = 960
Width = 6015
End
Begin VB.ComboBox Combo1
Height = 315
Left = 1080
Style = 2 'Dropdown List
TabIndex = 2
Top = 600
Width = 6015
End
Begin RichTextLib.RichTextBox RichTextBox1
Height = 3735
Left = 0
TabIndex = 1
Top = 1920
Width = 6975
_ExtentX = 12303
_ExtentY = 6588
_Version = 393217
Enabled = -1 'True
ScrollBars = 2
DisableNoScroll = -1 'True
AutoVerbMenu = -1 'True
TextRTF = $"FrmNew.frx":45C6
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin MSComctlLib.ImageList ImageList2
Left = 7320
Top = 480
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 2
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":46C0
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "FrmNew.frx":49DC
Key = ""
EndProperty
EndProperty
End
Begin VB.Label Label4
Alignment = 1 'Right Justify
Height = 255
Left = 4800
TabIndex = 10
Top = 1680
Width = 2295
End
Begin VB.Label Label3
Caption = "Subject:"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 6
Top = 1365
Width = 975
End
Begin VB.Label Label2
Caption = "From:"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -