📄 frmadd.frm
字号:
TabIndex = 228
Top = 270
Width = 435
End
Begin VB.Label Label92
Alignment = 2 'Center
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "院系"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 210
Left = 3300
TabIndex = 227
Top = 270
Width = 435
End
Begin VB.Label Label91
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "学号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 210
Left = 240
TabIndex = 226
Top = 270
Width = 420
End
End
Begin Threed.SSFrame SSFrame14
Height = 3255
Left = -74700
TabIndex = 207
Top = 2280
Width = 8655
_ExtentX = 15266
_ExtentY = 5741
_Version = 131073
ShadowStyle = 1
Begin VB.ComboBox ComboChufnr
BackColor = &H00FFFFFF&
DataField = "Chufnr"
DataSource = "Data4"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 324
ItemData = "frmAdd.frx":2C02
Left = 270
List = "frmAdd.frx":2C18
TabIndex = 213
Top = 780
Width = 1725
End
Begin VB.ComboBox Combo13
BackColor = &H00FFFFFF&
DataField = "Chufyy"
DataSource = "Data4"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 324
ItemData = "frmAdd.frx":2C50
Left = 2380
List = "frmAdd.frx":2C8A
TabIndex = 212
Top = 780
Width = 1725
End
Begin VB.TextBox Text16
BackColor = &H00FFFFFF&
DataField = "Chufwh"
DataSource = "Data4"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 360
Left = 6600
TabIndex = 211
Top = 780
Width = 1725
End
Begin VB.TextBox Text17
BackColor = &H00FFFFFF&
DataField = "Checwh"
DataSource = "Data4"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 360
Left = 270
TabIndex = 210
Top = 2430
Width = 1725
End
Begin VB.TextBox Text35
BackColor = &H00FFFFFF&
DataField = "Chufrq"
DataSource = "Data4"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 360
Left = 4490
TabIndex = 209
ToolTipText = "按""98-12-23""这样的格式输入日期"
Top = 780
Width = 1725
End
Begin VB.TextBox Text34
BackColor = &H00FFFFFF&
DataField = "Checrq"
DataSource = "Data4"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 360
Left = 270
TabIndex = 208
Top = 1590
Width = 1725
End
Begin VB.Data Data4
Caption = "Data4"
Connect = "Access"
DatabaseName = ""
DefaultCursorType= 0 'DefaultCursor
DefaultType = 2 'UseODBC
Exclusive = 0 'False
Height = 345
Left = 1290
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = "Chengf"
Top = 1170
Visible = 0 'False
Width = 1815
End
Begin VB.Image Image6
Height = 975
Left = 3360
Picture = "frmAdd.frx":2D34
Top = 1650
Width = 1080
End
Begin Threed.SSCommand cmdSaveChengf
Height = 525
Left = 7290
TabIndex = 233
Top = 2430
Width = 1065
_ExtentX = 1879
_ExtentY = 926
_Version = 131073
Font3D = 1
ForeColor = 16711680
PictureFrames = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Picture = "frmAdd.frx":368C
Caption = "保存"
Alignment = 4
PictureAlignment= 1
End
Begin Threed.SSCommand cmdModifyChengf
Height = 525
Left = 5910
TabIndex = 232
Top = 2430
Width = 1065
_ExtentX = 1879
_ExtentY = 926
_Version = 131073
Font3D = 1
ForeColor = 16711680
PictureFrames = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Picture = "frmAdd.frx":39A6
Caption = "修改"
Alignment = 4
PictureAlignment= 1
End
Begin Threed.SSCommand cmdAddChengf
Height = 525
Left = 5910
TabIndex = 231
Top = 2430
Width = 1065
_ExtentX = 1879
_ExtentY = 926
_Version = 131073
Font3D = 1
ForeColor = 16711680
PictureFrames = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Picture = "frmAdd.frx":3CC0
Caption = "添加"
Alignment = 4
PictureAlignment= 1
End
Begin VB.Label Label46
BackStyle = 0 'Transparent
Caption = "处分内容"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 210
Left = 270
TabIndex = 219
Top = 390
Width = 990
End
Begin VB.Label Label45
BackStyle = 0 'Transparent
Caption = "处分原因"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 210
Left = 2380
TabIndex = 218
Top = 390
Width = 1185
End
Begin VB.Label Label44
BackStyle = 0 'Transparent
Caption = "处分日期"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 210
Left = 4490
TabIndex = 217
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -