📄 frmbeltdisply.frm
字号:
VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Begin VB.Form FrmbeltDisply
Caption = "普通V带传动设计结果显示"
ClientHeight = 6180
ClientLeft = 60
ClientTop = 450
ClientWidth = 12480
LinkTopic = "Form1"
ScaleHeight = 6180
ScaleWidth = 12480
StartUpPosition = 3 '窗口缺省
Begin VB.CommandButton Cmddisplysize
Caption = "显示带轮尺寸"
Height = 405
Left = 10140
TabIndex = 47
Top = 3900
Width = 1575
End
Begin VB.ComboBox Cbosize
Height = 315
Left = 9945
TabIndex = 46
Text = "Combo1"
Top = 3120
Width = 1965
End
Begin VB.CommandButton Cmddwg
Caption = "生成带轮工作图"
Height = 600
Left = 7410
TabIndex = 45
Top = 5070
Width = 1575
End
Begin VB.CommandButton CmdSave
Caption = "保存/打印结果"
Height = 600
Left = 4485
TabIndex = 44
Top = 5070
Width = 1575
End
Begin VB.CommandButton CmdEnd
Caption = "结束"
Height = 600
Left = 9945
TabIndex = 43
Top = 5070
Width = 1575
End
Begin VB.CommandButton CmdReturn
Caption = "后退"
Height = 600
Left = 1365
TabIndex = 42
Top = 5070
Width = 1575
End
Begin MSComDlg.CommonDialog CommonDialog1
Left = 9750
Top = 2145
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VB.Label Label48
Caption = "名义功率"
Height = 210
Left = 9360
TabIndex = 41
Top = 195
Width = 990
End
Begin VB.Label Label47
Caption = "计算功率"
Height = 210
Left = 9360
TabIndex = 40
Top = 975
Width = 990
End
Begin VB.Label Label46
Caption = "小带轮转速"
Height = 210
Left = 9360
TabIndex = 39
Top = 1755
Width = 990
End
Begin VB.Label Label1
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 1
Left = 10725
TabIndex = 38
Top = 960
Width = 1380
End
Begin VB.Label Label1
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 2
Left = 10725
TabIndex = 37
Top = 1755
Width = 1380
End
Begin VB.Label Label1
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 0
Left = 10725
TabIndex = 36
Top = 195
Width = 1380
End
Begin VB.Label Label36
Caption = "初拉力"
Height = 210
Left = 6435
TabIndex = 35
Top = 195
Width = 990
End
Begin VB.Label Label35
Caption = "轴上压力"
Height = 210
Left = 6435
TabIndex = 34
Top = 975
Width = 990
End
Begin VB.Label Label34
Caption = "单根带功率"
Height = 210
Left = 6435
TabIndex = 33
Top = 1755
Width = 990
End
Begin VB.Label Label33
Caption = "功率增量"
Height = 210
Left = 6435
TabIndex = 32
Top = 2535
Width = 990
End
Begin VB.Label Label32
Caption = "初拉力测定值的最小值"
Height = 570
Left = 6435
TabIndex = 31
Top = 3315
Width = 990
End
Begin VB.Label Label31
Caption = "传动比误差"
Height = 210
Left = 6435
TabIndex = 30
Top = 4095
Width = 990
End
Begin VB.Label Lbl4
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 1
Left = 7800
TabIndex = 29
Top = 975
Width = 1380
End
Begin VB.Label Lbl4
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 2
Left = 7800
TabIndex = 28
Top = 1755
Width = 1380
End
Begin VB.Label Lbl4
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 3
Left = 7800
TabIndex = 27
Top = 2535
Width = 1380
End
Begin VB.Label Lbl4
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 4
Left = 7800
TabIndex = 26
Top = 3315
Width = 1380
End
Begin VB.Label Lbl4
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 5
Left = 7800
TabIndex = 25
Top = 4095
Width = 1380
End
Begin VB.Label Lbl4
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 0
Left = 7800
TabIndex = 24
Top = 195
Width = 1380
End
Begin VB.Label Label24
Caption = "型号"
Height = 210
Left = 195
TabIndex = 23
Top = 195
Width = 990
End
Begin VB.Label Label23
Caption = "根数"
Height = 210
Left = 195
TabIndex = 22
Top = 975
Width = 990
End
Begin VB.Label Label22
Caption = "长度"
Height = 210
Left = 195
TabIndex = 21
Top = 1755
Width = 990
End
Begin VB.Label Label21
Caption = "主动轮直径"
Height = 210
Left = 195
TabIndex = 20
Top = 2535
Width = 990
End
Begin VB.Label Label20
Caption = "从动轮直径"
Height = 210
Left = 195
TabIndex = 19
Top = 3315
Width = 990
End
Begin VB.Label Label19
Caption = "中心距"
Height = 210
Left = 195
TabIndex = 18
Top = 4095
Width = 990
End
Begin VB.Label Lbldisply
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 1
Left = 1560
TabIndex = 17
Top = 975
Width = 1380
End
Begin VB.Label Lbldisply
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 2
Left = 1560
TabIndex = 16
Top = 1755
Width = 1380
End
Begin VB.Label Lbldisply
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 3
Left = 1560
TabIndex = 15
Top = 2535
Width = 1380
End
Begin VB.Label Lbldisply
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 4
Left = 1560
TabIndex = 14
Top = 3315
Width = 1380
End
Begin VB.Label Lbldisply
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 5
Left = 1560
TabIndex = 13
Top = 4095
Width = 1380
End
Begin VB.Label Lbldisply
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 0
Left = 1560
TabIndex = 12
Top = 195
Width = 1380
End
Begin VB.Label Lbl2
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 0
Left = 4485
TabIndex = 11
Top = 195
Width = 1380
End
Begin VB.Label Lbl2
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 5
Left = 4485
TabIndex = 10
Top = 4095
Width = 1380
End
Begin VB.Label Lbl2
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 4
Left = 4485
TabIndex = 9
Top = 3120
Width = 1380
End
Begin VB.Label Lbl2
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 3
Left = 4485
TabIndex = 8
Top = 2340
Width = 1380
End
Begin VB.Label Lbl2
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 2
Left = 4485
TabIndex = 7
Top = 1755
Width = 1380
End
Begin VB.Label Lbl2
BackColor = &H8000000E&
BorderStyle = 1 'Fixed Single
Height = 405
Index = 1
Left = 4485
TabIndex = 6
Top = 975
Width = 1380
End
Begin VB.Label Label6
Caption = "工况系数"
Height = 210
Left = 3315
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -