📄 form1.frm
字号:
VERSION 5.00
Begin VB.Form Form1
BackColor = &H00C0FFFF&
Caption = "参数录入"
ClientHeight = 9660
ClientLeft = 2940
ClientTop = 1425
ClientWidth = 13860
LinkTopic = "Form1"
ScaleHeight = 9660
ScaleWidth = 13860
Begin VB.CommandButton Command2
Caption = "确定"
Height = 495
Left = 11520
TabIndex = 94
Top = 4320
Width = 1215
End
Begin VB.CommandButton Command1
Caption = "检查"
Height = 495
Left = 11520
TabIndex = 93
Top = 2400
Width = 1215
End
Begin VB.Frame Frame6
BackColor = &H00C0FFFF&
Caption = "右侧"
Height = 2775
Left = 6960
TabIndex = 48
Top = 6720
Width = 5655
Begin VB.TextBox Text12
Height = 375
Left = 3120
TabIndex = 78
Top = 2280
Width = 1095
End
Begin VB.TextBox Text11
Height = 375
Left = 3120
TabIndex = 77
Top = 1680
Width = 1095
End
Begin VB.OptionButton Option18
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 74
Top = 2280
Width = 255
End
Begin VB.OptionButton Option17
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 73
Top = 1680
Width = 255
End
Begin VB.OptionButton Option16
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 72
Top = 1200
Width = 255
End
Begin VB.OptionButton Option15
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 71
Top = 720
Width = 255
End
Begin VB.OptionButton Option14
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 70
Top = 240
Width = 255
End
Begin VB.Label Label56
BackColor = &H00C0FFFF&
Caption = "（默认为“自由支持”）"
Height = 255
Left = 2040
TabIndex = 92
Top = 360
Width = 2055
End
Begin VB.Label Label48
BackColor = &H00C0FFFF&
Caption = "L*L*L/EI"
Height = 255
Left = 4440
TabIndex = 80
Top = 2280
Width = 855
End
Begin VB.Label Label47
BackColor = &H00C0FFFF&
Caption = "L*L*L/EI"
Height = 255
Left = 4440
TabIndex = 79
Top = 1680
Width = 855
End
Begin VB.Label Label46
BackColor = &H00C0FFFF&
Caption = "柔性系数(A)"
Height = 255
Left = 1800
TabIndex = 76
Top = 2280
Width = 1095
End
Begin VB.Label Label45
BackColor = &H00C0FFFF&
Caption = "柔性系数(α)"
Height = 255
Left = 1800
TabIndex = 75
Top = 1680
Width = 1095
End
Begin VB.Label Label44
BackColor = &H00C0FFFF&
Caption = "弹性支座"
Height = 255
Left = 120
TabIndex = 69
Top = 2280
Width = 735
End
Begin VB.Label Label43
BackColor = &H00C0FFFF&
Caption = "弹性固定端"
Height = 255
Left = 120
TabIndex = 68
Top = 1680
Width = 975
End
Begin VB.Label Label42
BackColor = &H00C0FFFF&
Caption = "自由端"
Height = 255
Left = 120
TabIndex = 67
Top = 1200
Width = 615
End
Begin VB.Label Label41
BackColor = &H00C0FFFF&
Caption = "固定支座"
Height = 255
Left = 120
TabIndex = 66
Top = 720
Width = 735
End
Begin VB.Label Label40
BackColor = &H00C0FFFF&
Caption = "自由支持"
Height = 255
Left = 120
TabIndex = 65
Top = 240
Width = 735
End
End
Begin VB.Frame Frame5
BackColor = &H00C0FFFF&
Caption = "左侧"
Height = 2775
Left = 1800
TabIndex = 47
Top = 6720
Width = 5055
Begin VB.TextBox Text10
Height = 375
Left = 2880
TabIndex = 63
Top = 1680
Width = 975
End
Begin VB.OptionButton Option13
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 61
Top = 1200
Width = 255
End
Begin VB.OptionButton Option12
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 60
Top = 1680
Width = 255
End
Begin VB.OptionButton Option11
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 59
Top = 720
Width = 255
End
Begin VB.TextBox Text9
Height = 375
Left = 2880
TabIndex = 54
Top = 2280
Width = 975
End
Begin VB.OptionButton Option10
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 52
Top = 2280
Width = 255
End
Begin VB.OptionButton Option9
BackColor = &H00C0FFFF&
Height = 255
Left = 1200
TabIndex = 50
Top = 240
Width = 255
End
Begin VB.Label Label55
BackColor = &H00C0FFFF&
Caption = "（默认为“自由支持”）"
Height = 255
Left = 2040
TabIndex = 91
Top = 360
Width = 1935
End
Begin VB.Label Label39
BackColor = &H00C0FFFF&
Caption = "L*L*L/EI"
Height = 255
Left = 4080
TabIndex = 64
Top = 1680
Width = 855
End
Begin VB.Label Label38
BackColor = &H00C0FFFF&
Caption = "柔性系数(α)"
Height = 255
Left = 1680
TabIndex = 62
Top = 1680
Width = 1095
End
Begin VB.Label Label37
BackColor = &H00C0FFFF&
Caption = "自由端"
Height = 255
Left = 120
TabIndex = 58
Top = 1200
Width = 615
End
Begin VB.Label Label36
BackColor = &H00C0FFFF&
Caption = "弹性固定端"
Height = 255
Left = 120
TabIndex = 57
Top = 1680
Width = 975
End
Begin VB.Label Label35
BackColor = &H00C0FFFF&
Caption = "固定支座"
Height = 255
Left = 120
TabIndex = 56
Top = 720
Width = 735
End
Begin VB.Label Label34
BackColor = &H00C0FFFF&
Caption = "L*L*L/EI"
Height = 255
Left = 4080
TabIndex = 55
Top = 2280
Width = 855
End
Begin VB.Label Label33
BackColor = &H00C0FFFF&
Caption = "柔性系数(A)"
Height = 255
Left = 1680
TabIndex = 53
Top = 2280
Width = 1095
End
Begin VB.Label Label32
BackColor = &H00C0FFFF&
Caption = "弹性支座"
Height = 255
Left = 120
TabIndex = 51
Top = 2280
Width = 735
End
Begin VB.Label Label31
BackColor = &H00C0FFFF&
Caption = "自由支持"
Height = 255
Left = 120
TabIndex = 49
Top = 240
Width = 735
End
End
Begin VB.Frame Frame4
BackColor = &H00C0FFFF&
Caption = "力矩(M):"
Height = 1575
Left = 1800
TabIndex = 35
Top = 5040
Width = 8415
Begin VB.TextBox Text8
Height = 375
Left = 5880
TabIndex = 83
Text = "0"
Top = 360
Width = 1575
End
Begin VB.OptionButton Option8
BackColor = &H00C0FFFF&
Caption = "下一个"
Height = 375
Left = 6360
Style = 1 'Graphical
TabIndex = 45
Top = 960
Width = 975
End
Begin VB.OptionButton Option6
BackColor = &H00C0FFFF&
Height = 255
Left = 3600
TabIndex = 43
Top = 1080
Width = 255
End
Begin VB.OptionButton Option5
BackColor = &H00C0FFFF&
Height = 255
Left = 2040
TabIndex = 42
Top = 1080
Width = 255
End
Begin VB.TextBox Text7
Height = 375
Left = 1200
TabIndex = 37
Text = "0"
Top = 360
Width = 1575
End
Begin VB.Label Label54
BackColor = &H00C0FFFF&
Caption = "（默认为“顺时针”）"
Height = 255
Left = 4080
TabIndex = 90
Top = 1080
Width = 1815
End
Begin VB.Label Label26
BackColor = &H00C0FFFF&
Caption = "m"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 7800
TabIndex = 84
Top = 480
Width = 255
End
Begin VB.Label Label25
BackColor = &H00C0FFFF&
Caption = "作用点距左侧距离(Xm)："
Height = 375
Left = 4440
TabIndex = 82
Top = 360
Width = 1215
End
Begin VB.Label Label29
BackColor = &H00C0FFFF&
Caption = "逆时针"
Height = 255
Left = 2880
TabIndex = 41
Top = 1080
Width = 615
End
Begin VB.Label Label28
BackColor = &H00C0FFFF&
Caption = "顺时针"
Height = 255
Left = 1200
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -