form6.frm
来自「某大学开发的一个用于对微波传输线状态进行模拟的软件」· FRM 代码 · 共 1,338 行 · 第 1/4 页
FRM
1,338 行
VERSION 5.00
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.2#0"; "COMCTL32.OCX"
Object = "{A964BDA3-3E93-11CF-9A0F-9E6261DACD1C}#2.0#0"; "RESIZE32.OCX"
Begin VB.Form Form6
AutoRedraw = -1 'True
Caption = "带状线"
ClientHeight = 5880
ClientLeft = 60
ClientTop = 345
ClientWidth = 7515
Icon = "Form6.frx":0000
LinkTopic = "Form6"
MDIChild = -1 'True
ScaleHeight = 5880
ScaleWidth = 7515
Begin VB.Frame Frame1
Height = 4485
Left = 240
TabIndex = 3
Top = 510
Width = 7095
Begin VB.Frame Frame5
Height = 4200
Left = 3500
TabIndex = 47
Top = 180
Visible = 0 'False
Width = 3500
Begin VB.OptionButton Option8
Caption = "综合"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 1620
TabIndex = 56
Top = 330
Width = 1000
End
Begin VB.OptionButton Option7
Caption = "分析"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 210
TabIndex = 55
Top = 330
Value = -1 'True
Width = 1000
End
Begin VB.TextBox Text24
Height = 315
Left = 1290
TabIndex = 54
Text = "?"
Top = 3720
Width = 1665
End
Begin VB.TextBox Text23
Height = 315
Left = 1290
TabIndex = 53
Text = "?"
Top = 3220
Width = 1665
End
Begin VB.TextBox Text22
Height = 315
Left = 1290
TabIndex = 52
Text = "0"
Top = 2720
Width = 1665
End
Begin VB.TextBox Text21
Height = 315
Left = 1290
TabIndex = 51
Text = "0"
Top = 2220
Width = 1665
End
Begin VB.TextBox Text20
Height = 315
Left = 1290
TabIndex = 50
Text = "1"
Top = 1720
Width = 1665
End
Begin VB.TextBox Text19
Height = 315
Left = 1290
TabIndex = 49
Text = "1"
Top = 1220
Width = 1665
End
Begin VB.TextBox Text18
Height = 315
Left = 1290
TabIndex = 48
Text = "200"
Top = 720
Width = 1665
End
Begin VB.Label Label38
Caption = "mm"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 3090
TabIndex = 66
Top = 2250
Width = 255
End
Begin VB.Label Label26
Caption = "Ω"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 3090
TabIndex = 65
Top = 720
Width = 255
End
Begin VB.Label Label39
Caption = "Ω"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 3090
TabIndex = 64
Top = 1260
Width = 225
End
Begin VB.Label Label24
Caption = "er ="
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 330
TabIndex = 63
Top = 1720
Width = 675
End
Begin VB.Label Label23
Caption = "t ="
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 330
TabIndex = 62
Top = 2220
Width = 675
End
Begin VB.Label Label22
Caption = "t/b="
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 330
TabIndex = 61
Top = 2720
Width = 615
End
Begin VB.Label Label21
Caption = "w/b="
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 330
TabIndex = 60
Top = 3220
Width = 675
End
Begin VB.Label Label20
Caption = "s/b="
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 330
TabIndex = 59
Top = 3720
Width = 675
End
Begin VB.Label Label19
Caption = "Zoo="
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 330
TabIndex = 58
Top = 1220
Width = 675
End
Begin VB.Label Label18
Caption = "Zoe="
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 330
TabIndex = 57
Top = 720
Width = 675
End
End
Begin VB.Frame Frame3
Height = 4200
Left = 3500
TabIndex = 30
Top = 180
Visible = 0 'False
Width = 3500
Begin VB.TextBox Text16
Height = 315
Left = 1170
TabIndex = 44
Text = "?"
Top = 3720
Width = 1665
End
Begin VB.TextBox Text15
Height = 315
Left = 1170
TabIndex = 42
Text = "?"
Top = 3220
Width = 1665
End
Begin VB.TextBox Text14
Height = 315
Left = 1170
TabIndex = 37
Text = "1"
Top = 2720
Width = 1665
End
Begin VB.TextBox Text13
Height = 315
Left = 1170
TabIndex = 36
Text = "1"
Top = 2220
Width = 1665
End
Begin VB.TextBox Text12
Height = 315
Left = 1170
TabIndex = 35
Text = "1"
Top = 1720
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?