form1.vb
来自「Visual Basic .NET程序设计教程源代码」· VB 代码 · 共 539 行 · 第 1/3 页
VB
539 行
'
Me.cmdhelp.Location = New System.Drawing.Point(320, 0)
Me.cmdhelp.Name = "cmdhelp"
Me.cmdhelp.TabIndex = 4
Me.cmdhelp.Text = "帮助"
'
'lblid
'
Me.lblid.Location = New System.Drawing.Point(8, 40)
Me.lblid.Name = "lblid"
Me.lblid.TabIndex = 5
Me.lblid.Text = "ID Number"
'
'lblfirst
'
Me.lblfirst.Location = New System.Drawing.Point(8, 80)
Me.lblfirst.Name = "lblfirst"
Me.lblfirst.TabIndex = 6
Me.lblfirst.Text = "First Name"
'
'lbllast
'
Me.lbllast.Location = New System.Drawing.Point(8, 112)
Me.lbllast.Name = "lbllast"
Me.lbllast.TabIndex = 7
Me.lbllast.Text = "Last Nmae"
'
'lbladdress
'
Me.lbladdress.Location = New System.Drawing.Point(8, 144)
Me.lbladdress.Name = "lbladdress"
Me.lbladdress.TabIndex = 8
Me.lbladdress.Text = "Address"
'
'lblcity
'
Me.lblcity.Location = New System.Drawing.Point(8, 176)
Me.lblcity.Name = "lblcity"
Me.lblcity.TabIndex = 9
Me.lblcity.Text = "City"
'
'lblstate
'
Me.lblstate.Location = New System.Drawing.Point(8, 208)
Me.lblstate.Name = "lblstate"
Me.lblstate.TabIndex = 10
Me.lblstate.Text = "State/Province"
'
'lblzip
'
Me.lblzip.Location = New System.Drawing.Point(8, 240)
Me.lblzip.Name = "lblzip"
Me.lblzip.TabIndex = 11
Me.lblzip.Text = "Postal Code"
'
'lblcountry
'
Me.lblcountry.Location = New System.Drawing.Point(8, 272)
Me.lblcountry.Name = "lblcountry"
Me.lblcountry.TabIndex = 12
Me.lblcountry.Text = "Country"
'
'lblemail
'
Me.lblemail.Location = New System.Drawing.Point(8, 304)
Me.lblemail.Name = "lblemail"
Me.lblemail.TabIndex = 13
Me.lblemail.Text = "Email"
'
'lblphone
'
Me.lblphone.Location = New System.Drawing.Point(8, 336)
Me.lblphone.Name = "lblphone"
Me.lblphone.TabIndex = 14
Me.lblphone.Text = "Home Phone"
'
'lblfax
'
Me.lblfax.Location = New System.Drawing.Point(8, 368)
Me.lblfax.Name = "lblfax"
Me.lblfax.TabIndex = 15
Me.lblfax.Text = "Fax Number"
'
'txtid
'
Me.txtid.Location = New System.Drawing.Point(128, 48)
Me.txtid.Name = "txtid"
Me.txtid.Size = New System.Drawing.Size(256, 21)
Me.txtid.TabIndex = 16
Me.txtid.Text = ""
'
'txtfirst
'
Me.txtfirst.Location = New System.Drawing.Point(128, 80)
Me.txtfirst.Name = "txtfirst"
Me.txtfirst.Size = New System.Drawing.Size(256, 21)
Me.txtfirst.TabIndex = 17
Me.txtfirst.Text = ""
'
'txtlast
'
Me.txtlast.Location = New System.Drawing.Point(128, 112)
Me.txtlast.Name = "txtlast"
Me.txtlast.Size = New System.Drawing.Size(256, 21)
Me.txtlast.TabIndex = 18
Me.txtlast.Text = ""
'
'txtaddress
'
Me.txtaddress.Location = New System.Drawing.Point(128, 144)
Me.txtaddress.Name = "txtaddress"
Me.txtaddress.Size = New System.Drawing.Size(256, 21)
Me.txtaddress.TabIndex = 19
Me.txtaddress.Text = ""
'
'txtcity
'
Me.txtcity.Location = New System.Drawing.Point(128, 176)
Me.txtcity.Name = "txtcity"
Me.txtcity.Size = New System.Drawing.Size(256, 21)
Me.txtcity.TabIndex = 20
Me.txtcity.Text = ""
'
'txtstate
'
Me.txtstate.Location = New System.Drawing.Point(128, 208)
Me.txtstate.Name = "txtstate"
Me.txtstate.Size = New System.Drawing.Size(256, 21)
Me.txtstate.TabIndex = 21
Me.txtstate.Text = ""
'
'txtzip
'
Me.txtzip.Location = New System.Drawing.Point(128, 240)
Me.txtzip.Name = "txtzip"
Me.txtzip.Size = New System.Drawing.Size(256, 21)
Me.txtzip.TabIndex = 22
Me.txtzip.Text = ""
'
'txtcountry
'
Me.txtcountry.Location = New System.Drawing.Point(128, 272)
Me.txtcountry.Name = "txtcountry"
Me.txtcountry.Size = New System.Drawing.Size(256, 21)
Me.txtcountry.TabIndex = 23
Me.txtcountry.Text = ""
'
'txtemail
'
Me.txtemail.Location = New System.Drawing.Point(128, 304)
Me.txtemail.Name = "txtemail"
Me.txtemail.Size = New System.Drawing.Size(256, 21)
Me.txtemail.TabIndex = 24
Me.txtemail.Text = ""
'
'txtphone
'
Me.txtphone.Location = New System.Drawing.Point(128, 336)
Me.txtphone.Name = "txtphone"
Me.txtphone.Size = New System.Drawing.Size(256, 21)
Me.txtphone.TabIndex = 25
Me.txtphone.Text = ""
'
'txtfax
'
Me.txtfax.Location = New System.Drawing.Point(128, 368)
Me.txtfax.Name = "txtfax"
Me.txtfax.Size = New System.Drawing.Size(256, 21)
Me.txtfax.TabIndex = 26
Me.txtfax.Text = ""
'
'txtstatus
'
Me.txtstatus.Location = New System.Drawing.Point(8, 400)
Me.txtstatus.Multiline = True
Me.txtstatus.Name = "txtstatus"
Me.txtstatus.Size = New System.Drawing.Size(376, 40)
Me.txtstatus.TabIndex = 27
Me.txtstatus.Text = ""
'
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?