📄 frmbaseinput.frm
字号:
VERSION 5.00
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0"; "COMCTL32.OCX"
Begin VB.Form frmBaseInput
BackColor = &H00C0C0C0&
BorderStyle = 3 'Fixed Dialog
Caption = "基本信息输入"
ClientHeight = 6540
ClientLeft = 45
ClientTop = 615
ClientWidth = 9510
FillColor = &H000000C0&
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Icon = "frmBaseInput.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 6540
ScaleWidth = 9510
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin ComctlLib.StatusBar StaBar1
Align = 2 'Align Bottom
Height = 375
Left = 0
TabIndex = 72
Top = 6165
Width = 9510
_ExtentX = 16775
_ExtentY = 661
SimpleText = ""
_Version = 327682
BeginProperty Panels {0713E89E-850A-101B-AFC0-4210102A8DA7}
NumPanels = 2
BeginProperty Panel1 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 2
Key = ""
Object.Tag = ""
EndProperty
BeginProperty Panel2 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 1
Object.Width = 14155
Picture = "frmBaseInput.frx":044A
Key = ""
Object.Tag = ""
EndProperty
EndProperty
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.PictureBox SSPanel1
Height = 735
Left = 60
ScaleHeight = 675
ScaleWidth = 9345
TabIndex = 71
Top = 5415
Width = 9405
Begin VB.PictureBox cmdSave
ForeColor = &H00000000&
Height = 465
Left = 7230
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 945
TabIndex = 37
Top = 120
Width = 1005
End
Begin VB.PictureBox cmdExit
ForeColor = &H00000000&
Height = 465
Left = 8250
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 1005
TabIndex = 38
Top = 120
Width = 1065
End
Begin VB.PictureBox cmdDelete
ForeColor = &H00000000&
Height = 465
Left = 6270
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 885
TabIndex = 36
Top = 120
Width = 945
End
Begin VB.PictureBox cmdModify
ForeColor = &H00000000&
Height = 465
Left = 5340
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 855
TabIndex = 34
Top = 120
Width = 915
End
Begin VB.PictureBox cmdAddnew
ForeColor = &H00000000&
Height = 465
Left = 4230
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 1035
TabIndex = 35
Top = 120
Width = 1095
End
Begin VB.PictureBox cmdLast
ForeColor = &H00000000&
Height = 465
Left = 3180
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 975
TabIndex = 33
Top = 120
Width = 1035
End
Begin VB.PictureBox cmdNext
ForeColor = &H00000000&
Height = 465
Left = 2130
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 975
TabIndex = 32
Top = 120
Width = 1035
End
Begin VB.PictureBox cmdPrevious
ForeColor = &H00000000&
Height = 465
Left = 1140
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 915
TabIndex = 31
Top = 120
Width = 975
End
Begin VB.PictureBox cmdFirst
ForeColor = &H00000000&
Height = 465
Left = 120
MousePointer = 99 'Custom
ScaleHeight = 405
ScaleWidth = 945
TabIndex = 30
Top = 120
Width = 1005
End
End
Begin VB.PictureBox SSFrame2
Height = 2175
Left = 60
ScaleHeight = 2115
ScaleWidth = 9345
TabIndex = 60
Top = 3180
Width = 9405
Begin VB.TextBox txtGX2
BackColor = &H00FFFFFF&
DataField = "GX2"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 3810
TabIndex = 26
Top = 1160
Width = 1455
End
Begin VB.TextBox txtGX1
BackColor = &H00FFFFFF&
DataField = "GX1"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 3810
TabIndex = 21
Top = 150
Width = 1455
End
Begin VB.TextBox txtJZXM1
BackColor = &H00FFFFFF&
DataField = "JZXM1"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 1380
TabIndex = 20
Top = 150
Width = 1395
End
Begin VB.TextBox txtYM1
BackColor = &H00FFFFFF&
DataField = "YM1"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 7800
TabIndex = 24
Top = 655
Width = 1455
End
Begin VB.TextBox txtDW1
BackColor = &H00FFFFFF&
DataField = "DW1"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 1380
TabIndex = 23
Top = 655
Width = 5235
End
Begin VB.TextBox txtJZXM2
BackColor = &H00FFFFFF&
DataField = "JZXM2"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 1380
TabIndex = 25
Top = 1160
Width = 1395
End
Begin VB.TextBox txtYM2
BackColor = &H00FFFFFF&
DataField = "YM2"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 7800
TabIndex = 29
Top = 1665
Width = 1455
End
Begin VB.TextBox txtDW2
BackColor = &H00FFFFFF&
DataField = "DW2"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 1380
TabIndex = 28
Top = 1665
Width = 5235
End
Begin VB.TextBox txtDH1
BackColor = &H00FFFFFF&
DataField = "dh1"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 6570
TabIndex = 22
Top = 150
Width = 2685
End
Begin VB.TextBox txtDH2
BackColor = &H00FFFFFF&
DataField = "dh2"
DataSource = "Data2"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 6570
TabIndex = 27
Top = 1160
Width = 2685
End
Begin VB.Label Label17
BackStyle = 0 'Transparent
Caption = "家长姓名1"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 120
TabIndex = 70
Top = 180
Width = 1455
End
Begin VB.Label Label18
BackStyle = 0 'Transparent
Caption = "关系1"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -