salegatheringform.designer.vb
来自「一个商品销售管理系统」· VB 代码 · 共 740 行 · 第 1/3 页
VB
740 行
Me.groupBox1.Size = New System.Drawing.Size(530, 106)
Me.groupBox1.TabIndex = 50
Me.groupBox1.TabStop = False
Me.groupBox1.Text = "收到客户商品销售货款"
'
'退出Button
'
Me.退出Button.Image = CType(resources.GetObject("退出Button.Image"), System.Drawing.Image)
Me.退出Button.Location = New System.Drawing.Point(433, 73)
Me.退出Button.Name = "退出Button"
Me.退出Button.Size = New System.Drawing.Size(90, 23)
Me.退出Button.TabIndex = 51
Me.退出Button.Text = "退出"
Me.退出Button.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.退出Button.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
Me.退出Button.UseVisualStyleBackColor = True
'
'打印Button
'
Me.打印Button.Image = CType(resources.GetObject("打印Button.Image"), System.Drawing.Image)
Me.打印Button.Location = New System.Drawing.Point(434, 19)
Me.打印Button.Name = "打印Button"
Me.打印Button.Size = New System.Drawing.Size(90, 23)
Me.打印Button.TabIndex = 50
Me.打印Button.Text = "打印"
Me.打印Button.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.打印Button.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
Me.打印Button.UseVisualStyleBackColor = True
'
'保存Button
'
Me.保存Button.Image = CType(resources.GetObject("保存Button.Image"), System.Drawing.Image)
Me.保存Button.Location = New System.Drawing.Point(434, 46)
Me.保存Button.Name = "保存Button"
Me.保存Button.Size = New System.Drawing.Size(90, 23)
Me.保存Button.TabIndex = 49
Me.保存Button.Text = "保存"
Me.保存Button.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.保存Button.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
Me.保存Button.UseVisualStyleBackColor = True
'
'收款日期DateTimePicker
'
Me.收款日期DateTimePicker.Location = New System.Drawing.Point(67, 20)
Me.收款日期DateTimePicker.Name = "收款日期DateTimePicker"
Me.收款日期DateTimePicker.Size = New System.Drawing.Size(170, 21)
Me.收款日期DateTimePicker.TabIndex = 44
'
'收款方式ComboBox
'
Me.收款方式ComboBox.FormattingEnabled = True
Me.收款方式ComboBox.Items.AddRange(New Object() {"现金", "银行卡", "支票", "汇票"})
Me.收款方式ComboBox.Location = New System.Drawing.Point(327, 20)
Me.收款方式ComboBox.Name = "收款方式ComboBox"
Me.收款方式ComboBox.Size = New System.Drawing.Size(101, 20)
Me.收款方式ComboBox.TabIndex = 43
'
'textBox1
'
Me.textBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBox1.Location = New System.Drawing.Point(67, 74)
Me.textBox1.Name = "textBox1"
Me.textBox1.Size = New System.Drawing.Size(361, 21)
Me.textBox1.TabIndex = 42
'
'label9
'
Me.label9.AutoSize = True
Me.label9.Location = New System.Drawing.Point(6, 80)
Me.label9.Name = "label9"
Me.label9.Size = New System.Drawing.Size(41, 12)
Me.label9.TabIndex = 41
Me.label9.Text = "说明:"
'
'label8
'
Me.label8.AutoSize = True
Me.label8.Location = New System.Drawing.Point(6, 24)
Me.label8.Name = "label8"
Me.label8.Size = New System.Drawing.Size(65, 12)
Me.label8.TabIndex = 40
Me.label8.Text = "收款日期:"
'
'经办人TextBox
'
Me.经办人TextBox.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.经办人TextBox.Location = New System.Drawing.Point(327, 47)
Me.经办人TextBox.Name = "经办人TextBox"
Me.经办人TextBox.Size = New System.Drawing.Size(101, 21)
Me.经办人TextBox.TabIndex = 39
'
'label7
'
Me.label7.AutoSize = True
Me.label7.Location = New System.Drawing.Point(244, 53)
Me.label7.Name = "label7"
Me.label7.Size = New System.Drawing.Size(53, 12)
Me.label7.TabIndex = 38
Me.label7.Text = "经办人:"
'
'label6
'
Me.label6.AutoSize = True
Me.label6.Location = New System.Drawing.Point(244, 25)
Me.label6.Name = "label6"
Me.label6.Size = New System.Drawing.Size(65, 12)
Me.label6.TabIndex = 37
Me.label6.Text = "收款方式:"
'
'实收金额TextBox
'
Me.实收金额TextBox.Location = New System.Drawing.Point(67, 47)
Me.实收金额TextBox.Name = "实收金额TextBox"
Me.实收金额TextBox.Size = New System.Drawing.Size(170, 21)
Me.实收金额TextBox.TabIndex = 36
Me.实收金额TextBox.Text = "0"
'
'label5
'
Me.label5.AutoSize = True
Me.label5.Location = New System.Drawing.Point(6, 53)
Me.label5.Name = "label5"
Me.label5.Size = New System.Drawing.Size(65, 12)
Me.label5.TabIndex = 35
Me.label5.Text = "实收金额:"
'
'应收货款总额TextBox
'
Me.应收货款总额TextBox.Location = New System.Drawing.Point(94, 274)
Me.应收货款总额TextBox.Name = "应收货款总额TextBox"
Me.应收货款总额TextBox.Size = New System.Drawing.Size(149, 21)
Me.应收货款总额TextBox.TabIndex = 49
'
'客户名称TextBox
'
Me.客户名称TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "客户名称", True))
Me.客户名称TextBox.Location = New System.Drawing.Point(94, 31)
Me.客户名称TextBox.Name = "客户名称TextBox"
Me.客户名称TextBox.ReadOnly = True
Me.客户名称TextBox.Size = New System.Drawing.Size(150, 21)
Me.客户名称TextBox.TabIndex = 31
'
'联系地址TextBox
'
Me.联系地址TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "联系地址", True))
Me.联系地址TextBox.Location = New System.Drawing.Point(94, 58)
Me.联系地址TextBox.Name = "联系地址TextBox"
Me.联系地址TextBox.Size = New System.Drawing.Size(150, 21)
Me.联系地址TextBox.TabIndex = 33
'
'邮政编码TextBox
'
Me.邮政编码TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "邮政编码", True))
Me.邮政编码TextBox.Location = New System.Drawing.Point(94, 85)
Me.邮政编码TextBox.Name = "邮政编码TextBox"
Me.邮政编码TextBox.Size = New System.Drawing.Size(150, 21)
Me.邮政编码TextBox.TabIndex = 35
'
'联系电话TextBox
'
Me.联系电话TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "联系电话", True))
Me.联系电话TextBox.Location = New System.Drawing.Point(94, 112)
Me.联系电话TextBox.Name = "联系电话TextBox"
Me.联系电话TextBox.Size = New System.Drawing.Size(150, 21)
Me.联系电话TextBox.TabIndex = 37
'
'联系人TextBox
'
Me.联系人TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "联系人", True))
Me.联系人TextBox.Location = New System.Drawing.Point(94, 139)
Me.联系人TextBox.Name = "联系人TextBox"
Me.联系人TextBox.Size = New System.Drawing.Size(150, 21)
Me.联系人TextBox.TabIndex = 39
'
'纳税人识别号TextBox
'
Me.纳税人识别号TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "纳税人识别号", True))
Me.纳税人识别号TextBox.Location = New System.Drawing.Point(94, 166)
Me.纳税人识别号TextBox.Name = "纳税人识别号TextBox"
Me.纳税人识别号TextBox.Size = New System.Drawing.Size(150, 21)
Me.纳税人识别号TextBox.TabIndex = 41
'
'开户银行TextBox
'
Me.开户银行TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "开户银行", True))
Me.开户银行TextBox.Location = New System.Drawing.Point(94, 193)
Me.开户银行TextBox.Name = "开户银行TextBox"
Me.开户银行TextBox.Size = New System.Drawing.Size(150, 21)
Me.开户银行TextBox.TabIndex = 43
'
'银行帐号TextBox
'
Me.银行帐号TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "银行帐号", True))
Me.银行帐号TextBox.Location = New System.Drawing.Point(94, 220)
Me.银行帐号TextBox.Name = "银行帐号TextBox"
Me.银行帐号TextBox.Size = New System.Drawing.Size(150, 21)
Me.银行帐号TextBox.TabIndex = 45
'
'说明TextBox
'
Me.说明TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.采购商信息BindingSource, "说明", True))
Me.说明TextBox.Location = New System.Drawing.Point(94, 247)
Me.说明TextBox.Name = "说明TextBox"
Me.说明TextBox.Size = New System.Drawing.Size(150, 21)
Me.说明TextBox.TabIndex = 47
'
'采购商信息DataGridView
'
Me.采购商信息DataGridView.AllowUserToAddRows = False
Me.采购商信息DataGridView.AllowUserToDeleteRows = False
Me.采购商信息DataGridView.AllowUserToResizeRows = False
Me.采购商信息DataGridView.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.采购商信息DataGridView.AutoGenerateColumns = False
Me.采购商信息DataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.dataGridViewTextBoxColumn1, Me.dataGridViewTextBoxColumn2, Me.dataGridViewTextBoxColumn3, Me.dataGridViewTextBoxColumn4, Me.dataGridViewTextBoxColumn5, Me.dataGridViewTextBoxColumn6, Me.dataGridViewTextBoxColumn7, Me.dataGridViewTextBoxColumn8, Me.dataGridViewTextBoxColumn9})
Me.采购商信息DataGridView.DataSource = Me.采购商信息BindingSource
Me.采购商信息DataGridView.Location = New System.Drawing.Point(249, 31)
Me.采购商信息DataGridView.MultiSelect = False
Me.采购商信息DataGridView.Name = "采购商信息DataGridView"
Me.采购商信息DataGridView.ReadOnly = True
Me.采购商信息DataGridView.RowHeadersVisible = False
Me.采购商信息DataGridView.RowTemplate.Height = 23
Me.采购商信息DataGridView.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.采购商信息DataGridView.Size = New System.Drawing.Size(290, 264)
Me.采购商信息DataGridView.TabIndex = 29
'
'dataGridViewTextBoxColumn1
'
Me.dataGridViewTextBoxColumn1.DataPropertyName = "客户名称"
Me.dataGridViewTextBoxColumn1.HeaderText = "客户名称"
Me.dataGridViewTextBoxColumn1.Name = "dataGridViewTextBoxColumn1"
Me.dataGridViewTextBoxColumn1.ReadOnly = True
'
'dataGridViewTextBoxColumn2
'
Me.dataGridViewTextBoxColumn2.DataPropertyName = "联系地址"
Me.dataGridViewTextBoxColumn2.HeaderText = "联系地址"
Me.dataGridViewTextBoxColumn2.Name = "dataGridViewTextBoxColumn2"
Me.dataGridViewTextBoxColumn2.ReadOnly = True
'
'dataGridViewTextBoxColumn3
'
Me.dataGridViewTextBoxColumn3.DataPropertyName = "邮政编码"
Me.dataGridViewTextBoxColumn3.HeaderText = "邮政编码"
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?