界面如图

详细代码
Public Class Form4
Inherits System.Windows.Forms.Form
'广州荣士电子有限公司,联系电话020-82318861,82322852,定制13826029618 网址http://www.icmcu.com
#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 Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents Label7 As System.Windows.Forms.Label
Friend WithEvents Label8 As System.Windows.Forms.Label
Friend WithEvents Label9 As System.Windows.Forms.Label
Friend WithEvents Label10 As System.Windows.Forms.Label
Friend WithEvents Label11 As System.Windows.Forms.Label
Friend WithEvents Label12 As System.Windows.Forms.Label
Friend WithEvents Label13 As System.Windows.Forms.Label
Friend WithEvents Label14 As System.Windows.Forms.Label
Friend WithEvents Label15 As System.Windows.Forms.Label
Friend WithEvents Label16 As System.Windows.Forms.Label
Friend WithEvents Label17 As System.Windows.Forms.Label
Friend WithEvents Label18 As System.Windows.Forms.Label
Friend WithEvents Label19 As System.Windows.Forms.Label
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
Friend WithEvents TextBox3 As System.Windows.Forms.TextBox
Friend WithEvents TextBox4 As System.Windows.Forms.TextBox
Friend WithEvents TextBox5 As System.Windows.Forms.TextBox
Friend WithEvents TextBox6 As System.Windows.Forms.TextBox
Friend WithEvents TextBox7 As System.Windows.Forms.TextBox
Friend WithEvents TextBox8 As System.Windows.Forms.TextBox
Friend WithEvents TextBox9 As System.Windows.Forms.TextBox
Friend WithEvents TextBox10 As System.Windows.Forms.TextBox
Friend WithEvents TextBox11 As System.Windows.Forms.TextBox
Friend WithEvents TextBox12 As System.Windows.Forms.TextBox
Friend WithEvents TextBox13 As System.Windows.Forms.TextBox
Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog
Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox2 As System.Windows.Forms.CheckBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents Button3 As System.Windows.Forms.Button
Friend WithEvents Button4 As System.Windows.Forms.Button
Friend WithEvents Button5 As System.Windows.Forms.Button
Friend WithEvents DriveListBox1 As Microsoft.VisualBasic.Compatibility.VB6.DriveListBox
Friend WithEvents CheckBox3 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox4 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox5 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox6 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox7 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox8 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox9 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox10 As System.Windows.Forms.CheckBox
Friend WithEvents TextBox14 As System.Windows.Forms.TextBox
Friend WithEvents TextBox15 As System.Windows.Forms.TextBox
Friend WithEvents TextBox16 As System.Windows.Forms.TextBox
Friend WithEvents TextBox17 As System.Windows.Forms.TextBox
Friend WithEvents TextBox18 As System.Windows.Forms.TextBox
Friend WithEvents TextBox19 As System.Windows.Forms.TextBox
Friend WithEvents TextBox20 As System.Windows.Forms.TextBox
Friend WithEvents TextBox21 As System.Windows.Forms.TextBox
Friend WithEvents TextBox22 As System.Windows.Forms.TextBox
Friend WithEvents TextBox23 As System.Windows.Forms.TextBox
Friend WithEvents TextBox24 As System.Windows.Forms.TextBox
Friend WithEvents TextBox25 As System.Windows.Forms.TextBox
Friend WithEvents TextBox26 As System.Windows.Forms.TextBox
Friend WithEvents TextBox27 As System.Windows.Forms.TextBox
Friend WithEvents Label20 As System.Windows.Forms.Label
Friend WithEvents Label21 As System.Windows.Forms.Label
Friend WithEvents Label22 As System.Windows.Forms.Label
Friend WithEvents Label23 As System.Windows.Forms.Label
Friend WithEvents Label24 As System.Windows.Forms.Label
Friend WithEvents Label25 As System.Windows.Forms.Label
Friend WithEvents Label26 As System.Windows.Forms.Label
Friend WithEvents Label27 As System.Windows.Forms.Label
Friend WithEvents Label28 As System.Windows.Forms.Label
Friend WithEvents Label29 As System.Windows.Forms.Label
Friend WithEvents Label30 As System.Windows.Forms.Label
Friend WithEvents Label31 As System.Windows.Forms.Label
Friend WithEvents Label32 As System.Windows.Forms.Label
Friend WithEvents Label33 As System.Windows.Forms.Label
Friend WithEvents Label34 As System.Windows.Forms.Label
Friend WithEvents TextBox28 As System.Windows.Forms.TextBox
Friend WithEvents TextBox29 As System.Windows.Forms.TextBox
Friend WithEvents TextBox30 As System.Windows.Forms.TextBox
Friend WithEvents TextBox31 As System.Windows.Forms.TextBox
Friend WithEvents Label35 As System.Windows.Forms.Label
Friend WithEvents Label36 As System.Windows.Forms.Label
Friend WithEvents Label37 As System.Windows.Forms.Label
Friend WithEvents Label38 As System.Windows.Forms.Label
Friend WithEvents TextBox32 As System.Windows.Forms.TextBox
Friend WithEvents TextBox33 As System.Windows.Forms.TextBox
Friend WithEvents TextBox34 As System.Windows.Forms.TextBox
Friend WithEvents TextBox35 As System.Windows.Forms.TextBox
Friend WithEvents Label39 As System.Windows.Forms.Label
Friend WithEvents Label40 As System.Windows.Forms.Label
Friend WithEvents Label41 As System.Windows.Forms.Label
Friend WithEvents Label42 As System.Windows.Forms.Label
Friend WithEvents Label43 As System.Windows.Forms.Label
Friend WithEvents Label44 As System.Windows.Forms.Label
Friend WithEvents Label45 As System.Windows.Forms.Label
Friend WithEvents TextBox36 As System.Windows.Forms.TextBox
Friend WithEvents TextBox37 As System.Windows.Forms.TextBox
Friend WithEvents TextBox38 As System.Windows.Forms.TextBox
Friend WithEvents TextBox39 As System.Windows.Forms.TextBox
Friend WithEvents TextBox40 As System.Windows.Forms.TextBox
Friend WithEvents TextBox41 As System.Windows.Forms.TextBox
Friend WithEvents TextBox42 As System.Windows.Forms.TextBox
Friend WithEvents TextBox43 As System.Windows.Forms.TextBox
Friend WithEvents TextBox44 As System.Windows.Forms.TextBox
Friend WithEvents Label46 As System.Windows.Forms.Label
Friend WithEvents Label47 As System.Windows.Forms.Label
Friend WithEvents Label48 As System.Windows.Forms.Label
Friend WithEvents Label49 As System.Windows.Forms.Label
Friend WithEvents Label50 As System.Windows.Forms.Label
Friend WithEvents Label51 As System.Windows.Forms.Label
Friend WithEvents Label52 As System.Windows.Forms.Label
Friend WithEvents Label53 As System.Windows.Forms.Label
Friend WithEvents Label54 As System.Windows.Forms.Label
Friend WithEvents TextBox45 As System.Windows.Forms.TextBox
Friend WithEvents TextBox46 As System.Windows.Forms.TextBox
Friend WithEvents TextBox47 As System.Windows.Forms.TextBox
Friend WithEvents TextBox48 As System.Windows.Forms.TextBox
Friend WithEvents TextBox49 As System.Windows.Forms.TextBox
Friend WithEvents TextBox50 As System.Windows.Forms.TextBox
Friend WithEvents TextBox51 As System.Windows.Forms.TextBox
Friend WithEvents Label55 As System.Windows.Forms.Label
Friend WithEvents Label56 As System.Windows.Forms.Label
Friend WithEvents Label57 As System.Windows.Forms.Label
Friend WithEvents Label58 As System.Windows.Forms.Label
Friend WithEvents Label59 As System.Windows.Forms.Label
Friend WithEvents Label60 As System.Windows.Forms.Label
Friend WithEvents Label61 As System.Windows.Forms.Label
Friend WithEvents TextBox52 As System.Windows.Forms.TextBox
Friend WithEvents TextBox53 As System.Windows.Forms.TextBox
Friend WithEvents TextBox54 As System.Windows.Forms.TextBox
Friend WithEvents TextBox55 As System.Windows.Forms.TextBox
Friend WithEvents TextBox56 As System.Windows.Forms.TextBox
Friend WithEvents TextBox57 As System.Windows.Forms.TextBox
Friend WithEvents TextBox58 As System.Windows.Forms.TextBox
Friend WithEvents TextBox59 As System.Windows.Forms.TextBox
Friend WithEvents Label62 As System.Windows.Forms.Label
Friend WithEvents Label63 As System.Windows.Forms.Label
Friend WithEvents Label64 As System.Windows.Forms.Label
Friend WithEvents Label65 As System.Windows.Forms.Label
Friend WithEvents Label66 As System.Windows.Forms.Label
Friend WithEvents Label67 As System.Windows.Forms.Label
Friend WithEvents Label68 As System.Windows.Forms.Label
Friend WithEvents Label69 As System.Windows.Forms.Label
Friend WithEvents TextBox60 As System.Windows.Forms.TextBox
Friend WithEvents TextBox61 As System.Windows.Forms.TextBox
Friend WithEvents TextBox62 As System.Windows.Forms.TextBox
Friend WithEvents TextBox63 As System.Windows.Forms.TextBox
Friend WithEvents TextBox64 As System.Windows.Forms.TextBox
Friend WithEvents TextBox65 As System.Windows.Forms.TextBox
Friend WithEvents TextBox66 As System.Windows.Forms.TextBox
Friend WithEvents TextBox67 As System.Windows.Forms.TextBox
Friend WithEvents TextBox68 As System.Windows.Forms.TextBox
Friend WithEvents Label70 As System.Windows.Forms.Label
Friend WithEvents Label75 As System.Windows.Forms.Label
Friend WithEvents Label76 As System.Windows.Forms.Label
Friend WithEvents Label77 As System.Windows.Forms.Label
Friend WithEvents Label78 As System.Windows.Forms.Label
Friend WithEvents Label79 As System.Windows.Forms.Label
Friend WithEvents Label80 As System.Windows.Forms.Label
Friend WithEvents Label81 As System.Windows.Forms.Label
Friend WithEvents Label82 As System.Windows.Forms.Label
Friend WithEvents Label83 As System.Windows.Forms.Label
Friend WithEvents TextBox69 As System.Windows.Forms.TextBox
Friend WithEvents TextBox70 As System.Windows.Forms.TextBox
Friend WithEvents TextBox71 As System.Windows.Forms.TextBox
Friend WithEvents TextBox72 As System.Windows.Forms.TextBox
Friend WithEvents TextBox73 As System.Windows.Forms.TextBox
Friend WithEvents TextBox74 As System.Windows.Forms.TextBox
Friend WithEvents TextBox75 As System.Windows.Forms.TextBox
Friend WithEvents TextBox76 As System.Windows.Forms.TextBox
Friend WithEvents TextBox77 As System.Windows.Forms.TextBox
Friend WithEvents Button6 As System.Windows.Forms.Button
Friend WithEvents DriveListBox2 As Microsoft.VisualBasic.Compatibility.VB6.DriveListBox
Friend WithEvents Button7 As System.Windows.Forms.Button
Friend WithEvents Button8 As System.Windows.Forms.Button
Friend WithEvents Button9 As System.Windows.Forms.Button
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.Label1 = New System.Windows.Forms.Label
Me.Label2 = New System.Windows.Forms.Label
Me.Label3 = New System.Windows.Forms.Label
Me.Label4 = New System.Windows.Forms.Label
Me.Label5 = New System.Windows.Forms.Label
Me.Label6 = New System.Windows.Forms.Label
Me.Label7 = New System.Windows.Forms.Label
Me.Label8 = New System.Windows.Forms.Label
Me.Label9 = New System.Windows.Forms.Label
Me.Label10 = New System.Windows.Forms.Label
Me.Label11 = New System.Windows.Forms.Label
Me.Label12 = New System.Windows.Forms.Label
Me.Label13 = New System.Windows.Forms.Label
Me.Label14 = New System.Windows.Forms.Label
Me.Label15 = New System.Windows.Forms.Label
Me.Label16 = New System.Windows.Forms.Label
Me.Label17 = New System.Windows.Forms.Label
Me.Label18 = New System.Windows.Forms.Label
Me.Label19 = New System.Windows.Forms.Label
Me.TextBox1 = New System.Windows.Forms.TextBox
Me.TextBox2 = New System.Windows.Forms.TextBox
Me.TextBox3 = New System.Windows.Forms.TextBox
Me.TextBox4 = New System.Windows.Forms.TextBox
Me.TextBox5 = New System.Windows.Forms.TextBox
Me.TextBox6 = New System.Windows.Forms.TextBox
Me.TextBox7 = New System.Windows.Forms.TextBox
Me.TextBox8 = New System.Windows.Forms.TextBox
Me.TextBox9 = New System.Windows.Forms.TextBox
Me.TextBox10 = New System.Windows.Forms.TextBox
Me.TextBox11 = New System.Windows.Forms.TextBox
Me.TextBox12 = New System.Windows.Forms.TextBox
Me.TextBox13 = New System.Windows.Forms.TextBox
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog
Me.CheckBox1 = New System.Windows.Forms.CheckBox
Me.CheckBox2 = New System.Windows.Forms.CheckBox
Me.Button1 = New System.Windows.Forms.Button
Me.Button2 = New System.Windows.Forms.Button
Me.Button3 = New System.Windows.Forms.Button
Me.Button4 = New System.Windows.Forms.Button
Me.Button5 = New System.Windows.Forms.Button
Me.DriveListBox1 = New Microsoft.VisualBasic.Compatibility.VB6.DriveListBox
Me.CheckBox3 = New System.Windows.Forms.CheckBox
Me.CheckBox4 = New System.Windows.Forms.CheckBox
Me.CheckBox5 = New System.Windows.Forms.CheckBox
Me.CheckBox6 = New System.Windows.Forms.CheckBox
Me.CheckBox7 = New System.Windows.Forms.CheckBox
Me.CheckBox8 = New System.Windows.Forms.CheckBox
Me.CheckBox9 = New System.Windows.Forms.CheckBox
Me.CheckBox10 = New System.Windows.Forms.CheckBox
Me.TextBox14 = New System.Windows.Forms.TextBox
Me.TextBox15 = New System.Windows.Forms.TextBox
Me.TextBox16 = New System.Windows.Forms.TextBox
Me.TextBox17 = New System.Windows.Forms.TextBox
Me.TextBox18 = New System.Windows.Forms.TextBox
Me.TextBox19 = New System.Windows.Forms.TextBox
Me.TextBox20 = New System.Windows.Forms.TextBox
Me.TextBox21 = New System.Windows.Forms.TextBox
Me.TextBox22 = New System.Windows.Forms.TextBox
Me.TextBox23 = New System.Windows.Forms.TextBox
Me.TextBox24 = New System.Windows.Forms.TextBox
Me.TextBox25 = New System.Windows.Forms.TextBox
Me.TextBox26 = New System.Windows.Forms.TextBox
Me.TextBox27 = New System.Windows.Forms.TextBox
Me.Label20 = New System.Windows.Forms.Label
Me.Label21 = New System.Windows.Forms.Label
Me.Label22 = New System.Windows.Forms.Label
Me.Label23 = New System.Windows.Forms.Label
Me.Label24 = New System.Windows.Forms.Label
Me.Label25 = New System.Windows.Forms.Label
Me.Label26 = New System.Windows.Forms.Label
Me.Label27 = New System.Windows.Forms.Label
Me.Label28 = New System.Windows.Forms.Label
Me.Label29 = New System.Windows.Forms.Label
Me.Label30 = New System.Windows.Forms.Label
Me.Label31 = New System.Windows.Forms.Label
Me.Label32 = New System.Windows.Forms.Label
Me.Label33 = New System.Windows.Forms.Label
Me.Label34 = New System.Windows.Forms.Label
Me.TextBox28 = New System.Windows.Forms.TextBox
Me.TextBox29 = New System.Windows.Forms.TextBox
Me.TextBox30 = New System.Windows.Forms.TextBox
Me.TextBox31 = New System.Windows.Forms.TextBox
Me.Label35 = New System.Windows.Forms.Label
Me.Label36 = New System.Windows.Forms.Label
Me.Label37 = New System.Windows.Forms.Label
Me.Label38 = New System.Windows.Forms.Label
Me.TextBox32 = New System.Windows.Forms.TextBox
Me.TextBox33 = New System.Windows.Forms.TextBox
Me.TextBox34 = New System.Windows.Forms.TextBox
Me.TextBox35 = New System.Windows.Forms.TextBox
Me.Label39 = New System.Windows.Forms.Label
Me.Label40 = New System.Windows.Forms.Label
Me.Label41 = New System.Windows.Forms.Label
Me.Label42 = New System.Windows.Forms.Label
Me.Label43 = New System.Windows.Forms.Label
Me.Label44 = New System.Windows.Forms.Label
Me.Label45 = New System.Windows.Forms.Label
Me.TextBox36 = New System.Windows.Forms.TextBox
Me.TextBox37 = New System.Windows.Forms.TextBox
Me.TextBox38 = New System.Windows.Forms.TextBox
Me.TextBox39 = New System.Windows.Forms.TextBox
Me.TextBox40 = New System.Windows.Forms.TextBox
Me.TextBox41 = New System.Windows.Forms.TextBox
Me.TextBox42 = New System.Windows.Forms.TextBox
Me.TextBox43 = New System.Windows.Forms.TextBox
Me.TextBox44 = New System.Windows.Forms.TextBox
Me.Label46 = New System.Windows.Forms.Label
Me.Label47 = New System.Windows.Forms.Label
Me.Label48 = New System.Windows.Forms.Label
Me.Label49 = New System.Windows.Forms.Label
Me.Label50 = New System.Windows.Forms.Label
Me.Label51 = New System.Windows.Forms.Label
Me.Label52 = New System.Windows.Forms.Label
Me.Label53 = New System.Windows.Forms.Label
Me.Label54 = New System.Windows.Forms.Label
Me.TextBox45 = New System.Windows.Forms.TextBox
Me.TextBox46 = New System.Windows.Forms.TextBox
Me.TextBox47 = New System.Windows.Forms.TextBox
Me.TextBox48 = New System.Windows.Forms.TextBox
Me.TextBox49 = New System.Windows.Forms.TextBox
Me.TextBox50 = New System.Windows.Forms.TextBox
Me.TextBox51 = New System.Windows.Forms.TextBox
Me.Label55 = New System.Windows.Forms.Label
Me.Label56 = New System.Windows.Forms.Label
Me.Label57 = New System.Windows.Forms.Label
Me.Label58 = New System.Windows.Forms.Label
Me.Label59 = New System.Windows.Forms.Label
Me.Label60 = New System.Windows.Forms.Label
Me.Label61 = New System.Windows.Forms.Label
Me.TextBox52 = New System.Windows.Forms.TextBox
Me.TextBox53 = New System.Windows.Forms.TextBox
Me.TextBox54 = New System.Windows.Forms.TextBox
Me.TextBox55 = New System.Windows.Forms.TextBox
Me.TextBox56 = New System.Windows.Forms.TextBox
Me.TextBox57 = New System.Windows.Forms.TextBox
Me.TextBox58 = New System.Windows.Forms.TextBox
Me.TextBox59 = New System.Windows.Forms.TextBox
Me.Label62 = New System.Windows.Forms.Label
Me.Label63 = New System.Windows.Forms.Label
Me.Label64 = New System.Windows.Forms.Label
Me.Label65 = New System.Windows.Forms.Label
Me.Label66 = New System.Windows.Forms.Label
Me.Label67 = New System.Windows.Forms.Label
Me.Label68 = New System.Windows.Forms.Label
Me.Label69 = New System.Windows.Forms.Label
Me.TextBox60 = New System.Windows.Forms.TextBox
Me.TextBox61 = New System.Windows.Forms.TextBox
Me.TextBox62 = New System.Windows.Forms.TextBox
Me.TextBox63 = New System.Windows.Forms.TextBox
Me.TextBox64 = New System.Windows.Forms.TextBox
Me.TextBox65 = New System.Windows.Forms.TextBox
Me.TextBox66 = New System.Windows.Forms.TextBox
Me.TextBox67 = New System.Windows.Forms.TextBox
Me.TextBox68 = New System.Windows.Forms.TextBox
Me.Label70 = New System.Windows.Forms.Label
Me.Label75 = New System.Windows.Forms.Label
Me.Label76 = New System.Windows.Forms.Label
Me.Label77 = New System.Windows.Forms.Label
Me.Label78 = New System.Windows.Forms.Label
Me.Label79 = New System.Windows.Forms.Label
Me.Label80 = New System.Windows.Forms.Label
Me.Label81 = New System.Windows.Forms.Label
Me.Label82 = New System.Windows.Forms.Label
Me.Label83 = New System.Windows.Forms.Label
Me.TextBox69 = New System.Windows.Forms.TextBox
Me.TextBox70 = New System.Windows.Forms.TextBox
Me.TextBox71 = New System.Windows.Forms.TextBox
Me.TextBox72 = New System.Windows.Forms.TextBox
Me.TextBox73 = New System.Windows.Forms.TextBox
Me.TextBox74 = New System.Windows.Forms.TextBox
Me.TextBox75 = New System.Windows.Forms.TextBox
Me.TextBox76 = New System.Windows.Forms.TextBox
Me.TextBox77 = New System.Windows.Forms.TextBox
Me.Button6 = New System.Windows.Forms.Button
Me.DriveListBox2 = New Microsoft.VisualBasic.Compatibility.VB6.DriveListBox
Me.Button7 = New System.Windows.Forms.Button
Me.Button8 = New System.Windows.Forms.Button
Me.Button9 = New System.Windows.Forms.Button
Me.SuspendLayout()
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(16, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(56, 23)
Me.Label1.TabIndex = 0
Me.Label1.Text = "开机文字"
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(16, 40)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(56, 23)
Me.Label2.TabIndex = 1
Me.Label2.Text = "logo图片"
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(16, 64)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(80, 23)
Me.Label3.TabIndex = 2
Me.Label3.Text = "咨询热线图片"
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(16, 104)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(72, 23)
Me.Label4.TabIndex = 3
Me.Label4.Text = "管理员密码"
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(16, 136)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(64, 24)
Me.Label5.TabIndex = 4
Me.Label5.Text = "单位代码"
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(168, 280)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(80, 16)
Me.Label6.TabIndex = 5
Me.Label6.Text = "晚餐起止时间"
'
'Label7
'
Me.Label7.Location = New System.Drawing.Point(168, 304)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(80, 23)
Me.Label7.TabIndex = 6
Me.Label7.Text = "夜宵起止时间"
'
'Label8
'
Me.Label8.Location = New System.Drawing.Point(216, 176)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(120, 23)
Me.Label8.TabIndex = 7
Me.Label8.Text = "键盘输入最高限额"
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(216, 200)
Me.Label9.Name = "Label9"
Me.Label9.TabIndex = 8
Me.Label9.Text = "相同卡最小间隔"
'
'Label10
'
Me.Label10.Location = New System.Drawing.Point(448, 160)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(56, 23)
Me.Label10.TabIndex = 9
Me.Label10.Text = "消费模式"
'
'Label11
'
Me.Label11.Location = New System.Drawing.Point(576, 160)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(248, 32)
Me.Label11.TabIndex = 10
Me.Label11.Text = "(0-普通模式,1-定额消费,2-快捷键方式,3-只记次不扣钱)"
'
'Label12
'
Me.Label12.Location = New System.Drawing.Point(440, 200)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(24, 23)
Me.Label12.TabIndex = 11
Me.Label12.Text = "秒"
'
'Label13
'
Me.Label13.Location = New System.Drawing.Point(168, 232)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(80, 16)
Me.Label13.TabIndex = 12
Me.Label13.Text = "早餐起止时间"
'
'Label14
'
Me.Label14.Location = New System.Drawing.Point(168, 256)
Me.Label14.Name = "Label14"
Me.Label14.Size = New System.Drawing.Size(80, 16)
Me.Label14.TabIndex = 13
Me.Label14.Text = "午餐起止时间"
'
'Label15
'
Me.Label15.Location = New System.Drawing.Point(216, 104)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(112, 23)
Me.Label15.TabIndex = 14
Me.Label15.Text = "卡内允许最大金额"
'
'Label16
'
Me.Label16.Location = New System.Drawing.Point(216, 128)
Me.Label16.Name = "Label16"
Me.Label16.Size = New System.Drawing.Size(112, 23)
Me.Label16.TabIndex = 15
Me.Label16.Text = "卡内允许最小金额"
'
'Label17
'
Me.Label17.Location = New System.Drawing.Point(216, 152)
Me.Label17.Name = "Label17"
Me.Label17.Size = New System.Drawing.Size(112, 23)
Me.Label17.TabIndex = 16
Me.Label17.Text = "卡内最小报警金额"
'
'Label18
'
Me.Label18.Location = New System.Drawing.Point(24, 336)
Me.Label18.Name = "Label18"
Me.Label18.TabIndex = 17
Me.Label18.Text = "卡类别0早餐定额"
'
'Label19
'
Me.Label19.Location = New System.Drawing.Point(280, 232)
Me.Label19.Name = "Label19"
Me.Label19.Size = New System.Drawing.Size(8, 23)
Me.Label19.TabIndex = 18
Me.Label19.Text = ":"
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(104, 16)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(416, 21)
Me.TextBox1.TabIndex = 19
Me.TextBox1.Text = "易用型IC卡POS机 型号:POS-IC-485-01 ——功能强大 快捷易用! "
'
'TextBox2
'
Me.TextBox2.Location = New System.Drawing.Point(104, 40)
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size(368, 21)
Me.TextBox2.TabIndex = 20
Me.TextBox2.Text = ""
'
'TextBox3
'
Me.TextBox3.Location = New System.Drawing.Point(104, 64)
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Size = New System.Drawing.Size(368, 21)
Me.TextBox3.TabIndex = 21
Me.TextBox3.Text = ""
'
'TextBox4
'
Me.TextBox4.Location = New System.Drawing.Point(96, 104)
Me.TextBox4.Name = "TextBox4"
Me.TextBox4.Size = New System.Drawing.Size(80, 21)
Me.TextBox4.TabIndex = 22
Me.TextBox4.Text = "123456"
'
'TextBox5
'
Me.TextBox5.Location = New System.Drawing.Point(96, 128)
Me.TextBox5.Name = "TextBox5"
Me.TextBox5.Size = New System.Drawing.Size(80, 21)
Me.TextBox5.TabIndex = 23
Me.TextBox5.Text = "0"
'
'TextBox6
'
Me.TextBox6.Location = New System.Drawing.Point(328, 104)
Me.TextBox6.Name = "TextBox6"
Me.TextBox6.TabIndex = 24
Me.TextBox6.Text = "16777215"
'
'TextBox7
'
Me.TextBox7.Location = New System.Drawing.Point(328, 128)
Me.TextBox7.Name = "TextBox7"
Me.TextBox7.TabIndex = 25
Me.TextBox7.Text = "0"
'
'TextBox8
'
Me.TextBox8.Location = New System.Drawing.Point(328, 152)
Me.TextBox8.Name = "TextBox8"
Me.TextBox8.TabIndex = 26
Me.TextBox8.Text = "0"
'
'TextBox9
'
Me.TextBox9.Location = New System.Drawing.Point(328, 176)
Me.TextBox9.Name = "TextBox9"
Me.TextBox9.TabIndex = 27
Me.TextBox9.Text = "16777215"
'
'TextBox10
'
Me.TextBox10.Location = New System.Drawing.Point(328, 200)
Me.TextBox10.Name = "TextBox10"
Me.TextBox10.TabIndex = 28
Me.TextBox10.Text = "0"
'
'TextBox11
'
Me.TextBox11.Location = New System.Drawing.Point(504, 160)
Me.TextBox11.Name = "TextBox11"
Me.TextBox11.Size = New System.Drawing.Size(64, 21)
Me.TextBox11.TabIndex = 29
Me.TextBox11.Text = "0"
'
'TextBox12
'
Me.TextBox12.Location = New System.Drawing.Point(256, 232)
Me.TextBox12.Name = "TextBox12"
Me.TextBox12.Size = New System.Drawing.Size(24, 21)
Me.TextBox12.TabIndex = 30
Me.TextBox12.Text = "3"
'
'TextBox13
'
Me.TextBox13.Location = New System.Drawing.Point(296, 232)
Me.TextBox13.Name = "TextBox13"
Me.TextBox13.Size = New System.Drawing.Size(24, 21)
Me.TextBox13.TabIndex = 31
Me.TextBox13.Text = "00"
'
'CheckBox1
'
Me.CheckBox1.Location = New System.Drawing.Point(456, 104)
Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.TabIndex = 32
Me.CheckBox1.Text = "每餐累计"
'
'CheckBox2
'
Me.CheckBox2.Location = New System.Drawing.Point(456, 128)
Me.CheckBox2.Name = "CheckBox2"
Me.CheckBox2.TabIndex = 33
Me.CheckBox2.Text = "每天累计"
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(480, 40)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(40, 23)
Me.Button1.TabIndex = 34
Me.Button1.Text = "选择"
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(480, 64)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(40, 23)
Me.Button2.TabIndex = 35
Me.Button2.Text = "选择"
'
'Button3
'
Me.Button3.Location = New System.Drawing.Point(544, 64)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(48, 24)
Me.Button3.TabIndex = 36
Me.Button3.Text = "刷新"
'
'Button4
'
Me.Button4.Location = New System.Drawing.Point(680, 16)
Me.Button4.Name = "Button4"
Me.Button4.Size = New System.Drawing.Size(216, 32)
Me.Button4.TabIndex = 37
Me.Button4.Text = "远程设定logo图片及开机文字"
'
'Button5
'
Me.Button5.Location = New System.Drawing.Point(680, 56)
Me.Button5.Name = "Button5"
Me.Button5.Size = New System.Drawing.Size(216, 32)
Me.Button5.TabIndex = 38
Me.Button5.Text = "写logo图片及开机文字至U盘或磁盘"
'
'DriveListBox1
'
Me.DriveListBox1.Location = New System.Drawing.Point(600, 64)
Me.DriveListBox1.Name = "DriveListBox1"
Me.DriveListBox1.Size = New System.Drawing.Size(64, 22)
Me.DriveListBox1.TabIndex = 39
'
'CheckBox3
'
Me.CheckBox3.Location = New System.Drawing.Point(24, 168)
Me.CheckBox3.Name = "CheckBox3"
Me.CheckBox3.Size = New System.Drawing.Size(120, 24)
Me.CheckBox3.TabIndex = 40
Me.CheckBox3.Text = "卡类别0允许使用"
'
'CheckBox4
'
Me.CheckBox4.Location = New System.Drawing.Point(24, 184)
Me.CheckBox4.Name = "CheckBox4"
Me.CheckBox4.Size = New System.Drawing.Size(120, 24)
Me.CheckBox4.TabIndex = 41
Me.CheckBox4.Text = "卡类别1允许使用"
'
'CheckBox5
'
Me.CheckBox5.Location = New System.Drawing.Point(24, 200)
Me.CheckBox5.Name = "CheckBox5"
Me.CheckBox5.Size = New System.Drawing.Size(120, 24)
Me.CheckBox5.TabIndex = 42
Me.CheckBox5.Text = "卡类别2允许使用"
'
'CheckBox6
'
Me.CheckBox6.Location = New System.Drawing.Point(24, 216)
Me.CheckBox6.Name = "CheckBox6"
Me.CheckBox6.Size = New System.Drawing.Size(120, 24)
Me.CheckBox6.TabIndex = 43
Me.CheckBox6.Text = "卡类别3允许使用"
'
'CheckBox7
'
Me.CheckBox7.Location = New System.Drawing.Point(24, 232)
Me.CheckBox7.Name = "CheckBox7"
Me.CheckBox7.Size = New System.Drawing.Size(120, 24)
Me.CheckBox7.TabIndex = 44
Me.CheckBox7.Text = "卡类别4允许使用"
'
'CheckBox8
'
Me.CheckBox8.Location = New System.Drawing.Point(24, 248)
Me.CheckBox8.Name = "CheckBox8"
Me.CheckBox8.Size = New System.Drawing.Size(120, 24)
Me.CheckBox8.TabIndex = 45
Me.CheckBox8.Text = "卡类别5允许使用"
'
'CheckBox9
'
Me.CheckBox9.Location = New System.Drawing.Point(24, 264)
Me.CheckBox9.Name = "CheckBox9"
Me.CheckBox9.Size = New System.Drawing.Size(120, 24)
Me.CheckBox9.TabIndex = 46
Me.CheckBox9.Text = "卡类别6允许使用"
'
'CheckBox10
'
Me.CheckBox10.Location = New System.Drawing.Point(24, 280)
Me.CheckBox10.Name = "CheckBox10"
Me.CheckBox10.Size = New System.Drawing.Size(120, 24)
Me.CheckBox10.TabIndex = 47
Me.CheckBox10.Text = "卡类别7允许使用"
'
'TextBox14
'
Me.TextBox14.Location = New System.Drawing.Point(344, 232)
Me.TextBox14.Name = "TextBox14"
Me.TextBox14.Size = New System.Drawing.Size(24, 21)
Me.TextBox14.TabIndex = 48
Me.TextBox14.Text = "9"
'
'TextBox15
'
Me.TextBox15.Location = New System.Drawing.Point(384, 232)
Me.TextBox15.Name = "TextBox15"
Me.TextBox15.Size = New System.Drawing.Size(24, 21)
Me.TextBox15.TabIndex = 49
Me.TextBox15.Text = "59"
'
'TextBox16
'
Me.TextBox16.Location = New System.Drawing.Point(256, 256)
Me.TextBox16.Name = "TextBox16"
Me.TextBox16.Size = New System.Drawing.Size(24, 21)
Me.TextBox16.TabIndex = 50
Me.TextBox16.Text = "10"
'
'TextBox17
'
Me.TextBox17.Location = New System.Drawing.Point(296, 256)
Me.TextBox17.Name = "TextBox17"
Me.TextBox17.Size = New System.Drawing.Size(24, 21)
Me.TextBox17.TabIndex = 51
Me.TextBox17.Text = "00"
'
'TextBox18
'
Me.TextBox18.Location = New System.Drawing.Point(344, 256)
Me.TextBox18.Name = "TextBox18"
Me.TextBox18.Size = New System.Drawing.Size(24, 21)
Me.TextBox18.TabIndex = 52
Me.TextBox18.Text = "14"
'
'TextBox19
'
Me.TextBox19.Location = New System.Drawing.Point(384, 256)
Me.TextBox19.Name = "TextBox19"
Me.TextBox19.Size = New System.Drawing.Size(24, 21)
Me.TextBox19.TabIndex = 53
Me.TextBox19.Text = "59"
'
'TextBox20
'
Me.TextBox20.Location = New System.Drawing.Point(256, 280)
Me.TextBox20.Name = "TextBox20"
Me.TextBox20.Size = New System.Drawing.Size(24, 21)
Me.TextBox20.TabIndex = 54
Me.TextBox20.Text = "15"
'
'TextBox21
'
Me.TextBox21.Location = New System.Drawing.Point(296, 280)
Me.TextBox21.Name = "TextBox21"
Me.TextBox21.Size = New System.Drawing.Size(24, 21)
Me.TextBox21.TabIndex = 55
Me.TextBox21.Text = "00"
'
'TextBox22
'
Me.TextBox22.Location = New System.Drawing.Point(344, 280)
Me.TextBox22.Name = "TextBox22"
Me.TextBox22.Size = New System.Drawing.Size(24, 21)
Me.TextBox22.TabIndex = 56
Me.TextBox22.Text = "20"
'
'TextBox23
'
Me.TextBox23.Location = New System.Drawing.Point(384, 280)
Me.TextBox23.Name = "TextBox23"
Me.TextBox23.Size = New System.Drawing.Size(24, 21)
Me.TextBox23.TabIndex = 57
Me.TextBox23.Text = "59"
'
'TextBox24
'
Me.TextBox24.Location = New System.Drawing.Point(256, 304)
Me.TextBox24.Name = "TextBox24"
Me.TextBox24.Size = New System.Drawing.Size(24, 21)
Me.TextBox24.TabIndex = 58
Me.TextBox24.Text = "21"
'
'TextBox25
'
Me.TextBox25.Location = New System.Drawing.Point(296, 304)
Me.TextBox25.Name = "TextBox25"
Me.TextBox25.Size = New System.Drawing.Size(24, 21)
Me.TextBox25.TabIndex = 59
Me.TextBox25.Text = "00"
'
'TextBox26
'
Me.TextBox26.Location = New System.Drawing.Point(344, 304)
Me.TextBox26.Name = "TextBox26"
Me.TextBox26.Size = New System.Drawing.Size(24, 21)
Me.TextBox26.TabIndex = 60
Me.TextBox26.Text = "2"
'
'TextBox27
'
Me.TextBox27.Location = New System.Drawing.Point(384, 304)
Me.TextBox27.Name = "TextBox27"
Me.TextBox27.Size = New System.Drawing.Size(24, 21)
Me.TextBox27.TabIndex = 61
Me.TextBox27.Text = "59"
'
'Label20
'
Me.Label20.Location = New System.Drawing.Point(280, 280)
Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(8, 23)
Me.Label20.TabIndex = 62
Me.Label20.Text = ":"
'
'Label21
'
Me.Label21.Location = New System.Drawing.Point(280, 304)
Me.Label21.Name = "Label21"
Me.Label21.Size = New System.Drawing.Size(8, 23)
Me.Label21.TabIndex = 63
Me.Label21.Text = ":"
'
'Label22
'
Me.Label22.Location = New System.Drawing.Point(368, 304)
Me.Label22.Name = "Label22"
Me.Label22.Size = New System.Drawing.Size(8, 23)
Me.Label22.TabIndex = 64
Me.Label22.Text = ":"
'
'Label23
'
Me.Label23.Location = New System.Drawing.Point(368, 280)
Me.Label23.Name = "Label23"
Me.Label23.Size = New System.Drawing.Size(8, 23)
Me.Label23.TabIndex = 65
Me.Label23.Text = ":"
'
'Label24
'
Me.Label24.Location = New System.Drawing.Point(368, 256)
Me.Label24.Name = "Label24"
Me.Label24.Size = New System.Drawing.Size(8, 23)
Me.Label24.TabIndex = 66
Me.Label24.Text = ":"
'
'Label25
'
Me.Label25.Location = New System.Drawing.Point(280, 256)
Me.Label25.Name = "Label25"
Me.Label25.Size = New System.Drawing.Size(8, 23)
Me.Label25.TabIndex = 67
Me.Label25.Text = ":"
'
'Label26
'
Me.Label26.Location = New System.Drawing.Point(368, 232)
Me.Label26.Name = "Label26"
Me.Label26.Size = New System.Drawing.Size(8, 23)
Me.Label26.TabIndex = 68
Me.Label26.Text = ":"
'
'Label27
'
Me.Label27.Location = New System.Drawing.Point(440, 232)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(92, 16)
Me.Label27.TabIndex = 69
Me.Label27.Text = "早餐最高限额"
'
'Label28
'
Me.Label28.Location = New System.Drawing.Point(328, 312)
Me.Label28.Name = "Label28"
Me.Label28.Size = New System.Drawing.Size(8, 16)
Me.Label28.TabIndex = 70
Me.Label28.Text = "~"
'
'Label29
'
Me.Label29.Location = New System.Drawing.Point(328, 288)
Me.Label29.Name = "Label29"
Me.Label29.Size = New System.Drawing.Size(8, 16)
Me.Label29.TabIndex = 71
Me.Label29.Text = "~"
'
'Label30
'
Me.Label30.Location = New System.Drawing.Point(328, 264)
Me.Label30.Name = "Label30"
Me.Label30.Size = New System.Drawing.Size(8, 16)
Me.Label30.TabIndex = 72
Me.Label30.Text = "~"
'
'Label31
'
Me.Label31.Location = New System.Drawing.Point(328, 240)
Me.Label31.Name = "Label31"
Me.Label31.Size = New System.Drawing.Size(8, 16)
Me.Label31.TabIndex = 73
Me.Label31.Text = "~"
'
'Label32
'
Me.Label32.Location = New System.Drawing.Point(440, 256)
Me.Label32.Name = "Label32"
Me.Label32.Size = New System.Drawing.Size(92, 16)
Me.Label32.TabIndex = 74
Me.Label32.Text = "午餐最高限额"
'
'Label33
'
Me.Label33.Location = New System.Drawing.Point(440, 280)
Me.Label33.Name = "Label33"
Me.Label33.Size = New System.Drawing.Size(92, 16)
Me.Label33.TabIndex = 75
Me.Label33.Text = "晚餐最高限额"
'
'Label34
'
Me.Label34.Location = New System.Drawing.Point(440, 304)
Me.Label34.Name = "Label34"
Me.Label34.Size = New System.Drawing.Size(92, 24)
Me.Label34.TabIndex = 76
Me.Label34.Text = "夜宵最高限额"
'
'TextBox28
'
Me.TextBox28.Location = New System.Drawing.Point(528, 232)
Me.TextBox28.Name = "TextBox28"
Me.TextBox28.Size = New System.Drawing.Size(64, 21)
Me.TextBox28.TabIndex = 77
Me.TextBox28.Text = "16777215"
'
'TextBox29
'
Me.TextBox29.Location = New System.Drawing.Point(528, 256)
Me.TextBox29.Name = "TextBox29"
Me.TextBox29.Size = New System.Drawing.Size(64, 21)
Me.TextBox29.TabIndex = 78
Me.TextBox29.Text = "167772159"
'
'TextBox30
'
Me.TextBox30.Location = New System.Drawing.Point(528, 280)
Me.TextBox30.Name = "TextBox30"
Me.TextBox30.Size = New System.Drawing.Size(64, 21)
Me.TextBox30.TabIndex = 79
Me.TextBox30.Text = "16777215"
'
'TextBox31
'
Me.TextBox31.Location = New System.Drawing.Point(528, 304)
Me.TextBox31.Name = "TextBox31"
Me.TextBox31.Size = New System.Drawing.Size(64, 21)
Me.TextBox31.TabIndex = 80
Me.TextBox31.Text = "16777215"
'
'Label35
'
Me.Label35.Location = New System.Drawing.Point(624, 232)
Me.Label35.Name = "Label35"
Me.Label35.Size = New System.Drawing.Size(80, 16)
Me.Label35.TabIndex = 81
Me.Label35.Text = "早餐最高限次"
'
'Label36
'
Me.Label36.Location = New System.Drawing.Point(624, 256)
Me.Label36.Name = "Label36"
Me.Label36.Size = New System.Drawing.Size(80, 16)
Me.Label36.TabIndex = 82
Me.Label36.Text = "午餐最高限次"
'
'Label37
'
Me.Label37.Location = New System.Drawing.Point(624, 280)
Me.Label37.Name = "Label37"
Me.Label37.Size = New System.Drawing.Size(80, 16)
Me.Label37.TabIndex = 83
Me.Label37.Text = "晚餐最高限次"
'
'Label38
'
Me.Label38.Location = New System.Drawing.Point(624, 304)
Me.Label38.Name = "Label38"
Me.Label38.Size = New System.Drawing.Size(80, 16)
Me.Label38.TabIndex = 84
Me.Label38.Text = "夜宵最高限次"
'
'TextBox32
'
Me.TextBox32.Location = New System.Drawing.Point(712, 232)
Me.TextBox32.Name = "TextBox32"
Me.TextBox32.Size = New System.Drawing.Size(64, 21)
Me.TextBox32.TabIndex = 85
Me.TextBox32.Text = "63"
'
'TextBox33
'
Me.TextBox33.Location = New System.Drawing.Point(712, 256)
Me.TextBox33.Name = "TextBox33"
Me.TextBox33.Size = New System.Drawing.Size(64, 21)
Me.TextBox33.TabIndex = 86
Me.TextBox33.Text = "63"
'
'TextBox34
'
Me.TextBox34.Location = New System.Drawing.Point(712, 280)
Me.TextBox34.Name = "TextBox34"
Me.TextBox34.Size = New System.Drawing.Size(64, 21)
Me.TextBox34.TabIndex = 87
Me.TextBox34.Text = "63"
'
'TextBox35
'
Me.TextBox35.Location = New System.Drawing.Point(712, 304)
Me.TextBox35.Name = "TextBox35"
Me.TextBox35.Size = New System.Drawing.Size(64, 21)
Me.TextBox35.TabIndex = 88
Me.TextBox35.Text = "63"
'
'Label39
'
Me.Label39.Location = New System.Drawing.Point(24, 504)
Me.Label39.Name = "Label39"
Me.Label39.TabIndex = 89
Me.Label39.Text = "卡类别1夜宵定额"
'
'Label40
'
Me.Label40.Location = New System.Drawing.Point(24, 480)
Me.Label40.Name = "Label40"
Me.Label40.TabIndex = 90
Me.Label40.Text = "卡类别1晚餐定额"
'
'Label41
'
Me.Label41.Location = New System.Drawing.Point(24, 456)
Me.Label41.Name = "Label41"
Me.Label41.TabIndex = 91
Me.Label41.Text = "卡类别1午餐定额"
'
'Label42
'
Me.Label42.Location = New System.Drawing.Point(24, 432)
Me.Label42.Name = "Label42"
Me.Label42.TabIndex = 92
Me.Label42.Text = "卡类别1早餐定额"
'
'Label43
'
Me.Label43.Location = New System.Drawing.Point(24, 408)
Me.Label43.Name = "Label43"
Me.Label43.TabIndex = 93
Me.Label43.Text = "卡类别0夜宵定额"
'
'Label44
'
Me.Label44.Location = New System.Drawing.Point(24, 384)
Me.Label44.Name = "Label44"
Me.Label44.TabIndex = 94
Me.Label44.Text = "卡类别0晚餐定额"
'
'Label45
'
Me.Label45.Location = New System.Drawing.Point(24, 360)
Me.Label45.Name = "Label45"
Me.Label45.TabIndex = 95
Me.Label45.Text = "卡类别0午餐定额"
'
'TextBox36
'
Me.TextBox36.Location = New System.Drawing.Point(128, 336)
Me.TextBox36.Name = "TextBox36"
Me.TextBox36.Size = New System.Drawing.Size(88, 21)
Me.TextBox36.TabIndex = 96
Me.TextBox36.Text = "16777215"
'
'TextBox37
'
Me.TextBox37.Location = New System.Drawing.Point(128, 360)
Me.TextBox37.Name = "TextBox37"
Me.TextBox37.Size = New System.Drawing.Size(88, 21)
Me.TextBox37.TabIndex = 97
Me.TextBox37.Text = "16777215"
'
'TextBox38
'
Me.TextBox38.Location = New System.Drawing.Point(128, 384)
Me.TextBox38.Name = "TextBox38"
Me.TextBox38.Size = New System.Drawing.Size(88, 21)
Me.TextBox38.TabIndex = 98
Me.TextBox38.Text = "16777215"
'
'TextBox39
'
Me.TextBox39.Location = New System.Drawing.Point(128, 408)
Me.TextBox39.Name = "TextBox39"
Me.TextBox39.Size = New System.Drawing.Size(88, 21)
Me.TextBox39.TabIndex = 99
Me.TextBox39.Text = "16777215"
'
'TextBox40
'
Me.TextBox40.Location = New System.Drawing.Point(128, 432)
Me.TextBox40.Name = "TextBox40"
Me.TextBox40.Size = New System.Drawing.Size(88, 21)
Me.TextBox40.TabIndex = 100
Me.TextBox40.Text = "16777215"
'
'TextBox41
'
Me.TextBox41.Location = New System.Drawing.Point(128, 456)
Me.TextBox41.Name = "TextBox41"
Me.TextBox41.Size = New System.Drawing.Size(88, 21)
Me.TextBox41.TabIndex = 101
Me.TextBox41.Text = "16777215"
'
'TextBox42
'
Me.TextBox42.Location = New System.Drawing.Point(128, 480)
Me.TextBox42.Name = "TextBox42"
Me.TextBox42.Size = New System.Drawing.Size(88, 21)
Me.TextBox42.TabIndex = 102
Me.TextBox42.Text = "16777215"
'
'TextBox43
'
Me.TextBox43.Location = New System.Drawing.Point(128, 504)
Me.TextBox43.Name = "TextBox43"
Me.TextBox43.Size = New System.Drawing.Size(88, 21)
Me.TextBox43.TabIndex = 103
Me.TextBox43.Text = "16777215"
'
'TextBox44
'
Me.TextBox44.Location = New System.Drawing.Point(336, 336)
Me.TextBox44.Name = "TextBox44"
Me.TextBox44.Size = New System.Drawing.Size(88, 21)
Me.TextBox44.TabIndex = 104
Me.TextBox44.Text = "16777215"
'
'Label46
'
Me.Label46.Location = New System.Drawing.Point(440, 336)
Me.Label46.Name = "Label46"
Me.Label46.TabIndex = 105
Me.Label46.Text = "卡类别4早餐定额"
'
'Label47
'
Me.Label47.Location = New System.Drawing.Point(232, 504)
Me.Label47.Name = "Label47"
Me.Label47.TabIndex = 106
Me.Label47.Text = "卡类别3夜宵定额"
'
'Label48
'
Me.Label48.Location = New System.Drawing.Point(232, 480)
Me.Label48.Name = "Label48"
Me.Label48.TabIndex = 107
Me.Label48.Text = "卡类别3晚餐定额"
'
'Label49
'
Me.Label49.Location = New System.Drawing.Point(232, 456)
Me.Label49.Name = "Label49"
Me.Label49.TabIndex = 108
Me.Label49.Text = "卡类别3午餐定额"
'
'Label50
'
Me.Label50.Location = New System.Drawing.Point(232, 432)
Me.Label50.Name = "Label50"
Me.Label50.TabIndex = 109
Me.Label50.Text = "卡类别3早餐定额"
'
'Label51
'
Me.Label51.Location = New System.Drawing.Point(232, 408)
Me.Label51.Name = "Label51"
Me.Label51.TabIndex = 110
Me.Label51.Text = "卡类别2夜宵定额"
'
'Label52
'
Me.Label52.Location = New System.Drawing.Point(232, 384)
Me.Label52.Name = "Label52"
Me.Label52.TabIndex = 111
Me.Label52.Text = "卡类别2晚餐定额"
'
'Label53
'
Me.Label53.Location = New System.Drawing.Point(232, 360)
Me.Label53.Name = "Label53"
Me.Label53.TabIndex = 112
Me.Label53.Text = "卡类别2午餐定额"
'
'Label54
'
Me.Label54.Location = New System.Drawing.Point(232, 336)
Me.Label54.Name = "Label54"
Me.Label54.TabIndex = 113
Me.Label54.Text = "卡类别2早餐定额"
'
'TextBox45
'
Me.TextBox45.Location = New System.Drawing.Point(336, 360)
Me.TextBox45.Name = "TextBox45"
Me.TextBox45.Size = New System.Drawing.Size(88, 21)
Me.TextBox45.TabIndex = 114
Me.TextBox45.Text = "16777215"
'
'TextBox46
'
Me.TextBox46.Location = New System.Drawing.Point(336, 384)
Me.TextBox46.Name = "TextBox46"
Me.TextBox46.Size = New System.Drawing.Size(88, 21)
Me.TextBox46.TabIndex = 115
Me.TextBox46.Text = "16777215"
'
'TextBox47
'
Me.TextBox47.Location = New System.Drawing.Point(336, 408)
Me.TextBox47.Name = "TextBox47"
Me.TextBox47.Size = New System.Drawing.Size(88, 21)
Me.TextBox47.TabIndex = 116
Me.TextBox47.Text = "16777215"
'
'TextBox48
'
Me.TextBox48.Location = New System.Drawing.Point(336, 432)
Me.TextBox48.Name = "TextBox48"
Me.TextBox48.Size = New System.Drawing.Size(88, 21)
Me.TextBox48.TabIndex = 117
Me.TextBox48.Text = "16777215"
'
'TextBox49
'
Me.TextBox49.Location = New System.Drawing.Point(336, 456)
Me.TextBox49.Name = "TextBox49"
Me.TextBox49.Size = New System.Drawing.Size(88, 21)
Me.TextBox49.TabIndex = 118
Me.TextBox49.Text = "16777215"
'
'TextBox50
'
Me.TextBox50.Location = New System.Drawing.Point(336, 480)
Me.TextBox50.Name = "TextBox50"
Me.TextBox50.Size = New System.Drawing.Size(88, 21)
Me.TextBox50.TabIndex = 119
Me.TextBox50.Text = "16777215"
'
'TextBox51
'
Me.TextBox51.Location = New System.Drawing.Point(336, 504)
Me.TextBox51.Name = "TextBox51"
Me.TextBox51.Size = New System.Drawing.Size(88, 21)
Me.TextBox51.TabIndex = 120
Me.TextBox51.Text = "16777215"
'
'Label55
'
Me.Label55.Location = New System.Drawing.Point(438, 504)
Me.Label55.Name = "Label55"
Me.Label55.TabIndex = 121
Me.Label55.Text = "卡类别夜宵5定额"
'
'Label56
'
Me.Label56.Location = New System.Drawing.Point(440, 480)
Me.Label56.Name = "Label56"
Me.Label56.TabIndex = 122
Me.Label56.Text = "卡类别5晚餐定额"
'
'Label57
'
Me.Label57.Location = New System.Drawing.Point(440, 456)
Me.Label57.Name = "Label57"
Me.Label57.TabIndex = 123
Me.Label57.Text = "卡类别5午餐定额"
'
'Label58
'
Me.Label58.Location = New System.Drawing.Point(440, 432)
Me.Label58.Name = "Label58"
Me.Label58.TabIndex = 124
Me.Label58.Text = "卡类别5早餐定额"
'
'Label59
'
Me.Label59.Location = New System.Drawing.Point(440, 408)
Me.Label59.Name = "Label59"
Me.Label59.TabIndex = 125
Me.Label59.Text = "卡类别4夜宵定额"
'
'Label60
'
Me.Label60.Location = New System.Drawing.Point(440, 384)
Me.Label60.Name = "Label60"
Me.Label60.TabIndex = 126
Me.Label60.Text = "卡类别4晚餐定额"
'
'Label61
'
Me.Label61.Location = New System.Drawing.Point(440, 360)
Me.Label61.Name = "Label61"
Me.Label61.TabIndex = 127
Me.Label61.Text = "卡类别4午餐定额"
'
'TextBox52
'
Me.TextBox52.Location = New System.Drawing.Point(544, 336)
Me.TextBox52.Name = "TextBox52"
Me.TextBox52.Size = New System.Drawing.Size(88, 21)
Me.TextBox52.TabIndex = 128
Me.TextBox52.Text = "16777215"
'
'TextBox53
'
Me.TextBox53.Location = New System.Drawing.Point(544, 360)
Me.TextBox53.Name = "TextBox53"
Me.TextBox53.Size = New System.Drawing.Size(88, 21)
Me.TextBox53.TabIndex = 129
Me.TextBox53.Text = "16777215"
'
'TextBox54
'
Me.TextBox54.Location = New System.Drawing.Point(544, 384)
Me.TextBox54.Name = "TextBox54"
Me.TextBox54.Size = New System.Drawing.Size(88, 21)
Me.TextBox54.TabIndex = 130
Me.TextBox54.Text = "16777215"
'
'TextBox55
'
Me.TextBox55.Location = New System.Drawing.Point(544, 408)
Me.TextBox55.Name = "TextBox55"
Me.TextBox55.Size = New System.Drawing.Size(88, 21)
Me.TextBox55.TabIndex = 131
Me.TextBox55.Text = "16777215"
'
'TextBox56
'
Me.TextBox56.Location = New System.Drawing.Point(544, 432)
Me.TextBox56.Name = "TextBox56"
Me.TextBox56.Size = New System.Drawing.Size(88, 21)
Me.TextBox56.TabIndex = 132
Me.TextBox56.Text = "16777215"
'
'TextBox57
'
Me.TextBox57.Location = New System.Drawing.Point(544, 456)
Me.TextBox57.Name = "TextBox57"
Me.TextBox57.Size = New System.Drawing.Size(88, 21)
Me.TextBox57.TabIndex = 133
Me.TextBox57.Text = "16777215"
'
'TextBox58
'
Me.TextBox58.Location = New System.Drawing.Point(544, 480)
Me.TextBox58.Name = "TextBox58"
Me.TextBox58.Size = New System.Drawing.Size(88, 21)
Me.TextBox58.TabIndex = 134
Me.TextBox58.Text = "16777215"
'
'TextBox59
'
Me.TextBox59.Location = New System.Drawing.Point(544, 504)
Me.TextBox59.Name = "TextBox59"
Me.TextBox59.Size = New System.Drawing.Size(88, 21)
Me.TextBox59.TabIndex = 135
Me.TextBox59.Text = "16777215"
'
'Label62
'
Me.Label62.Location = New System.Drawing.Point(640, 336)
Me.Label62.Name = "Label62"
Me.Label62.TabIndex = 136
Me.Label62.Text = "卡类别6早餐定额"
'
'Label63
'
Me.Label63.Location = New System.Drawing.Point(640, 360)
Me.Label63.Name = "Label63"
Me.Label63.TabIndex = 137
Me.Label63.Text = "卡类别6午餐定额"
'
'Label64
'
Me.Label64.Location = New System.Drawing.Point(640, 384)
Me.Label64.Name = "Label64"
Me.Label64.TabIndex = 138
Me.Label64.Text = "卡类别6晚餐定额"
'
'Label65
'
Me.Label65.Location = New System.Drawing.Point(640, 408)
Me.Label65.Name = "Label65"
Me.Label65.TabIndex = 139
Me.Label65.Text = "卡类别6夜宵定额"
'
'Label66
'
Me.Label66.Location = New System.Drawing.Point(640, 432)
Me.Label66.Name = "Label66"
Me.Label66.TabIndex = 140
Me.Label66.Text = "卡类别7早餐定额"
'
'Label67
'
Me.Label67.Location = New System.Drawing.Point(640, 456)
Me.Label67.Name = "Label67"
Me.Label67.TabIndex = 141
Me.Label67.Text = "卡类别7午餐定额"
'
'Label68
'
Me.Label68.Location = New System.Drawing.Point(640, 480)
Me.Label68.Name = "Label68"
Me.Label68.TabIndex = 142
Me.Label68.Text = "卡类别7晚餐定额"
'
'Label69
'
Me.Label69.Location = New System.Drawing.Point(640, 504)
Me.Label69.Name = "Label69"
Me.Label69.TabIndex = 143
Me.Label69.Text = "卡类别7夜宵定额"
'
'TextBox60
'
Me.TextBox60.Location = New System.Drawing.Point(744, 336)
Me.TextBox60.Name = "TextBox60"
Me.TextBox60.Size = New System.Drawing.Size(88, 21)
Me.TextBox60.TabIndex = 144
Me.TextBox60.Text = "16777215"
'
'TextBox61
'
Me.TextBox61.Location = New System.Drawing.Point(744, 360)
Me.TextBox61.Name = "TextBox61"
Me.TextBox61.Size = New System.Drawing.Size(88, 21)
Me.TextBox61.TabIndex = 145
Me.TextBox61.Text = "16777215"
'
'TextBox62
'
Me.TextBox62.Location = New System.Drawing.Point(744, 384)
Me.TextBox62.Name = "TextBox62"
Me.TextBox62.Size = New System.Drawing.Size(88, 21)
Me.TextBox62.TabIndex = 146
Me.TextBox62.Text = "16777215"
'
'TextBox63
'
Me.TextBox63.Location = New System.Drawing.Point(744, 408)
Me.TextBox63.Name = "TextBox63"
Me.TextBox63.Size = New System.Drawing.Size(88, 21)
Me.TextBox63.TabIndex = 147
Me.TextBox63.Text = "16777215"
'
'TextBox64
'
Me.TextBox64.Location = New System.Drawing.Point(744, 432)
Me.TextBox64.Name = "TextBox64"
Me.TextBox64.Size = New System.Drawing.Size(88, 21)
Me.TextBox64.TabIndex = 148
Me.TextBox64.Text = "16777215"
'
'TextBox65
'
Me.TextBox65.Location = New System.Drawing.Point(744, 456)
Me.TextBox65.Name = "TextBox65"
Me.TextBox65.Size = New System.Drawing.Size(88, 21)
Me.TextBox65.TabIndex = 149
Me.TextBox65.Text = "16777215"
'
'TextBox66
'
Me.TextBox66.Location = New System.Drawing.Point(744, 480)
Me.TextBox66.Name = "TextBox66"
Me.TextBox66.Size = New System.Drawing.Size(88, 21)
Me.TextBox66.TabIndex = 150
Me.TextBox66.Text = "16777215"
'
'TextBox67
'
Me.TextBox67.Location = New System.Drawing.Point(744, 504)
Me.TextBox67.Name = "TextBox67"
Me.TextBox67.Size = New System.Drawing.Size(88, 21)
Me.TextBox67.TabIndex = 151
Me.TextBox67.Text = "16777215"
'
'TextBox68
'
Me.TextBox68.Location = New System.Drawing.Point(112, 552)
Me.TextBox68.Name = "TextBox68"
Me.TextBox68.Size = New System.Drawing.Size(88, 21)
Me.TextBox68.TabIndex = 152
Me.TextBox68.Text = "16777215"
'
'Label70
'
Me.Label70.Location = New System.Drawing.Point(32, 552)
Me.Label70.Name = "Label70"
Me.Label70.Size = New System.Drawing.Size(80, 24)
Me.Label70.TabIndex = 153
Me.Label70.Text = "快捷键0数值"
'
'Label75
'
Me.Label75.Location = New System.Drawing.Point(400, 576)
Me.Label75.Name = "Label75"
Me.Label75.Size = New System.Drawing.Size(80, 23)
Me.Label75.TabIndex = 158
Me.Label75.Text = "快捷键9数值"
'
'Label76
'
Me.Label76.Location = New System.Drawing.Point(400, 552)
Me.Label76.Name = "Label76"
Me.Label76.Size = New System.Drawing.Size(80, 23)
Me.Label76.TabIndex = 159
Me.Label76.Text = "快捷键8数值"
'
'Label77
'
Me.Label77.Location = New System.Drawing.Point(216, 624)
Me.Label77.Name = "Label77"
Me.Label77.Size = New System.Drawing.Size(80, 23)
Me.Label77.TabIndex = 160
Me.Label77.Text = "快捷键7数值"
'
'Label78
'
Me.Label78.Location = New System.Drawing.Point(216, 600)
Me.Label78.Name = "Label78"
Me.Label78.Size = New System.Drawing.Size(80, 23)
Me.Label78.TabIndex = 161
Me.Label78.Text = "快捷键6数值"
'
'Label79
'
Me.Label79.Location = New System.Drawing.Point(216, 576)
Me.Label79.Name = "Label79"
Me.Label79.Size = New System.Drawing.Size(80, 23)
Me.Label79.TabIndex = 162
Me.Label79.Text = "快捷键5数值"
'
'Label80
'
Me.Label80.Location = New System.Drawing.Point(216, 552)
Me.Label80.Name = "Label80"
Me.Label80.Size = New System.Drawing.Size(80, 23)
Me.Label80.TabIndex = 163
Me.Label80.Text = "快捷键4数值"
'
'Label81
'
Me.Label81.Location = New System.Drawing.Point(32, 624)
Me.Label81.Name = "Label81"
Me.Label81.Size = New System.Drawing.Size(80, 23)
Me.Label81.TabIndex = 164
Me.Label81.Text = "快捷键3数值"
'
'Label82
'
Me.Label82.Location = New System.Drawing.Point(32, 600)
Me.Label82.Name = "Label82"
Me.Label82.Size = New System.Drawing.Size(80, 23)
Me.Label82.TabIndex = 165
Me.Label82.Text = "快捷键2数值"
'
'Label83
'
Me.Label83.Location = New System.Drawing.Point(32, 576)
Me.Label83.Name = "Label83"
Me.Label83.Size = New System.Drawing.Size(80, 23)
Me.Label83.TabIndex = 166
Me.Label83.Text = "快捷键1数值"
'
'TextBox69
'
Me.TextBox69.Location = New System.Drawing.Point(112, 576)
Me.TextBox69.Name = "TextBox69"
Me.TextBox69.Size = New System.Drawing.Size(88, 21)
Me.TextBox69.TabIndex = 167
Me.TextBox69.Text = "16777215"
'
'TextBox70
'
Me.TextBox70.Location = New System.Drawing.Point(112, 600)
Me.TextBox70.Name = "TextBox70"
Me.TextBox70.Size = New System.Drawing.Size(88, 21)
Me.TextBox70.TabIndex = 168
Me.TextBox70.Text = "16777215"
'
'TextBox71
'
Me.TextBox71.Location = New System.Drawing.Point(112, 624)
Me.TextBox71.Name = "TextBox71"
Me.TextBox71.Size = New System.Drawing.Size(88, 21)
Me.TextBox71.TabIndex = 169
Me.TextBox71.Text = "16777215"
'
'TextBox72
'
Me.TextBox72.Location = New System.Drawing.Point(296, 552)
Me.TextBox72.Name = "TextBox72"
Me.TextBox72.Size = New System.Drawing.Size(88, 21)
Me.TextBox72.TabIndex = 170
Me.TextBox72.Text = "16777215"
'
'TextBox73
'
Me.TextBox73.Location = New System.Drawing.Point(296, 576)
Me.TextBox73.Name = "TextBox73"
Me.TextBox73.Size = New System.Drawing.Size(88, 21)
Me.TextBox73.TabIndex = 171
Me.TextBox73.Text = "16777215"
'
'TextBox74
'
Me.TextBox74.Location = New System.Drawing.Point(296, 600)
Me.TextBox74.Name = "TextBox74"
Me.TextBox74.Size = New System.Drawing.Size(88, 21)
Me.TextBox74.TabIndex = 172
Me.TextBox74.Text = "16777215"
'
'TextBox75
'
Me.TextBox75.Location = New System.Drawing.Point(296, 624)
Me.TextBox75.Name = "TextBox75"
Me.TextBox75.Size = New System.Drawing.Size(88, 21)
Me.TextBox75.TabIndex = 173
Me.TextBox75.Text = "16777215"
'
'TextBox76
'
Me.TextBox76.Location = New System.Drawing.Point(480, 552)
Me.TextBox76.Name = "TextBox76"
Me.TextBox76.Size = New System.Drawing.Size(88, 21)
Me.TextBox76.TabIndex = 174
Me.TextBox76.Text = "16777215"
'
'TextBox77
'
Me.TextBox77.Location = New System.Drawing.Point(480, 576)
Me.TextBox77.Name = "TextBox77"
Me.TextBox77.Size = New System.Drawing.Size(88, 21)
Me.TextBox77.TabIndex = 175
Me.TextBox77.Text = "16777215"
'
'Button6
'
Me.Button6.Location = New System.Drawing.Point(528, 624)
Me.Button6.Name = "Button6"
Me.Button6.Size = New System.Drawing.Size(64, 32)
Me.Button6.TabIndex = 178
Me.Button6.Text = "刷新"
'
'DriveListBox2
'
Me.DriveListBox2.Location = New System.Drawing.Point(608, 632)
Me.DriveListBox2.Name = "DriveListBox2"
Me.DriveListBox2.Size = New System.Drawing.Size(64, 22)
Me.DriveListBox2.TabIndex = 179
'
'Button7
'
Me.Button7.Location = New System.Drawing.Point(704, 544)
Me.Button7.Name = "Button7"
Me.Button7.Size = New System.Drawing.Size(128, 32)
Me.Button7.TabIndex = 180
Me.Button7.Text = "读取属性"
'
'Button8
'
Me.Button8.Location = New System.Drawing.Point(704, 584)
Me.Button8.Name = "Button8"
Me.Button8.Size = New System.Drawing.Size(128, 32)
Me.Button8.TabIndex = 181
Me.Button8.Text = "设定属性"
'
'Button9
'
Me.Button9.Location = New System.Drawing.Point(704, 624)
Me.Button9.Name = "Button9"
Me.Button9.Size = New System.Drawing.Size(128, 32)
Me.Button9.TabIndex = 182
Me.Button9.Text = "写参数至U盘或磁盘"
'
'Form4
'
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
Me.ClientSize = New System.Drawing.Size(936, 678)
Me.Controls.Add(Me.Button9)
Me.Controls.Add(Me.Button8)
Me.Controls.Add(Me.Button7)
Me.Controls.Add(Me.DriveListBox2)
Me.Controls.Add(Me.Button6)
Me.Controls.Add(Me.TextBox77)
Me.Controls.Add(Me.TextBox76)
Me.Controls.Add(Me.TextBox75)
Me.Controls.Add(Me.TextBox74)
Me.Controls.Add(Me.TextBox73)
Me.Controls.Add(Me.TextBox72)
Me.Controls.Add(Me.TextBox71)
Me.Controls.Add(Me.TextBox70)
Me.Controls.Add(Me.TextBox69)
Me.Controls.Add(Me.Label83)
Me.Controls.Add(Me.Label82)
Me.Controls.Add(Me.Label81)
Me.Controls.Add(Me.Label80)
Me.Controls.Add(Me.Label79)
Me.Controls.Add(Me.Label78)
Me.Controls.Add(Me.Label77)
Me.Controls.Add(Me.Label76)
Me.Controls.Add(Me.Label75)
Me.Controls.Add(Me.Label70)
Me.Controls.Add(Me.TextBox68)
Me.Controls.Add(Me.TextBox67)
Me.Controls.Add(Me.TextBox66)
Me.Controls.Add(Me.TextBox65)
Me.Controls.Add(Me.TextBox64)
Me.Controls.Add(Me.TextBox63)
Me.Controls.Add(Me.TextBox62)
Me.Controls.Add(Me.TextBox61)
Me.Controls.Add(Me.TextBox60)
Me.Controls.Add(Me.Label69)
Me.Controls.Add(Me.Label68)
Me.Controls.Add(Me.Label67)
Me.Controls.Add(Me.Label66)
Me.Controls.Add(Me.Label65)
Me.Controls.Add(Me.Label64)
Me.Controls.Add(Me.Label63)
Me.Controls.Add(Me.Label62)
Me.Controls.Add(Me.TextBox59)
Me.Controls.Add(Me.TextBox58)
Me.Controls.Add(Me.TextBox57)
Me.Controls.Add(Me.TextBox56)
Me.Controls.Add(Me.TextBox55)
Me.Controls.Add(Me.TextBox54)
Me.Controls.Add(Me.TextBox53)
Me.Controls.Add(Me.TextBox52)
Me.Controls.Add(Me.Label61)
Me.Controls.Add(Me.Label60)
Me.Controls.Add(Me.Label59)
Me.Controls.Add(Me.Label58)
Me.Controls.Add(Me.Label57)
Me.Controls.Add(Me.Label56)
Me.Controls.Add(Me.Label55)
Me.Controls.Add(Me.TextBox51)
Me.Controls.Add(Me.TextBox50)
Me.Controls.Add(Me.TextBox49)
Me.Controls.Add(Me.TextBox48)
Me.Controls.Add(Me.TextBox47)
Me.Controls.Add(Me.TextBox46)
Me.Controls.Add(Me.TextBox45)
Me.Controls.Add(Me.Label54)
Me.Controls.Add(Me.Label53)
Me.Controls.Add(Me.Label52)
Me.Controls.Add(Me.Label51)
Me.Controls.Add(Me.Label50)
Me.Controls.Add(Me.Label49)
Me.Controls.Add(Me.Label48)
Me.Controls.Add(Me.Label47)
Me.Controls.Add(Me.Label46)
Me.Controls.Add(Me.TextBox44)
Me.Controls.Add(Me.TextBox43)
Me.Controls.Add(Me.TextBox42)
Me.Controls.Add(Me.TextBox41)
Me.Controls.Add(Me.TextBox40)
Me.Controls.Add(Me.TextBox39)
Me.Controls.Add(Me.TextBox38)
Me.Controls.Add(Me.TextBox37)
Me.Controls.Add(Me.TextBox36)
Me.Controls.Add(Me.Label45)
Me.Controls.Add(Me.Label44)
Me.Controls.Add(Me.Label43)
Me.Controls.Add(Me.Label42)
Me.Controls.Add(Me.Label41)
Me.Controls.Add(Me.Label40)
Me.Controls.Add(Me.Label39)
Me.Controls.Add(Me.TextBox35)
Me.Controls.Add(Me.TextBox34)
Me.Controls.Add(Me.TextBox33)
Me.Controls.Add(Me.TextBox32)
Me.Controls.Add(Me.Label38)
Me.Controls.Add(Me.Label37)
Me.Controls.Add(Me.Label36)
Me.Controls.Add(Me.Label35)
Me.Controls.Add(Me.TextBox31)
Me.Controls.Add(Me.TextBox30)
Me.Controls.Add(Me.TextBox29)
Me.Controls.Add(Me.TextBox28)
Me.Controls.Add(Me.Label34)
Me.Controls.Add(Me.Label33)
Me.Controls.Add(Me.Label32)
Me.Controls.Add(Me.Label31)
Me.Controls.Add(Me.Label30)
Me.Controls.Add(Me.Label29)
Me.Controls.Add(Me.Label28)
Me.Controls.Add(Me.Label27)
Me.Controls.Add(Me.Label26)
Me.Controls.Add(Me.Label25)
Me.Controls.Add(Me.Label24)
Me.Controls.Add(Me.Label23)
Me.Controls.Add(Me.Label22)
Me.Controls.Add(Me.Label21)
Me.Controls.Add(Me.Label20)
Me.Controls.Add(Me.TextBox27)
Me.Controls.Add(Me.TextBox26)
Me.Controls.Add(Me.TextBox25)
Me.Controls.Add(Me.TextBox24)
Me.Controls.Add(Me.TextBox23)
Me.Controls.Add(Me.TextBox22)
Me.Controls.Add(Me.TextBox21)
Me.Controls.Add(Me.TextBox20)
Me.Controls.Add(Me.TextBox19)
Me.Controls.Add(Me.TextBox18)
Me.Controls.Add(Me.TextBox17)
Me.Controls.Add(Me.TextBox16)
Me.Controls.Add(Me.TextBox15)
Me.Controls.Add(Me.TextBox14)
Me.Controls.Add(Me.CheckBox10)
Me.Controls.Add(Me.CheckBox9)
Me.Controls.Add(Me.CheckBox8)
Me.Controls.Add(Me.CheckBox7)
Me.Controls.Add(Me.CheckBox6)
Me.Controls.Add(Me.CheckBox5)
Me.Controls.Add(Me.CheckBox4)
Me.Controls.Add(Me.CheckBox3)
Me.Controls.Add(Me.DriveListBox1)
Me.Controls.Add(Me.Button5)
Me.Controls.Add(Me.Button4)
Me.Controls.Add(Me.Button3)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.CheckBox2)
Me.Controls.Add(Me.CheckBox1)
Me.Controls.Add(Me.TextBox13)
Me.Controls.Add(Me.TextBox12)
Me.Controls.Add(Me.TextBox11)
Me.Controls.Add(Me.TextBox10)
Me.Controls.Add(Me.TextBox9)
Me.Controls.Add(Me.TextBox8)
Me.Controls.Add(Me.TextBox7)
Me.Controls.Add(Me.TextBox6)
Me.Controls.Add(Me.TextBox5)
Me.Controls.Add(Me.TextBox4)
Me.Controls.Add(Me.TextBox3)
Me.Controls.Add(Me.TextBox2)
Me.Controls.Add(Me.TextBox1)
Me.Controls.Add(Me.Label19)
Me.Controls.Add(Me.Label18)
Me.Controls.Add(Me.Label17)
Me.Controls.Add(Me.Label16)
Me.Controls.Add(Me.Label15)
Me.Controls.Add(Me.Label14)
Me.Controls.Add(Me.Label13)
Me.Controls.Add(Me.Label12)
Me.Controls.Add(Me.Label11)
Me.Controls.Add(Me.Label10)
Me.Controls.Add(Me.Label9)
Me.Controls.Add(Me.Label8)
Me.Controls.Add(Me.Label7)
Me.Controls.Add(Me.Label6)
Me.Controls.Add(Me.Label5)
Me.Controls.Add(Me.Label4)
Me.Controls.Add(Me.Label3)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Name = "Form4"
Me.Text = "Form4"
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
OpenFileDialog1.DefaultExt = ".bmp" '
OpenFileDialog1.Title = "请选择图片文件"
OpenFileDialog1.Filter = "图像文件(*.bmp) |*.bmp|所有文件(bmp)|*.*"
OpenFileDialog1.ShowDialog()
TextBox2().Text = OpenFileDialog1.FileName
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
OpenFileDialog1.DefaultExt = ".bmp" '
OpenFileDialog1.Title = "请选择图片文件"
OpenFileDialog1.Filter = "图像文件(*.bmp) |*.bmp|所有文件(bmp)|*.*"
OpenFileDialog1.ShowDialog()
TextBox3().Text = OpenFileDialog1.FileName
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
DriveListBox1.Refresh()
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim f4 As Form1
f4 = Me.Owner
If f4.AxPOS011.DevComPortOpen = 1 Then
f4.AxPOS011.DevProBootText = TextBox1.Text
f4.AxPOS011.DevProLogoPicFile = TextBox2.Text
f4.AxPOS011.DevProHotlinePicFile = TextBox3.Text
f4.AxPOS011.DevNumber = CLng(f4.TextBox18.Text)
f4.AxPOS011.DevProWriteLogoPicAndText()
If f4.AxPOS011.OperatingResults = 0 Then
MsgBox("设定logo图片及开机文字成功!")
ElseIf f4.AxPOS011.OperatingResults = 40 Then
MsgBox("logo图片图片文件不存在!") '
ElseIf f4.AxPOS011.OperatingResults = 41 Then
MsgBox("logo图片文件格式错误,正确文件为黑白两像素的128*32的图片文件!") '
ElseIf f4.AxPOS011.OperatingResults = 42 Then
MsgBox("咨询热线图片图片文件不存在!") '
ElseIf f4.AxPOS011.OperatingResults = 43 Then
MsgBox("咨询热线图片文件格式错误,正确文件为黑白两像素的128*64的图片文件!") '
Else
'MsgBox "设备通讯不通!"'
MsgBox(f4.AxPOS011.OperatingResults)
End If
Else
MsgBox("端口未打开!")
End If
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim f4 As Form1
f4 = Me.Owner
f4.AxPOS011.DevProBootText = TextBox1.Text
f4.AxPOS011.DevProLogoPicFile = TextBox2.Text
f4.AxPOS011.DevProHotlinePicFile = TextBox3.Text()
f4.AxPOS011.DevDriverStr = DriveListBox1.Drive
f4.AxPOS011.DevProWriteLogoPicAndTextToDisk()
If f4.AxPOS011.OperatingResults = 0 Then
MsgBox("写logo图片及开机文字到U盘成功!")
ElseIf f4.AxPOS011.OperatingResults = 40 Then
MsgBox("logo图片图片文件不存在!")
TextBox2.Focus()
ElseIf f4.AxPOS011.OperatingResults = 41 Then
MsgBox("logo图片文件格式错误,正确文件为黑白两像素的128*32的图片文件!") '
TextBox2.Focus()
ElseIf f4.AxPOS011.OperatingResults = 42 Then
MsgBox("咨询热线图片图片文件不存在!")
TextBox3.Focus()
ElseIf f4.AxPOS011.OperatingResults = 43 Then
MsgBox("咨询热线图片文件格式错误,正确文件为黑白两像素的128*64的图片文件!") '
TextBox3.Focus()
Else
MsgBox(f4.AxPOS011.OperatingResults)
End If
End Sub
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
DriveListBox2.Refresh()
End Sub
Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
Dim f4 As Form1
f4 = Me.Owner
If f4.AxPOS011.DevComPortOpen = 1 Then
f4.AxPOS011.DevNumber = CLng(f4.TextBox18.Text)
f4.AxPOS011.DevProRead()
If f4.AxPOS011.OperatingResults = 0 Then
TextBox4.Text = f4.AxPOS011.DevProAdminPwdStr '设备管理员密码
TextBox5.Text = f4.AxPOS011.DevProUnitCode '单位代码
If f4.AxPOS011.DevProClassBit0 > 0 Then '使用权限规则1
CheckBox3.Checked = True
Else
CheckBox3.Checked = False
End If
If f4.AxPOS011.DevProClassBit1 > 0 Then '使用权限规则2
CheckBox4.Checked = True
Else
CheckBox4.Checked = False
End If
If f4.AxPOS011.DevProClassBit2 > 0 Then '使用权限规则3
CheckBox5.Checked = True
Else
CheckBox5.Checked = False
End If
If f4.AxPOS011.DevProClassBit3 > 0 Then '使用权限规则4
CheckBox6.Checked = True
Else
CheckBox6.Checked = False
End If
If f4.AxPOS011.DevProClassBit4 > 0 Then '使用权限规则5
CheckBox7.Checked = True
Else
CheckBox7.Checked = False
End If
If f4.AxPOS011.DevProClassBit5 > 0 Then '使用权限规则6
CheckBox8.Checked = True
Else
CheckBox8.Checked = False
End If
If f4.AxPOS011.DevProClassBit6 > 0 Then '使用权限规则7
CheckBox3.Checked = True
Else
CheckBox3.Checked = False
End If
If f4.AxPOS011.DevProClassBit7 > 0 Then '使用权限规则8
CheckBox3.Checked = True
Else
CheckBox3.Checked = False
End If
TextBox6.Text = f4.AxPOS011.DevProMoneyMax '卡内允许最大金额
TextBox7.Text = f4.AxPOS011.DevProMoneyMin '卡内允许最小金额
TextBox8.Text = f4.AxPOS011.DevProMoneyAlert '卡内最小报警金额
TextBox9.Text = f4.AxPOS011.DevProKeyEnterMax '键盘输入最高限额
TextBox10.Text = f4.AxPOS011.DevProSameCardInterval '相同卡最小间隔
'早餐起止时间
TextBox12.Text = f4.AxPOS011.DevProMealTime1StartH
TextBox13.Text = f4.AxPOS011.DevProMealTime1StartM
TextBox14.Text = f4.AxPOS011.DevProMealTime1StopH
TextBox15.Text = f4.AxPOS011.DevProMealTime1StopM
'午餐起止时间
TextBox16.Text = f4.AxPOS011.DevProMealTime2StartH
TextBox17.Text = f4.AxPOS011.DevProMealTime2StartM
TextBox18.Text = f4.AxPOS011.DevProMealTime2StopH
TextBox19.Text = f4.AxPOS011.DevProMealTime2StopM
'晚餐起止时间
TextBox20.Text = f4.AxPOS011.DevProMealTime3StartH
TextBox21.Text = f4.AxPOS011.DevProMealTime3StartM
TextBox22.Text = f4.AxPOS011.DevProMealTime3StopH
TextBox23.Text = f4.AxPOS011.DevProMealTime3StopM
'夜宵起止时间
TextBox24.Text = f4.AxPOS011.DevProMealTime4StartH
TextBox25.Text = f4.AxPOS011.DevProMealTime4StartM
TextBox26.Text = f4.AxPOS011.DevProMealTime4StopH
TextBox27.Text = f4.AxPOS011.DevProMealTime4StopM
TextBox28.Text = f4.AxPOS011.DevProMealMoney1Max '早餐最高限额
TextBox29.Text = f4.AxPOS011.DevProMealMoney2Max '午餐最高限额
TextBox30.Text = f4.AxPOS011.DevProMealMoney3Max '晚餐最高限额
TextBox31.Text = f4.AxPOS011.DevProMealMoney4Max '夜宵最高限额
TextBox32.Text = f4.AxPOS011.DevProMealTimes1Max '早餐最高限次
TextBox33.Text = f4.AxPOS011.DevProMealTimes2Max '午餐最高限次
TextBox34.Text = f4.AxPOS011.DevProMealTimes3Max '晚餐最高限次
TextBox35.Text = f4.AxPOS011.DevProMealTimes4Max '夜宵最高限次
If f4.AxPOS011.DevProConsAddToMeal > 0 Then '每餐累计
CheckBox1.Checked = True
Else
CheckBox1.Checked = False
End If
If f4.AxPOS011.DevProConsAddToDay > 0 Then '每天累计
CheckBox2.Checked = True
Else
CheckBox2.Checked = False
End If
TextBox11.Text = f4.AxPOS011.DevProConsMode '消费模式
TextBox36.Text = f4.AxPOS011.DevProClass0QuotaMoney1 '卡类别0早餐定额
TextBox37.Text = f4.AxPOS011.DevProClass0QuotaMoney2 '卡类别0午餐定额
TextBox38.Text = f4.AxPOS011.DevProClass0QuotaMoney3 '卡类别0晚餐定额
TextBox39.Text = f4.AxPOS011.DevProClass0QuotaMoney4 '卡类别0夜宵定额
TextBox40.Text = f4.AxPOS011.DevProClass1QuotaMoney1 '卡类别1早餐定额
TextBox41.Text = f4.AxPOS011.DevProClass1QuotaMoney2 '卡类别1午餐定额
TextBox42.Text = f4.AxPOS011.DevProClass1QuotaMoney3 '卡类别1晚餐定额
TextBox43.Text = f4.AxPOS011.DevProClass1QuotaMoney4 '卡类别1夜宵定额
TextBox44.Text = f4.AxPOS011.DevProClass2QuotaMoney1 '卡类别2早餐定额
TextBox45.Text = f4.AxPOS011.DevProClass2QuotaMoney2 '卡类别2午餐定额
TextBox46.Text = f4.AxPOS011.DevProClass2QuotaMoney3 '卡类别2晚餐定额
TextBox47.Text = f4.AxPOS011.DevProClass2QuotaMoney4 '卡类别2夜宵定额
TextBox48.Text = f4.AxPOS011.DevProClass3QuotaMoney1 '卡类别3早餐定额
TextBox49.Text = f4.AxPOS011.DevProClass3QuotaMoney2 '卡类别3午餐定额
TextBox50.Text = f4.AxPOS011.DevProClass3QuotaMoney3 '卡类别3晚餐定额
TextBox51.Text = f4.AxPOS011.DevProClass3QuotaMoney4 '卡类别3夜宵定额
TextBox52.Text = f4.AxPOS011.DevProClass4QuotaMoney1 '卡类别4早餐定额
TextBox53.Text = f4.AxPOS011.DevProClass4QuotaMoney2 '卡类别4午餐定额
TextBox54.Text = f4.AxPOS011.DevProClass4QuotaMoney3 '卡类别4晚餐定额
TextBox55.Text = f4.AxPOS011.DevProClass4QuotaMoney4 '卡类别4夜宵定额
TextBox56.Text = f4.AxPOS011.DevProClass5QuotaMoney1 '卡类别5早餐定额
TextBox57.Text = f4.AxPOS011.DevProClass5QuotaMoney2 '卡类别5午餐定额
TextBox58.Text = f4.AxPOS011.DevProClass5QuotaMoney3 '卡类别5晚餐定额
TextBox59.Text = f4.AxPOS011.DevProClass5QuotaMoney4 '卡类别5夜宵定额
TextBox60.Text = f4.AxPOS011.DevProClass6QuotaMoney1 '卡类别6早餐定额
TextBox61.Text = f4.AxPOS011.DevProClass6QuotaMoney2 '卡类别6午餐定额
TextBox62.Text = f4.AxPOS011.DevProClass6QuotaMoney3 '卡类别6晚餐定额
TextBox63.Text = f4.AxPOS011.DevProClass6QuotaMoney4 '卡类别6夜宵定额
TextBox64.Text = f4.AxPOS011.DevProClass7QuotaMoney1 '卡类别7早餐定额
TextBox65.Text = f4.AxPOS011.DevProClass7QuotaMoney2 '卡类别7午餐定额
TextBox66.Text = f4.AxPOS011.DevProClass7QuotaMoney3 '卡类别7晚餐定额
TextBox67.Text = f4.AxPOS011.DevProClass7QuotaMoney4 '卡类别7夜宵定额
TextBox68.Text = f4.AxPOS011.DevProShortcutkey0 '快捷键0数值
TextBox69.Text = f4.AxPOS011.DevProShortcutkey1 '快捷键1数值
TextBox70.Text = f4.AxPOS011.DevProShortcutkey2 '快捷键2数值
TextBox71.Text = f4.AxPOS011.DevProShortcutkey3 '快捷键3数值
TextBox72.Text = f4.AxPOS011.DevProShortcutkey4 '快捷键4数值
TextBox73.Text = f4.AxPOS011.DevProShortcutkey5 '快捷键5数值
TextBox74.Text = f4.AxPOS011.DevProShortcutkey6 '快捷键6数值
TextBox75.Text = f4.AxPOS011.DevProShortcutkey7 '快捷键7数值
TextBox76.Text = f4.AxPOS011.DevProShortcutkey8 '快捷键8数值
TextBox77.Text = f4.AxPOS011.DevProShortcutkey9 '快捷键9数值
MsgBox("读取属性成功!")
Else
MsgBox("设备通讯不通!")
End If
Else
MsgBox("端口未打开!")
End If
End Sub
Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
Dim f4 As Form1
f4 = Me.Owner
If f4.AxPOS011.DevComPortOpen = 1 Then
f4.AxPOS011.DevProAdminPwdStr = TextBox4.Text '设备管理员密码
f4.AxPOS011.DevProUnitCode = TextBox5.Text '单位代码
If CheckBox3.Checked = True Then '使用权限规则1
f4.AxPOS011.DevProClassBit0 = 1
Else
f4.AxPOS011.DevProClassBit0 = 0
End If
If CheckBox4.Checked = True Then '使用权限规则2
f4.AxPOS011.DevProClassBit1 = 1
Else
f4.AxPOS011.DevProClassBit1 = 0
End If
If CheckBox5.Checked = True Then '使用权限规则3
f4.AxPOS011.DevProClassBit2 = 1
Else
f4.AxPOS011.DevProClassBit2 = 0
End If
If CheckBox6.Checked = True Then '使用权限规则4
f4.AxPOS011.DevProClassBit3 = 1
Else
f4.AxPOS011.DevProClassBit3 = 0
End If
If CheckBox7.Checked = True Then '使用权限规则5
f4.AxPOS011.DevProClassBit4 = 1
Else
f4.AxPOS011.DevProClassBit4 = 0
End If
If CheckBox8.Checked = True Then '使用权限规则6
f4.AxPOS011.DevProClassBit5 = 1
Else
f4.AxPOS011.DevProClassBit5 = 0
End If
If CheckBox9.Checked = True Then '使用权限规则7
f4.AxPOS011.DevProClassBit6 = 1
Else
f4.AxPOS011.DevProClassBit6 = 0
End If
If CheckBox10.Checked = True Then '使用权限规则8
f4.AxPOS011.DevProClassBit7 = 1
Else
f4.AxPOS011.DevProClassBit7 = 0
End If
f4.AxPOS011.DevProMoneyMax = TextBox6.Text '卡内允许最大金额
f4.AxPOS011.DevProMoneyMin = TextBox7.Text '卡内允许最小金额
f4.AxPOS011.DevProMoneyAlert = TextBox8.Text '卡内最小报警金额
f4.AxPOS011.DevProKeyEnterMax = TextBox9.Text '键盘输入最高限额
f4.AxPOS011.DevProSameCardInterval = TextBox10.Text '相同卡最小间隔
'早餐起止时间
f4.AxPOS011.DevProMealTime1StartH = TextBox12.Text
f4.AxPOS011.DevProMealTime1StartM = TextBox13.Text
f4.AxPOS011.DevProMealTime1StopH = TextBox14.Text
f4.AxPOS011.DevProMealTime1StopM = TextBox15.Text
'午餐起止时间
f4.AxPOS011.DevProMealTime2StartH = TextBox16.Text
f4.AxPOS011.DevProMealTime2StartM = TextBox17.Text
f4.AxPOS011.DevProMealTime2StopH = TextBox18.Text
f4.AxPOS011.DevProMealTime2StopM = TextBox19.Text
'晚餐起止时间
f4.AxPOS011.DevProMealTime3StartH = TextBox20.Text
f4.AxPOS011.DevProMealTime3StartM = TextBox21.Text
f4.AxPOS011.DevProMealTime3StopH = TextBox22.Text
f4.AxPOS011.DevProMealTime3StopM = TextBox23.Text
'夜宵起止时间
f4.AxPOS011.DevProMealTime4StartH = TextBox24.Text
f4.AxPOS011.DevProMealTime4StartM = TextBox25.Text
f4.AxPOS011.DevProMealTime4StopH = TextBox26.Text
f4.AxPOS011.DevProMealTime4StopM = TextBox27.Text
f4.AxPOS011.DevProMealMoney1Max = TextBox28.Text '早餐最高限额
f4.AxPOS011.DevProMealMoney2Max = TextBox29.Text '午餐最高限额
f4.AxPOS011.DevProMealMoney3Max = TextBox30.Text '晚餐最高限额
f4.AxPOS011.DevProMealMoney4Max = TextBox31.Text '夜宵最高限额
f4.AxPOS011.DevProMealTimes1Max = TextBox32.Text '早餐最高限次
f4.AxPOS011.DevProMealTimes2Max = TextBox33.Text '午餐最高限次
f4.AxPOS011.DevProMealTimes3Max = TextBox34.Text '晚餐最高限次
f4.AxPOS011.DevProMealTimes4Max = TextBox35.Text '夜宵最高限次
If CheckBox1.Checked = True Then '每餐累计
f4.AxPOS011.DevProConsAddToMeal = 1
Else
f4.AxPOS011.DevProConsAddToMeal = 0
End If
If CheckBox2.Checked = True Then '每天累计
f4.AxPOS011.DevProConsAddToDay = 1
Else
f4.AxPOS011.DevProConsAddToDay = 0
End If
f4.AxPOS011.DevProConsMode = TextBox11.Text '消费模式
f4.AxPOS011.DevProClass0QuotaMoney1 = TextBox36.Text '卡类别0早餐定额
f4.AxPOS011.DevProClass0QuotaMoney2 = TextBox37.Text '卡类别0午餐定额
f4.AxPOS011.DevProClass0QuotaMoney3 = TextBox38.Text '卡类别0晚餐定额
f4.AxPOS011.DevProClass0QuotaMoney4 = TextBox39.Text '卡类别0夜宵定额
f4.AxPOS011.DevProClass1QuotaMoney1 = TextBox40.Text '卡类别1早餐定额
f4.AxPOS011.DevProClass1QuotaMoney2 = TextBox41.Text '卡类别1午餐定额
f4.AxPOS011.DevProClass1QuotaMoney3 = TextBox42.Text '卡类别1晚餐定额
f4.AxPOS011.DevProClass1QuotaMoney4 = TextBox43.Text '卡类别1夜宵定额
f4.AxPOS011.DevProClass2QuotaMoney1 = TextBox44.Text '卡类别2早餐定额
f4.AxPOS011.DevProClass2QuotaMoney2 = TextBox45.Text '卡类别2午餐定额
f4.AxPOS011.DevProClass2QuotaMoney3 = TextBox46.Text '卡类别2晚餐定额
f4.AxPOS011.DevProClass2QuotaMoney4 = TextBox47.Text '卡类别2夜宵定额
f4.AxPOS011.DevProClass3QuotaMoney1 = TextBox48.Text '卡类别3早餐定额
f4.AxPOS011.DevProClass3QuotaMoney2 = TextBox49.Text '卡类别3午餐定额
f4.AxPOS011.DevProClass3QuotaMoney3 = TextBox50.Text '卡类别3晚餐定额
f4.AxPOS011.DevProClass3QuotaMoney4 = TextBox51.Text '卡类别3夜宵定额
f4.AxPOS011.DevProClass4QuotaMoney1 = TextBox52.Text '卡类别4早餐定额
f4.AxPOS011.DevProClass4QuotaMoney2 = TextBox53.Text '卡类别4午餐定额
f4.AxPOS011.DevProClass4QuotaMoney3 = TextBox54.Text '卡类别4晚餐定额
f4.AxPOS011.DevProClass4QuotaMoney4 = TextBox55.Text '卡类别4夜宵定额
f4.AxPOS011.DevProClass5QuotaMoney1 = TextBox56.Text '卡类别5早餐定额
f4.AxPOS011.DevProClass5QuotaMoney2 = TextBox57.Text '卡类别5午餐定额
f4.AxPOS011.DevProClass5QuotaMoney3 = TextBox58.Text '卡类别5晚餐定额
f4.AxPOS011.DevProClass5QuotaMoney4 = TextBox59.Text '卡类别5夜宵定额
f4.AxPOS011.DevProClass6QuotaMoney1 = TextBox60.Text '卡类别6早餐定额
f4.AxPOS011.DevProClass6QuotaMoney2 = TextBox61.Text '卡类别6午餐定额
f4.AxPOS011.DevProClass6QuotaMoney3 = TextBox62.Text '卡类别6晚餐定额
f4.AxPOS011.DevProClass6QuotaMoney4 = TextBox63.Text '卡类别6夜宵定额
f4.AxPOS011.DevProClass7QuotaMoney1 = TextBox64.Text '卡类别7早餐定额
f4.AxPOS011.DevProClass7QuotaMoney2 = TextBox65.Text '卡类别7午餐定额
f4.AxPOS011.DevProClass7QuotaMoney3 = TextBox66.Text '卡类别7晚餐定额
f4.AxPOS011.DevProClass7QuotaMoney4 = TextBox67.Text '卡类别7夜宵定额
f4.AxPOS011.DevProShortcutkey0 = TextBox68.Text '快捷键0数值
f4.AxPOS011.DevProShortcutkey1 = TextBox69.Text '快捷键1数值
f4.AxPOS011.DevProShortcutkey2 = TextBox70.Text '快捷键2数值
f4.AxPOS011.DevProShortcutkey3 = TextBox71.Text '快捷键3数值
f4.AxPOS011.DevProShortcutkey4 = TextBox72.Text '快捷键4数值
f4.AxPOS011.DevProShortcutkey5 = TextBox73.Text '快捷键5数值
f4.AxPOS011.DevProShortcutkey6 = TextBox74.Text '快捷键6数值
f4.AxPOS011.DevProShortcutkey7 = TextBox75.Text '快捷键7数值
f4.AxPOS011.DevProShortcutkey8 = TextBox76.Text '快捷键8数值
f4.AxPOS011.DevProShortcutkey9 = TextBox77.Text '快捷键9数值
f4.AxPOS011.DevNumber = CLng(f4.TextBox18.Text)
f4.AxPOS011.DevProWrite()
If f4.AxPOS011.OperatingResults = 0 Then
MsgBox("写设备属性成功!")
Else
MsgBox("设备通讯不通!")
End If
Else
MsgBox("端口未打开!")
End If
End Sub
Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click
Dim f4 As Form1
f4 = Me.Owner
f4.AxPOS011.DevProAdminPwdStr = TextBox4.Text '设备管理员密码
f4.AxPOS011.DevProUnitCode = TextBox5.Text '单位代码
If CheckBox3.Checked = True Then '使用权限规则1
f4.AxPOS011.DevProClassBit0 = 1
Else
f4.AxPOS011.DevProClassBit0 = 0
End If
If CheckBox4.Checked = True Then '使用权限规则2
f4.AxPOS011.DevProClassBit1 = 1
Else
f4.AxPOS011.DevProClassBit1 = 0
End If
If CheckBox5.Checked = True Then '使用权限规则3
f4.AxPOS011.DevProClassBit2 = 1
Else
f4.AxPOS011.DevProClassBit2 = 0
End If
If CheckBox6.Checked = True Then '使用权限规则4
f4.AxPOS011.DevProClassBit3 = 1
Else
f4.AxPOS011.DevProClassBit3 = 0
End If
If CheckBox7.Checked = True > 0 Then '使用权限规则5
f4.AxPOS011.DevProClassBit4 = 1
Else
f4.AxPOS011.DevProClassBit4 = 0
End If
If CheckBox8.Checked = True Then '使用权限规则6
f4.AxPOS011.DevProClassBit5 = 1
Else
f4.AxPOS011.DevProClassBit5 = 0
End If
If CheckBox9.Checked = True Then '使用权限规则7
f4.AxPOS011.DevProClassBit6 = 1
Else
f4.AxPOS011.DevProClassBit6 = 0
End If
If CheckBox10.Checked = True Then '使用权限规则8
f4.AxPOS011.DevProClassBit7 = 1
Else
f4.AxPOS011.DevProClassBit7 = 0
End If
f4.AxPOS011.DevProMoneyMax = TextBox6.Text '卡内允许最大金额
f4.AxPOS011.DevProMoneyMin = TextBox7.Text '卡内允许最小金额
f4.AxPOS011.DevProMoneyAlert = TextBox8.Text '卡内最小报警金额
f4.AxPOS011.DevProKeyEnterMax = TextBox9.Text '键盘输入最高限额
f4.AxPOS011.DevProSameCardInterval = TextBox10.Text '相同卡最小间隔
'早餐起止时间
f4.AxPOS011.DevProMealTime1StartH = TextBox12.Text
f4.AxPOS011.DevProMealTime1StartM = TextBox13.Text
f4.AxPOS011.DevProMealTime1StopH = TextBox14.Text
f4.AxPOS011.DevProMealTime1StopM = TextBox15.Text
'午餐起止时间
f4.AxPOS011.DevProMealTime2StartH = TextBox16.Text
f4.AxPOS011.DevProMealTime2StartM = TextBox17.Text
f4.AxPOS011.DevProMealTime2StopH = TextBox18.Text
f4.AxPOS011.DevProMealTime2StopM = TextBox19.Text
'晚餐起止时间
f4.AxPOS011.DevProMealTime3StartH = TextBox20.Text
f4.AxPOS011.DevProMealTime3StartM = TextBox21.Text
f4.AxPOS011.DevProMealTime3StopH = TextBox22.Text
f4.AxPOS011.DevProMealTime3StopM = TextBox23.Text
'夜宵起止时间
f4.AxPOS011.DevProMealTime4StartH = TextBox24.Text
f4.AxPOS011.DevProMealTime4StartM = TextBox25.Text
f4.AxPOS011.DevProMealTime4StopH = TextBox26.Text
f4.AxPOS011.DevProMealTime4StopM = TextBox27.Text
f4.AxPOS011.DevProMealMoney1Max = TextBox28.Text '早餐最高限额
f4.AxPOS011.DevProMealMoney2Max = TextBox29.Text '午餐最高限额
f4.AxPOS011.DevProMealMoney3Max = TextBox30.Text '晚餐最高限额
f4.AxPOS011.DevProMealMoney4Max = TextBox31.Text '夜宵最高限额
f4.AxPOS011.DevProMealTimes1Max = TextBox32.Text '早餐最高限次
f4.AxPOS011.DevProMealTimes2Max = TextBox33.Text '午餐最高限次
f4.AxPOS011.DevProMealTimes3Max = TextBox34.Text '晚餐最高限次
f4.AxPOS011.DevProMealTimes4Max = TextBox35.Text '夜宵最高限次
If CheckBox1.Checked = True Then '每餐累计
f4.AxPOS011.DevProConsAddToMeal = 1
Else
f4.AxPOS011.DevProConsAddToMeal = 0
End If
If CheckBox2.Checked = True Then '每天累计
f4.AxPOS011.DevProConsAddToDay = 1
Else
f4.AxPOS011.DevProConsAddToDay = 0
End If
f4.AxPOS011.DevProConsMode = TextBox11.Text '消费模式
f4.AxPOS011.DevProClass0QuotaMoney1 = TextBox36.Text '卡类别0早餐定额
f4.AxPOS011.DevProClass0QuotaMoney2 = TextBox37.Text '卡类别0午餐定额
f4.AxPOS011.DevProClass0QuotaMoney3 = TextBox38.Text '卡类别0晚餐定额
f4.AxPOS011.DevProClass0QuotaMoney4 = TextBox39.Text '卡类别0夜宵定额
f4.AxPOS011.DevProClass1QuotaMoney1 = TextBox40.Text '卡类别1早餐定额
f4.AxPOS011.DevProClass1QuotaMoney2 = TextBox41.Text '卡类别1午餐定额
f4.AxPOS011.DevProClass1QuotaMoney3 = TextBox42.Text '卡类别1晚餐定额
f4.AxPOS011.DevProClass1QuotaMoney4 = TextBox43.Text '卡类别1夜宵定额
f4.AxPOS011.DevProClass2QuotaMoney1 = TextBox44.Text '卡类别2早餐定额
f4.AxPOS011.DevProClass2QuotaMoney2 = TextBox45.Text '卡类别2午餐定额
f4.AxPOS011.DevProClass2QuotaMoney3 = TextBox46.Text '卡类别2晚餐定额
f4.AxPOS011.DevProClass2QuotaMoney4 = TextBox47.Text '卡类别2夜宵定额
f4.AxPOS011.DevProClass3QuotaMoney1 = TextBox48.Text '卡类别3早餐定额
f4.AxPOS011.DevProClass3QuotaMoney2 = TextBox49.Text '卡类别3午餐定额
f4.AxPOS011.DevProClass3QuotaMoney3 = TextBox50.Text '卡类别3晚餐定额
f4.AxPOS011.DevProClass3QuotaMoney4 = TextBox51.Text '卡类别3夜宵定额
f4.AxPOS011.DevProClass4QuotaMoney1 = TextBox52.Text '卡类别4早餐定额
f4.AxPOS011.DevProClass4QuotaMoney2 = TextBox53.Text '卡类别4午餐定额
f4.AxPOS011.DevProClass4QuotaMoney3 = TextBox54.Text '卡类别4晚餐定额
f4.AxPOS011.DevProClass4QuotaMoney4 = TextBox55.Text '卡类别4夜宵定额
f4.AxPOS011.DevProClass5QuotaMoney1 = TextBox56.Text '卡类别5早餐定额
f4.AxPOS011.DevProClass5QuotaMoney2 = TextBox57.Text '卡类别5午餐定额
f4.AxPOS011.DevProClass5QuotaMoney3 = TextBox58.Text '卡类别5晚餐定额
f4.AxPOS011.DevProClass5QuotaMoney4 = TextBox59.Text '卡类别5夜宵定额
f4.AxPOS011.DevProClass6QuotaMoney1 = TextBox60.Text '卡类别6早餐定额
f4.AxPOS011.DevProClass6QuotaMoney2 = TextBox61.Text '卡类别6午餐定额
f4.AxPOS011.DevProClass6QuotaMoney3 = TextBox62.Text '卡类别6晚餐定额
f4.AxPOS011.DevProClass6QuotaMoney4 = TextBox63.Text '卡类别6夜宵定额
f4.AxPOS011.DevProClass7QuotaMoney1 = TextBox64.Text '卡类别7早餐定额
f4.AxPOS011.DevProClass7QuotaMoney2 = TextBox65.Text '卡类别7午餐定额
f4.AxPOS011.DevProClass7QuotaMoney3 = TextBox66.Text '卡类别7晚餐定额
f4.AxPOS011.DevProClass7QuotaMoney4 = TextBox67.Text '卡类别7夜宵定额
f4.AxPOS011.DevProShortcutkey0 = TextBox68.Text '快捷键0数值
f4.AxPOS011.DevProShortcutkey1 = TextBox69.Text '快捷键1数值
f4.AxPOS011.DevProShortcutkey2 = TextBox70.Text '快捷键2数值
f4.AxPOS011.DevProShortcutkey3 = TextBox71.Text '快捷键3数值
f4.AxPOS011.DevProShortcutkey4 = TextBox72.Text '快捷键4数值
f4.AxPOS011.DevProShortcutkey5 = TextBox73.Text '快捷键5数值
f4.AxPOS011.DevProShortcutkey6 = TextBox74.Text '快捷键6数值
f4.AxPOS011.DevProShortcutkey7 = TextBox75.Text '快捷键7数值
f4.AxPOS011.DevProShortcutkey8 = TextBox76.Text '快捷键8数值
f4.AxPOS011.DevProShortcutkey9 = TextBox77.Text '快捷键9数值
f4.AxPOS011.DevDriverStr = DriveListBox2.Drive
f4.AxPOS011.DevProWriteToDisk()
If f4.AxPOS011.OperatingResults = 0 Then
MsgBox("写设备属性到U盘成功!")
Else
MsgBox("写设备属性到U盘失败!")
End If
End Sub
End Class
6399

被折叠的 条评论
为什么被折叠?



