📄 form9.frm
字号:
Y2 = 3480
End
Begin VB.Label Label100
AutoSize = -1 'True
BackColor = &H00FFFFFF&
Caption = "大齿轮："
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF8080&
Height = 240
Left = 120
TabIndex = 217
Top = 3600
Width = 960
End
Begin VB.Label Label99
AutoSize = -1 'True
BackColor = &H00FFFFFF&
Caption = "小齿轮："
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF8080&
Height = 240
Left = 240
TabIndex = 216
Top = 240
Width = 960
End
End
Begin VB.Frame Frame20
BackColor = &H00FFFFFF&
Caption = "1.确定N："
Height = 735
Left = 4560
TabIndex = 103
Top = 3960
Width = 3855
Begin VB.TextBox Text2
Appearance = 0 'Flat
BackColor = &H80000018&
Height = 375
Left = 1200
TabIndex = 105
Top = 240
Width = 615
End
Begin VB.TextBox Text4
Appearance = 0 'Flat
BackColor = &H80000018&
Height = 375
Left = 3000
TabIndex = 104
Top = 240
Width = 735
End
Begin VB.Label Label40
AutoSize = -1 'True
BackColor = &H00FFFFFF&
Caption = "a.工作寿命："
Height = 180
Left = 120
TabIndex = 108
Top = 360
Width = 1080
End
Begin VB.Label Label41
BackColor = &H00FFFFFF&
Caption = "年"
Height = 255
Left = 1920
TabIndex = 107
Top = 360
Width = 255
End
Begin VB.Label Label42
AutoSize = -1 'True
BackColor = &H00FFFFFF&
Caption = "b.班制："
Height = 180
Left = 2280
TabIndex = 106
Top = 360
Width = 720
End
End
Begin VB.CommandButton Command7
Caption = "大齿轮校核"
Height = 495
Left = 10320
TabIndex = 102
Top = 7560
Width = 1095
End
Begin VB.Frame Frame9
BackColor = &H00FFFFFF&
Caption = " 确定许用应力： "
ForeColor = &H00FF0000&
Height = 6375
Left = 4440
TabIndex = 101
Top = 3720
Width = 4095
Begin TabDlg.SSTab SSTab1
Height = 5175
Left = 120
TabIndex = 109
Top = 1080
Width = 3855
_ExtentX = 6800
_ExtentY = 9128
_Version = 393216
Tabs = 2
Tab = 1
TabsPerRow = 2
TabHeight = 520
BackColor = 16777215
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
TabCaption(0) = "弯曲疲劳许用应力"
TabPicture(0) = "Form9.frx":0000
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Frame21"
Tab(0).ControlCount= 1
TabCaption(1) = "接触疲劳许用应力"
TabPicture(1) = "Form9.frx":001C
Tab(1).ControlEnabled= -1 'True
Tab(1).Control(0)= "Frame26"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).ControlCount= 1
Begin VB.Frame Frame26
Caption = "2.确定KHN："
Height = 4695
Left = 120
TabIndex = 150
Top = 360
Width = 3615
Begin TabDlg.SSTab SSTab3
Height = 4335
Left = 120
TabIndex = 151
Top = 240
Width = 3375
_ExtentX = 5953
_ExtentY = 7646
_Version = 393216
Tabs = 2
Tab = 1
TabsPerRow = 2
TabHeight = 520
BackColor = 16777215
TabCaption(0) = "小齿轮"
TabPicture(0) = "Form9.frx":0038
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Label70"
Tab(0).Control(1)= "Text15"
Tab(0).Control(2)= "Command11"
Tab(0).Control(3)= "Frame28"
Tab(0).Control(4)= "Frame30"
Tab(0).ControlCount= 5
TabCaption(1) = "大齿轮"
TabPicture(1) = "Form9.frx":0054
Tab(1).ControlEnabled= -1 'True
Tab(1).Control(0)= "Label94"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).Control(1)= "Frame31"
Tab(1).Control(1).Enabled= 0 'False
Tab(1).Control(2)= "Frame32"
Tab(1).Control(2).Enabled= 0 'False
Tab(1).Control(3)= "Text19"
Tab(1).Control(3).Enabled= 0 'False
Tab(1).Control(4)= "Command12"
Tab(1).Control(4).Enabled= 0 'False
Tab(1).ControlCount= 5
Begin VB.CommandButton Command12
Caption = "单击选取"
Height = 375
Left = 240
TabIndex = 207
Top = 480
Width = 975
End
Begin VB.TextBox Text19
Height = 375
Left = 2160
TabIndex = 206
Top = 480
Width = 855
End
Begin VB.Frame Frame32
Caption = "4.结论："
Height = 735
Left = 120
TabIndex = 202
Top = 3480
Width = 3015
Begin VB.TextBox Text18
Height = 375
Left = 1320
TabIndex = 203
Top = 240
Width = 1215
End
Begin VB.Label Label93
AutoSize = -1 'True
Caption = "MPa"
Height = 180
Left = 2640
TabIndex = 205
Top = 360
Width = 270
End
Begin VB.Label Label92
AutoSize = -1 'True
Caption = " ρHlim为："
Height = 180
Left = 120
TabIndex = 204
Top = 360
Width = 990
End
End
Begin VB.Frame Frame31
Caption = "3.确定齿轮疲劳极限ρHlim："
Height = 2415
Left = 120
TabIndex = 190
Top = 1080
Width = 3015
Begin VB.OptionButton Option55
Caption = "Option55"
Height = 255
Left = 240
TabIndex = 233
Top = 2040
Width = 255
End
Begin VB.OptionButton Option54
Caption = "Option30"
Height = 180
Left = 240
TabIndex = 195
Top = 600
Width = 255
End
Begin VB.OptionButton Option53
Caption = "Option31"
Height = 180
Left = 1680
TabIndex = 194
Top = 600
Width = 255
End
Begin VB.OptionButton Option52
Caption = "Option32"
Height = 255
Left = 240
TabIndex = 193
Top = 960
Width = 255
End
Begin VB.OptionButton Option51
Caption = "Option33"
Height = 255
Left = 240
TabIndex = 192
Top = 1320
Width = 255
End
Begin VB.OptionButton Option50
Caption = "Option34"
Height = 255
Left = 240
TabIndex = 191
Top = 1680
Width = 255
End
Begin VB.Label Label112
AutoSize = -1 'True
Caption = "灰铸铁"
Height = 180
Left = 2040
TabIndex = 236
Top = 600
Width = 540
End
Begin VB.Label Label91
Caption = "铸铁材料"
Height = 255
Left = 600
TabIndex = 201
Top = 600
Width = 855
End
Begin VB.Label Label90
Caption = "请选择齿轮材料："
Height = 255
Left = 120
TabIndex = 200
Top = 240
Width = 1455
End
Begin VB.Label Label89
AutoSize = -1 'True
Caption = "正火处理钢"
Height = 180
Left = 600
TabIndex = 199
Top = 960
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -