📄 form14.vb
字号:
Public Class Form14
Inherits System.Windows.Forms.Form
#Region " Windows 窗体设计器生成的代码 "
Public Sub New()
MyBase.New()
'该调用是 Windows 窗体设计器所必需的。
InitializeComponent()
'在 InitializeComponent() 调用之后添加任何初始化
End Sub
'窗体重写 dispose 以清理组件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Windows 窗体设计器所必需的
Private components As System.ComponentModel.IContainer
'注意: 以下过程是 Windows 窗体设计器所必需的
'可以使用 Windows 窗体设计器修改此过程。
'不要使用代码编辑器修改它。
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
Friend WithEvents TabPage1 As System.Windows.Forms.TabPage
Friend WithEvents RichTextBox1 As System.Windows.Forms.RichTextBox
Friend WithEvents TabPage2 As System.Windows.Forms.TabPage
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.TabControl1 = New System.Windows.Forms.TabControl
Me.TabPage1 = New System.Windows.Forms.TabPage
Me.RichTextBox1 = New System.Windows.Forms.RichTextBox
Me.TabPage2 = New System.Windows.Forms.TabPage
Me.TextBox1 = New System.Windows.Forms.TextBox
Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout()
Me.TabPage2.SuspendLayout()
Me.SuspendLayout()
'
'TabControl1
'
Me.TabControl1.Controls.Add(Me.TabPage1)
Me.TabControl1.Controls.Add(Me.TabPage2)
Me.TabControl1.Location = New System.Drawing.Point(7, 7)
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
Me.TabControl1.Size = New System.Drawing.Size(360, 223)
Me.TabControl1.TabIndex = 0
'
'TabPage1
'
Me.TabPage1.Controls.Add(Me.RichTextBox1)
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.Size = New System.Drawing.Size(352, 197)
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = "系统功能简介"
'
'RichTextBox1
'
Me.RichTextBox1.AutoSize = True
Me.RichTextBox1.BackColor = System.Drawing.SystemColors.Info
Me.RichTextBox1.ForeColor = System.Drawing.SystemColors.ActiveCaption
Me.RichTextBox1.Location = New System.Drawing.Point(0, 0)
Me.RichTextBox1.Name = "RichTextBox1"
Me.RichTextBox1.ReadOnly = True
Me.RichTextBox1.Size = New System.Drawing.Size(353, 201)
Me.RichTextBox1.TabIndex = 0
Me.RichTextBox1.Text = " 本系统为酒店管理系统,其设计针对对象为中小型酒店的管理特点设计而成,其有完善的功能特色,实现的功能有全面的信息输入设置、业务多方面查询、对敏感数据生成报表" & _
"便于查看、对数据进行详细的数据分析统计功能和强大的数据安全性实施方案(包括:多级权限的设置、数据备份和恢复设置、信息系统日志记录等功能)、提供辅助工具更加方便了" & _
"快速的数据处理效果和人性化的提示功能更使普通的软件操作员易于理解和操作,本系统考虑全面但终不免会有一些欠缺人意的地方,望大家指导!! 敬谢!"
Me.RichTextBox1.ZoomFactor = 1.199766!
'
'TabPage2
'
Me.TabPage2.Controls.Add(Me.TextBox1)
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.Size = New System.Drawing.Size(352, 197)
Me.TabPage2.TabIndex = 1
Me.TabPage2.Text = "系统运行环境"
'
'TextBox1
'
Me.TextBox1.BackColor = System.Drawing.SystemColors.Info
Me.TextBox1.Font = New System.Drawing.Font("SimSun", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TextBox1.ForeColor = System.Drawing.SystemColors.Highlight
Me.TextBox1.Location = New System.Drawing.Point(7, 7)
Me.TextBox1.Multiline = True
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.ReadOnly = True
Me.TextBox1.Size = New System.Drawing.Size(340, 186)
Me.TextBox1.TabIndex = 0
Me.TextBox1.Text = " 本系统测试可以运行于window2000以上操作系统,系统是后台支持数据库是sql server和前台的应用程序组成,系统采用的和数据库连接的登陆帐户统一" & _
"是sa密码是空,如您的后台数据库无次帐户请先添加,本系统虽然设计的还不够完善但是也是倾注了我不少的心血望不要它用紧供相互交流学习。"
'
'Form14
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.BackColor = System.Drawing.Color.LightSteelBlue
Me.ClientSize = New System.Drawing.Size(373, 235)
Me.Controls.Add(Me.TabControl1)
Me.MaximizeBox = False
Me.Name = "Form14"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "关于"
Me.TabControl1.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False)
Me.TabPage2.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
#End Region
End Class
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -