📄 wwwj.frm
字号:
VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "测试仪"
ClientHeight = 4335
ClientLeft = 4005
ClientTop = 3225
ClientWidth = 7590
Icon = "wwwj.frx":0000
KeyPreview = -1 'True
LinkTopic = "Form1"
MDIChild = -1 'True
ScaleHeight = 1.12763e5
ScaleMode = 0 'User
ScaleWidth = 7581.938
WindowState = 2 'Maximized
Begin MSAdodcLib.Adodc Adodc1
Height = 735
Left = 480
Top = 6120
Visible = 0 'False
Width = 2655
_ExtentX = 4683
_ExtentY = 1296
ConnectMode = 0
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 3
LockType = 3
CommandType = 2
CursorOptions = 0
CacheSize = 50
MaxRecords = 0
BOFAction = 0
EOFAction = 0
ConnectStringType= 1
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=www.mdb;Persist Security Info=False"
OLEDBString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=www.mdb;Persist Security Info=False"
OLEDBFile = ""
DataSourceName = ""
OtherAttributes = ""
UserName = ""
Password = ""
RecordSource = "www"
Caption = "Adodc1"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
Begin MSCommLib.MSComm MSComm1
Left = 2040
Top = 5640
_ExtentX = 1005
_ExtentY = 1005
_Version = 393216
DTREnable = -1 'True
End
Begin VB.TextBox Text2
DataField = "49"
DataSource = "Adodc1"
Height = 495
Left = 6000
TabIndex = 155
Text = "Text2"
Top = 8160
Visible = 0 'False
Width = 1215
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 95
Left = 3600
MaxLength = 10
TabIndex = 154
Top = 5160
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 94
Left = 3600
TabIndex = 153
Top = 5520
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 93
Left = 3600
TabIndex = 152
Top = 5880
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 92
Left = 3600
TabIndex = 151
Top = 6240
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 91
Left = 3600
TabIndex = 150
Top = 6600
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 90
Left = 3600
TabIndex = 149
Top = 6960
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 89
Left = 3600
TabIndex = 148
Top = 7320
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 88
Left = 3600
TabIndex = 147
Top = 7680
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 87
Left = 4680
TabIndex = 146
Top = 5160
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 86
Left = 4680
TabIndex = 145
Top = 5520
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 85
Left = 4680
TabIndex = 144
Top = 5880
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 84
Left = 4680
TabIndex = 143
Top = 6240
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 83
Left = 4680
TabIndex = 142
Top = 6600
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 82
Left = 4680
TabIndex = 141
Top = 6960
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 81
Left = 4680
TabIndex = 140
Top = 7320
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 80
Left = 4680
TabIndex = 139
Top = 7680
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 79
Left = 5760
TabIndex = 138
Top = 5160
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 78
Left = 5760
TabIndex = 137
Top = 5520
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 77
Left = 5760
TabIndex = 136
Top = 5880
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 76
Left = 5760
TabIndex = 135
Top = 6240
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 75
Left = 5760
TabIndex = 134
Top = 6600
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 74
Left = 5760
TabIndex = 133
Top = 6960
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 73
Left = 5760
TabIndex = 132
Top = 7320
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 72
Left = 5760
TabIndex = 131
Top = 7680
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 71
Left = 6840
TabIndex = 130
Top = 5160
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 70
Left = 6840
TabIndex = 129
Top = 5520
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 69
Left = 6840
TabIndex = 128
Top = 5880
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 68
Left = 6840
TabIndex = 127
Top = 6240
Visible = 0 'False
Width = 975
End
Begin VB.TextBox Text12
Alignment = 1 'Right Justify
BorderStyle = 0 'None
DataSource = "Adodc1"
Height = 375
Index = 67
Left = 6840
TabIndex = 126
Top = 6600
Visible = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -