indexform.vb

本人收集到的流水帐软件!小巧实用,希望对大家有说帮助.

        Me.ColumnHeaderIn.Text = "项目"
        Me.ColumnHeaderIn.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
        '
        'ColumnHeaderInType
        '
        Me.ColumnHeaderInType.Text = "类别"
        Me.ColumnHeaderInType.Width = 120
        '
        'ColumnHeaderInMoney
        '
        Me.ColumnHeaderInMoney.Text = "金额"
        Me.ColumnHeaderInMoney.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        Me.ColumnHeaderInMoney.Width = 70
        '
        'ColumnHeaderInText
        '
        Me.ColumnHeaderInText.Text = "备注"
        Me.ColumnHeaderInText.Width = 185
        '
        'DateTimePickerSR
        '
        Me.DateTimePickerSR.CustomFormat = ""
        Me.DateTimePickerSR.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.DateTimePickerSR.Format = System.Windows.Forms.DateTimePickerFormat.Short
        Me.DateTimePickerSR.Location = New System.Drawing.Point(64, 32)
        Me.DateTimePickerSR.MinDate = New Date(2000, 1, 1, 0, 0, 0, 0)
        Me.DateTimePickerSR.Name = "DateTimePickerSR"
        Me.DateTimePickerSR.Size = New System.Drawing.Size(248, 21)
        Me.DateTimePickerSR.TabIndex = 23
        Me.DateTimePickerSR.Value = New Date(2008, 1, 1, 0, 0, 0, 0)
        '
        'Label8
        '
        Me.Label8.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label8.Location = New System.Drawing.Point(320, 192)
        Me.Label8.Name = "Label8"
        Me.Label8.Size = New System.Drawing.Size(184, 23)
        Me.Label8.TabIndex = 22
        Me.Label8.Text = "第六步：添加完所有，点击完成"
        Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'ButtonSRDel
        '
        Me.ButtonSRDel.FlatStyle = System.Windows.Forms.FlatStyle.System
        Me.ButtonSRDel.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.ButtonSRDel.Location = New System.Drawing.Point(488, 496)
        Me.ButtonSRDel.Name = "ButtonSRDel"
        Me.ButtonSRDel.Size = New System.Drawing.Size(60, 23)
        Me.ButtonSRDel.TabIndex = 19
        Me.ButtonSRDel.Text = "删除"
        '
        'LabelAllSr
        '
        Me.LabelAllSr.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.LabelAllSr.ForeColor = System.Drawing.Color.Red
        Me.LabelAllSr.Location = New System.Drawing.Point(24, 504)
        Me.LabelAllSr.Name = "LabelAllSr"
        Me.LabelAllSr.Size = New System.Drawing.Size(152, 16)
        Me.LabelAllSr.TabIndex = 17
        Me.LabelAllSr.Text = "所有收入合计："
        '
        'ButtonSRAdd
        '
        Me.ButtonSRAdd.FlatStyle = System.Windows.Forms.FlatStyle.System
        Me.ButtonSRAdd.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.ButtonSRAdd.Location = New System.Drawing.Point(512, 192)
        Me.ButtonSRAdd.Name = "ButtonSRAdd"
        Me.ButtonSRAdd.Size = New System.Drawing.Size(56, 23)
        Me.ButtonSRAdd.TabIndex = 16
        Me.ButtonSRAdd.Text = "添加"
        '
        'ComboBoxSRType
        '
        Me.ComboBoxSRType.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.ComboBoxSRType.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.ComboBoxSRType.ItemHeight = 12
        Me.ComboBoxSRType.Location = New System.Drawing.Point(64, 64)
        Me.ComboBoxSRType.Name = "ComboBoxSRType"
        Me.ComboBoxSRType.Size = New System.Drawing.Size(248, 20)
        Me.ComboBoxSRType.TabIndex = 15
        '
        'Label6
        '
        Me.Label6.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label6.ImageAlign = System.Drawing.ContentAlignment.TopLeft
        Me.Label6.Location = New System.Drawing.Point(16, 224)
        Me.Label6.Name = "Label6"
        Me.Label6.Size = New System.Drawing.Size(96, 16)
        Me.Label6.TabIndex = 14
        Me.Label6.Text = "收入记帐明细表"
        Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Label5
        '
        Me.Label5.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label5.Location = New System.Drawing.Point(320, 160)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(232, 23)
        Me.Label5.TabIndex = 12
        Me.Label5.Text = "第五步：添加完所有收入，点击添加"
        Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'Label4
        '
        Me.Label4.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label4.Location = New System.Drawing.Point(320, 128)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(232, 23)
        Me.Label4.TabIndex = 11
        Me.Label4.Text = "第四步：填写备注，如：发12月份工资"
        Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'TextBoxSRText
        '
        Me.TextBoxSRText.AcceptsReturn = True
        Me.TextBoxSRText.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.TextBoxSRText.Location = New System.Drawing.Point(64, 128)
        Me.TextBoxSRText.Multiline = True
        Me.TextBoxSRText.Name = "TextBoxSRText"
        Me.TextBoxSRText.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
        Me.TextBoxSRText.Size = New System.Drawing.Size(248, 88)
        Me.TextBoxSRText.TabIndex = 10
        Me.TextBoxSRText.Text = ""
        '
        'LabelText
        '
        Me.LabelText.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.LabelText.Location = New System.Drawing.Point(16, 128)
        Me.LabelText.Name = "LabelText"
        Me.LabelText.Size = New System.Drawing.Size(296, 16)
        Me.LabelText.TabIndex = 9
        Me.LabelText.Text = "备注："
        Me.LabelText.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'Label3
        '
        Me.Label3.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label3.Location = New System.Drawing.Point(320, 96)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(232, 23)
        Me.Label3.TabIndex = 8
        Me.Label3.Text = "第三步：填入收入的金额，如：100.00"
        Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'TextBoxSRMoney
        '
        Me.TextBoxSRMoney.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.TextBoxSRMoney.Location = New System.Drawing.Point(64, 96)
        Me.TextBoxSRMoney.Name = "TextBoxSRMoney"
        Me.TextBoxSRMoney.Size = New System.Drawing.Size(248, 21)
        Me.TextBoxSRMoney.TabIndex = 7
        Me.TextBoxSRMoney.Text = "0.00"
        '
        'LabelMoney
        '
        Me.LabelMoney.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.LabelMoney.Location = New System.Drawing.Point(16, 96)
        Me.LabelMoney.Name = "LabelMoney"
        Me.LabelMoney.Size = New System.Drawing.Size(304, 23)
        Me.LabelMoney.TabIndex = 6
        Me.LabelMoney.Text = "金额："
        Me.LabelMoney.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'Label2
        '
        Me.Label2.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label2.Location = New System.Drawing.Point(320, 64)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(232, 23)
        Me.Label2.TabIndex = 5
        Me.Label2.Text = "第二步：选择收入的类型，如：工资"
        Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'LabelType
        '
        Me.LabelType.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.LabelType.Location = New System.Drawing.Point(16, 64)
        Me.LabelType.Name = "LabelType"
        Me.LabelType.Size = New System.Drawing.Size(304, 23)
        Me.LabelType.TabIndex = 3
        Me.LabelType.Text = "类别："
        Me.LabelType.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'Label1
        '
        Me.Label1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label1.Location = New System.Drawing.Point(320, 32)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(232, 23)
        Me.Label1.TabIndex = 2
        Me.Label1.Text = "第一步.请选择日期，如：2007-12-28"
        Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'LabelData
        '
        Me.LabelData.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.LabelData.Location = New System.Drawing.Point(16, 32)
        Me.LabelData.Name = "LabelData"
        Me.LabelData.Size = New System.Drawing.Size(304, 23)
        Me.LabelData.TabIndex = 0
        Me.LabelData.Text = "日期："
        Me.LabelData.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'GroupBoxZC
        '
        Me.GroupBoxZC.Controls.Add(Me.ListViewZC)
        Me.GroupBoxZC.Controls.Add(Me.DateTimePickerZC)
        Me.GroupBoxZC.Controls.Add(Me.Label9)
        Me.GroupBoxZC.Controls.Add(Me.ButtonZCDel)
        Me.GroupBoxZC.Controls.Add(Me.LabelAllZC)
        Me.GroupBoxZC.Controls.Add(Me.ButtonZCAdd)
        Me.GroupBoxZC.Controls.Add(Me.ComboBoxZCType)
        Me.GroupBoxZC.Controls.Add(Me.Label12)
        Me.GroupBoxZC.Controls.Add(Me.Label13)
        Me.GroupBoxZC.Controls.Add(Me.Label14)
        Me.GroupBoxZC.Controls.Add(Me.TextBoxZCText)
        Me.GroupBoxZC.Controls.Add(Me.Label15)
        Me.GroupBoxZC.Controls.Add(Me.Label16)
        Me.GroupBoxZC.Controls.Add(Me.TextBoxZCMoney)
        Me.GroupBoxZC.Controls.Add(Me.Label17)
        Me.GroupBoxZC.Controls.Add(Me.Label18)
        Me.GroupBoxZC.Controls.Add(Me.Label19)
        Me.GroupBoxZC.Controls.Add(Me.Label20)
        Me.GroupBoxZC.Controls.Add(Me.Label21)
        Me.GroupBoxZC.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.GroupBoxZC.Location = New System.Drawing.Point(192, 8)
        Me.GroupBoxZC.Name = "GroupBoxZC"
        Me.GroupBoxZC.Size = New System.Drawing.Size(576, 528)
        Me.GroupBoxZC.TabIndex = 3
        Me.GroupBoxZC.TabStop = False
        Me.GroupBoxZC.Text = "支出记帐信息"
        '
        'ListViewZC
        '
        Me.ListViewZC.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1, Me.ColumnHeaderOutData, Me.ColumnHeaderOut, Me.ColumnHeaderOutType, Me.ColumnHeaderOutMoney, Me.ColumnHeaderOutText})
        Me.ListViewZC.Font = New System.Drawing.Font("宋体", 10.0!)
        Me.ListViewZC.FullRowSelect = True
        Me.ListViewZC.GridLines = True
        Me.ListViewZC.Location = New System.Drawing.Point(24, 240)
        Me.ListViewZC.Name = "ListViewZC"
        Me.ListViewZC.Size = New System.Drawing.Size(544, 248)
        Me.ListViewZC.TabIndex = 2
        Me.ListViewZC.View = System.Windows.Forms.View.Details
        '
        'ColumnHeader1
        '
        Me.ColumnHeader1.Text = ""
        Me.ColumnHeader1.Width = 12
        '
        'ColumnHeaderOutData
        '
        Me.ColumnHeaderOutData.Text = "日期"
        Me.ColumnHeaderOutData.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
        Me.ColumnHeaderOutData.Width = 85
        '
        'ColumnHeaderOut
        '