📄 rlcthreeloop.frm
字号:
VERSION 5.00
Begin VB.Form RLCThreeLoop
BorderStyle = 1 'Fixed Single
Caption = "交流电路 - 三回路电路"
ClientHeight = 10290
ClientLeft = 45
ClientTop = 435
ClientWidth = 10320
Icon = "RLCThreeLoop.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 10290
ScaleWidth = 10320
StartUpPosition = 2 '屏幕中心
Begin VB.CommandButton Command1
Caption = "主界面"
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 8760
TabIndex = 69
Top = 8040
Width = 1455
End
Begin VB.Frame Frame11
Caption = "请选择分析方法"
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 3735
Left = 120
TabIndex = 54
Top = 6240
Width = 10095
Begin VB.Label Label19
BackStyle = 0 'Transparent
Caption = "节点分析"
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 5880
TabIndex = 56
Top = 360
Width = 1455
End
Begin VB.Label Label18
BackStyle = 0 'Transparent
Caption = "筛分分析"
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 840
TabIndex = 55
Top = 360
Width = 1455
End
Begin VB.Image Image1
Height = 2910
Left = 120
Picture = "RLCThreeLoop.frx":62A82
Top = 600
Width = 8265
End
End
Begin VB.Frame Frame1
Caption = "分析"
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 5415
Left = 120
TabIndex = 0
Top = 720
Width = 10095
Begin VB.Frame Frame8
Caption = "节点电压计算"
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1575
Left = 6840
TabIndex = 64
Top = 3360
Width = 2895
Begin VB.Label LblVA
BorderStyle = 1 'Fixed Single
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 255
Left = 960
TabIndex = 68
Top = 360
Width = 1695
End
Begin VB.Label Label17
Caption = "VA: ="
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Left = 120
TabIndex = 67
Top = 360
Width = 735
End
Begin VB.Label LblVB
BorderStyle = 1 'Fixed Single
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 255
Left = 960
TabIndex = 66
Top = 720
Width = 1695
End
Begin VB.Label RLCThreeLoop
Caption = "VB: ="
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Left = 120
TabIndex = 65
Top = 720
Width = 735
End
End
Begin VB.Frame Frame7
Caption = "筛分电流"
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 1575
Left = 4080
TabIndex = 57
Top = 3360
Width = 2535
Begin VB.Label LblI2
BorderStyle = 1 'Fixed Single
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 255
Left = 960
TabIndex = 63
Top = 720
Width = 1335
End
Begin VB.Label LblI1
BorderStyle = 1 'Fixed Single
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 255
Left = 960
TabIndex = 62
Top = 360
Width = 1335
End
Begin VB.Label Label16
Caption = "I2: ="
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Left = 120
TabIndex = 61
Top = 720
Width = 735
End
Begin VB.Label Label15
Caption = "I1: ="
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Left = 120
TabIndex = 60
Top = 360
Width = 735
End
Begin VB.Label LblI3
BorderStyle = 1 'Fixed Single
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 255
Left = 960
TabIndex = 59
Top = 1080
Width = 1335
End
Begin VB.Label Label20
Caption = "I3: ="
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Left = 120
TabIndex = 58
Top = 1080
Width = 735
End
End
Begin VB.CommandButton calculate
Caption = "计算"
Default = -1 'True
BeginProperty Font
Name = "Verdana"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 2400
TabIndex = 53
Top = 3600
Width = 1575
End
Begin VB.Frame Frame10
Caption = "Arm 5"
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1695
Left = 4680
TabIndex = 44
Top = 1320
Width = 2055
Begin VB.TextBox TextR5
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 285
Left = 600
TabIndex = 48
Top = 240
Width = 1215
End
Begin VB.TextBox TextC5
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 285
Left = 600
TabIndex = 47
Top = 600
Width = 1215
End
Begin VB.TextBox TextL5
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 285
Left = 600
TabIndex = 46
Top = 960
Width = 1215
End
Begin VB.TextBox TextV5
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -