📄 frmgm.frm
字号:
VERSION 5.00
Object = "{74848F95-A02A-4286-AF0C-A3C755E4A5B3}#1.0#0"; "actskn43.ocx"
Begin VB.Form frmgm
BorderStyle = 1 'Fixed Single
Caption = "购买鲜花"
ClientHeight = 5970
ClientLeft = 45
ClientTop = 330
ClientWidth = 8040
LinkTopic = "Form1"
MaxButton = 0 'False
MDIChild = -1 'True
MinButton = 0 'False
ScaleHeight = 5970
ScaleWidth = 8040
Begin VB.TextBox txtid
Height = 375
Left = 2520
TabIndex = 41
Top = 6240
Width = 1335
End
Begin VB.CommandButton Command1
Caption = "清 空"
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 3330
TabIndex = 40
Top = 5085
Width = 1215
End
Begin VB.CommandButton Command2
Caption = "确 定"
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 765
TabIndex = 39
Top = 5085
Width = 1215
End
Begin VB.CommandButton Command3
Caption = "退 出"
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 5715
TabIndex = 38
Top = 5085
Width = 1215
End
Begin VB.Frame Frame1
Height = 1905
Left = 450
TabIndex = 22
Top = 225
Width = 6900
Begin VB.TextBox Txt1
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 2400
TabIndex = 25
Top = 240
Width = 2175
End
Begin VB.TextBox Txt2
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 2415
TabIndex = 24
Top = 810
Width = 2175
End
Begin VB.TextBox Txt3
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 2415
TabIndex = 23
Top = 1395
Width = 4020
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel1
Height = 375
Left = 225
OleObjectBlob = "frmgm.frx":0000
TabIndex = 26
Top = 270
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel2
Height = 375
Left = 1665
OleObjectBlob = "frmgm.frx":0057
TabIndex = 27
Top = 285
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel3
Height = 375
Left = 1185
OleObjectBlob = "frmgm.frx":00AE
TabIndex = 28
Top = 285
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel4
Height = 375
Left = 705
OleObjectBlob = "frmgm.frx":0105
TabIndex = 29
Top = 285
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel5
Height = 375
Left = 225
OleObjectBlob = "frmgm.frx":015C
TabIndex = 30
Top = 1410
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel6
Height = 375
Left = 1665
OleObjectBlob = "frmgm.frx":01B3
TabIndex = 31
Top = 1410
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel7
Height = 375
Left = 1185
OleObjectBlob = "frmgm.frx":020A
TabIndex = 32
Top = 1410
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel8
Height = 375
Left = 705
OleObjectBlob = "frmgm.frx":0261
TabIndex = 33
Top = 1410
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel9
Height = 375
Left = 225
OleObjectBlob = "frmgm.frx":02B8
TabIndex = 34
Top = 825
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel10
Height = 375
Left = 1665
OleObjectBlob = "frmgm.frx":030F
TabIndex = 35
Top = 825
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel11
Height = 375
Left = 1185
OleObjectBlob = "frmgm.frx":0366
TabIndex = 36
Top = 825
Width = 375
End
Begin ACTIVESKINLibCtl.SkinLabel SkinLabel12
Height = 375
Left = 705
OleObjectBlob = "frmgm.frx":03BD
TabIndex = 37
Top = 825
Width = 375
End
End
Begin VB.Frame Frame3
Height = 2355
Left = 450
TabIndex = 0
Top = 2445
Width = 6945
Begin VB.PictureBox Picture2
Height = 1935
Left = 4560
ScaleHeight = 1875
ScaleWidth = 2115
TabIndex = 5
Top = 240
Width = 2175
Begin VB.Image Image1
Height = 1935
Left = 0
Stretch = -1 'True
Top = 0
Width = 2175
End
End
Begin VB.ComboBox Combo1
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
ItemData = "frmgm.frx":0414
Left = 2320
List = "frmgm.frx":0433
TabIndex = 4
Top = 315
Width = 1935
End
Begin VB.TextBox Txtdj
Alignment = 1 'Right Justify
Enabled = 0 'False
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 2295
TabIndex = 3
Text = "0"
Top = 855
Width = 975
End
Begin VB.TextBox Txt7
Alignment = 1 'Right Justify
BeginProperty Font
Name = "幼圆"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 2325
TabIndex = 2
Text = "1"
Top = 1350
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -