frmaddfee.designer.vb

来自「Visual Basic 2005数据库通用模块开发与系统移植 物业管理信息系统」· VB 代码 · 共 374 行 · 第 1/2 页

VB
374
字号
        Me.txtMemo.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtMemo.ForeColor = System.Drawing.SystemColors.WindowText
        Me.txtMemo.Location = New System.Drawing.Point(97, 191)
        Me.txtMemo.MaxLength = 0
        Me.txtMemo.Multiline = True
        Me.txtMemo.Name = "txtMemo"
        Me.txtMemo.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.txtMemo.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
        Me.txtMemo.Size = New System.Drawing.Size(319, 49)
        Me.txtMemo.TabIndex = 1
        '
        'Label9
        '
        Me.Label9.BackColor = System.Drawing.SystemColors.Control
        Me.Label9.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label9.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label9.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label9.Location = New System.Drawing.Point(23, 193)
        Me.Label9.Name = "Label9"
        Me.Label9.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label9.Size = New System.Drawing.Size(73, 25)
        Me.Label9.TabIndex = 5
        Me.Label9.Text = "备注:"
        Me.Label9.TextAlign = System.Drawing.ContentAlignment.TopCenter
        '
        'ComboBuilding
        '
        Me.ComboBuilding.FormattingEnabled = True
        Me.ComboBuilding.Items.AddRange(New Object() {"1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20"})
        Me.ComboBuilding.Location = New System.Drawing.Point(97, 13)
        Me.ComboBuilding.Name = "ComboBuilding"
        Me.ComboBuilding.Size = New System.Drawing.Size(90, 20)
        Me.ComboBuilding.TabIndex = 34
        Me.ComboBuilding.Text = "1"
        '
        'ComboUnit
        '
        Me.ComboUnit.FormattingEnabled = True
        Me.ComboUnit.Items.AddRange(New Object() {"1", "2", "3", "4", "5", "6", "7", "8"})
        Me.ComboUnit.Location = New System.Drawing.Point(316, 13)
        Me.ComboUnit.Name = "ComboUnit"
        Me.ComboUnit.Size = New System.Drawing.Size(89, 20)
        Me.ComboUnit.TabIndex = 33
        Me.ComboUnit.Text = "1"
        '
        'TxtRoom
        '
        Me.TxtRoom.AcceptsReturn = True
        Me.TxtRoom.BackColor = System.Drawing.SystemColors.Window
        Me.TxtRoom.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TxtRoom.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.TxtRoom.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TxtRoom.Location = New System.Drawing.Point(97, 57)
        Me.TxtRoom.MaxLength = 0
        Me.TxtRoom.Name = "TxtRoom"
        Me.TxtRoom.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TxtRoom.Size = New System.Drawing.Size(89, 21)
        Me.TxtRoom.TabIndex = 32
        '
        'Label1
        '
        Me.Label1.BackColor = System.Drawing.SystemColors.Control
        Me.Label1.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label1.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label1.Location = New System.Drawing.Point(14, 61)
        Me.Label1.Name = "Label1"
        Me.Label1.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label1.Size = New System.Drawing.Size(87, 17)
        Me.Label1.TabIndex = 31
        Me.Label1.Text = "房间号:"
        Me.Label1.TextAlign = System.Drawing.ContentAlignment.TopCenter
        '
        'Label4
        '
        Me.Label4.BackColor = System.Drawing.SystemColors.Control
        Me.Label4.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label4.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label4.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label4.Location = New System.Drawing.Point(22, 16)
        Me.Label4.Name = "Label4"
        Me.Label4.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label4.Size = New System.Drawing.Size(87, 17)
        Me.Label4.TabIndex = 30
        Me.Label4.Text = "楼号:"
        Me.Label4.TextAlign = System.Drawing.ContentAlignment.TopCenter
        '
        'Label8
        '
        Me.Label8.BackColor = System.Drawing.SystemColors.Control
        Me.Label8.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label8.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label8.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label8.Location = New System.Drawing.Point(244, 16)
        Me.Label8.Name = "Label8"
        Me.Label8.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label8.Size = New System.Drawing.Size(73, 17)
        Me.Label8.TabIndex = 35
        Me.Label8.Text = "单元号:"
        Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopCenter
        '
        'TxtCharge
        '
        Me.TxtCharge.AcceptsReturn = True
        Me.TxtCharge.BackColor = System.Drawing.SystemColors.Window
        Me.TxtCharge.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TxtCharge.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.TxtCharge.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TxtCharge.Location = New System.Drawing.Point(316, 144)
        Me.TxtCharge.MaxLength = 0
        Me.TxtCharge.Name = "TxtCharge"
        Me.TxtCharge.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TxtCharge.Size = New System.Drawing.Size(89, 21)
        Me.TxtCharge.TabIndex = 36
        '
        'Label5
        '
        Me.Label5.BackColor = System.Drawing.SystemColors.Control
        Me.Label5.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label5.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label5.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label5.Location = New System.Drawing.Point(244, 149)
        Me.Label5.Name = "Label5"
        Me.Label5.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label5.Size = New System.Drawing.Size(81, 17)
        Me.Label5.TabIndex = 37
        Me.Label5.Text = "费用:"
        Me.Label5.TextAlign = System.Drawing.ContentAlignment.TopCenter
        '
        'FrmAddFee
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.SystemColors.Control
        Me.ClientSize = New System.Drawing.Size(440, 317)
        Me.Controls.Add(Me.TxtCharge)
        Me.Controls.Add(Me.Label5)
        Me.Controls.Add(Me.Label8)
        Me.Controls.Add(Me.ComboBuilding)
        Me.Controls.Add(Me.ComboUnit)
        Me.Controls.Add(Me.TxtRoom)
        Me.Controls.Add(Me.Label1)
        Me.Controls.Add(Me.Label4)
        Me.Controls.Add(Me.ComboFeeType)
        Me.Controls.Add(Me.ComboFYear)
        Me.Controls.Add(Me.ComboFmonth)
        Me.Controls.Add(Me.TxtAmount)
        Me.Controls.Add(Me.Label3)
        Me.Controls.Add(Me.Label7)
        Me.Controls.Add(Me.Label6)
        Me.Controls.Add(Me.cancelCommand)
        Me.Controls.Add(Me.BtnOK)
        Me.Controls.Add(Me.txtMemo)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.Label9)
        Me.Cursor = System.Windows.Forms.Cursors.Default
        Me.Location = New System.Drawing.Point(3, 22)
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.Name = "FrmAddFee"
        Me.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
        Me.Text = "添加物业费用信息"
        Me.TopMost = True
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Public WithEvents Label6 As System.Windows.Forms.Label
    Public WithEvents Label7 As System.Windows.Forms.Label
    Public WithEvents TxtAmount As System.Windows.Forms.TextBox
    Public WithEvents Label3 As System.Windows.Forms.Label
    Friend WithEvents ComboFmonth As System.Windows.Forms.ComboBox
    Friend WithEvents ComboFYear As System.Windows.Forms.ComboBox
    Friend WithEvents ComboFeeType As System.Windows.Forms.ComboBox
    Public WithEvents txtMemo As System.Windows.Forms.TextBox
    Public WithEvents Label9 As System.Windows.Forms.Label
    Friend WithEvents ComboBuilding As System.Windows.Forms.ComboBox
    Friend WithEvents ComboUnit As System.Windows.Forms.ComboBox
    Public WithEvents TxtRoom As System.Windows.Forms.TextBox
    Public WithEvents Label1 As System.Windows.Forms.Label
    Public WithEvents Label4 As System.Windows.Forms.Label
    Public WithEvents Label8 As System.Windows.Forms.Label
    Public WithEvents TxtCharge As System.Windows.Forms.TextBox
    Public WithEvents Label5 As System.Windows.Forms.Label
#End Region
End Class

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?