📄 formula.frm
字号:
Caption = "R3(ohm)："
Height = 255
Left = 3960
TabIndex = 102
Top = 840
Width = 1095
End
End
Begin VB.Frame Frame1
Caption = "计算"
Height = 975
Left = 120
TabIndex = 80
Top = 600
Width = 6135
Begin VB.TextBox R3A
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 4920
Locked = -1 'True
TabIndex = 94
Top = 600
Width = 1095
End
Begin VB.TextBox R2A
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 2880
Locked = -1 'True
TabIndex = 92
Top = 600
Width = 1095
End
Begin VB.TextBox R1A
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 960
Locked = -1 'True
TabIndex = 90
Top = 600
Width = 1095
End
Begin VB.TextBox C
Height = 270
Left = 5040
TabIndex = 88
Text = "0.01"
Top = 240
Width = 975
End
Begin VB.TextBox F0
Height = 270
Left = 3360
TabIndex = 86
Text = "1000"
Top = 240
Width = 975
End
Begin VB.TextBox K
Height = 270
Left = 1680
TabIndex = 84
Text = "10"
Top = 240
Width = 855
End
Begin VB.TextBox Q
Height = 270
Left = 480
TabIndex = 82
Text = "10"
Top = 240
Width = 855
End
Begin VB.Label Label40
Alignment = 1 'Right Justify
Caption = "R3(ohm)："
Height = 255
Left = 4080
TabIndex = 93
Top = 600
Width = 855
End
Begin VB.Label Label44
Alignment = 1 'Right Justify
Caption = "R2(ohm)："
Height = 255
Left = 2040
TabIndex = 91
Top = 600
Width = 855
End
Begin VB.Label Label38
Alignment = 1 'Right Justify
Caption = "R1(ohm)："
Height = 255
Left = 120
TabIndex = 89
Top = 600
Width = 855
End
Begin VB.Label Label47
Alignment = 1 'Right Justify
Caption = "C(uF)："
Height = 255
Left = 4320
TabIndex = 87
Top = 240
Width = 735
End
Begin VB.Label Label39
Alignment = 1 'Right Justify
Caption = "F(Hz)："
Height = 255
Left = 2640
TabIndex = 85
Top = 240
Width = 735
End
Begin VB.Label Label41
Alignment = 1 'Right Justify
Caption = "K："
Height = 255
Left = 1320
TabIndex = 83
Top = 240
Width = 375
End
Begin VB.Label Label43
Alignment = 1 'Right Justify
Caption = "Q："
Height = 255
Left = 120
TabIndex = 81
Top = 240
Width = 375
End
End
Begin VB.PictureBox Picture1
Height = 2655
Left = 120
Picture = "formula.frx":139D
ScaleHeight = 2595
ScaleWidth = 3315
TabIndex = 79
Top = 3360
Width = 3375
End
Begin MSFlexGridLib.MSFlexGrid FGridRcd
Height = 2295
Left = 3600
TabIndex = 109
Top = 3720
Width = 2655
_ExtentX = 4683
_ExtentY = 4048
_Version = 393216
Rows = 10
Cols = 3
ScrollBars = 0
End
Begin VB.Label Label45
Alignment = 2 'Center
Caption = "根据频率选电容"
Height = 255
Left = 3720
TabIndex = 110
Top = 3360
Width = 2415
End
Begin VB.Label Label42
BorderStyle = 1 'Fixed Single
Caption = " R1 = Q/(2PFCK); R2 = Q/((2QQ-K)2PFC); R3 = 2Q/(2PFC); P = 3.1416"
ForeColor = &H00000080&
Height = 255
Left = 120
TabIndex = 78
Top = 300
Width = 6135
End
End
Begin VB.Frame Frame
Caption = "RC 充电时间常数的计算"
Height = 1335
Index = 6
Left = 7320
TabIndex = 64
Top = 600
Visible = 0 'False
Width = 6375
Begin VB.TextBox T
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 4200
Locked = -1 'True
TabIndex = 76
Top = 840
Width = 2055
End
Begin VB.TextBox R6
Height = 270
Left = 120
TabIndex = 68
Text = "3"
Top = 840
Width = 975
End
Begin VB.TextBox C6
Height = 270
Left = 1200
TabIndex = 67
Text = "2"
Top = 840
Width = 855
End
Begin VB.TextBox V
Height = 270
Left = 2160
TabIndex = 66
Text = "5"
Top = 840
Width = 855
End
Begin VB.TextBox Vc
BackColor = &H00FFFFFF&
ForeColor = &H00404040&
Height = 270
Left = 3120
TabIndex = 65
Text = "2.5"
Top = 840
Width = 975
End
Begin VB.Label Label37
Alignment = 2 'Center
Caption = "T = R * C * Log(V / (V - Vc)) / Log(e) e = 2.718282"
ForeColor = &H00000080&
Height = 255
Left = 120
TabIndex = 74
Top = 300
Width = 6135
End
Begin VB.Label Label36
Alignment = 1 'Right Justify
Caption = "R（Kohm）"
Height = 255
Left = 240
TabIndex = 73
Top = 600
Width = 855
End
Begin VB.Label Label35
Alignment = 1 'Right Justify
Caption = "C（uF）"
Height = 255
Left = 1200
TabIndex = 72
Top = 600
Width = 735
End
Begin VB.Label Label34
Alignment = 1 'Right Justify
Caption = "V（v）"
Height = 255
Left = 2160
TabIndex = 71
Top = 600
Width = 735
End
Begin VB.Label Label33
Alignment = 1 'Right Justify
Caption = "Vc（v）"
Height = 255
Left = 3120
TabIndex = 70
Top = 600
Width = 735
End
Begin VB.Label Label32
Alignment = 1 'Right Justify
Caption = "T(mS)"
Height = 255
Left = 4680
TabIndex = 69
Top = 600
Width = 735
End
End
Begin VB.Frame Frame
Caption = "频率 F （MHz）和周期 T （uS）的换算"
Height = 1335
Index = 5
Left = 7080
TabIndex = 46
Top = 360
Visible = 0 'False
Width = 6375
Begin VB.TextBox T51
Alignment = 1 'Right Justify
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 4800
Locked = -1 'True
TabIndex = 57
Top = 960
Width = 1455
End
Begin VB.TextBox F51
Alignment = 1 'Right Justify
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 4800
Locked = -1 'True
TabIndex = 56
Top = 600
Width = 1455
End
Begin VB.TextBox T1
Alignment = 1 'Right Justify
Height = 270
Left = 840
TabIndex = 50
Text = "2"
Top = 600
Width = 1455
End
Begin VB.TextBox FY
Alignment = 1 'Right Justify
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 3240
Locked = -1 'True
TabIndex = 49
Top = 600
Width = 1455
End
Begin VB.TextBox F1
Alignment = 1 'Right Justify
Height = 270
Left = 840
TabIndex = 48
Text = "6"
Top = 960
Width = 1455
End
Begin VB.TextBox TY
Alignment = 1 'Right Justify
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 3240
Locked = -1 'True
TabIndex = 47
Top = 960
Width = 1455
End
Begin VB.Label Label28
Caption = " F = 1/T ； For M51, T is machine's Normal M51"
ForeColor = &H00000080&
Height = 255
Left = 120
TabIndex = 55
Top = 300
Width = 6135
End
Begin VB.Label Label27
Alignment = 1 'Right Justify
Caption = "T："
Height = 255
Left = 240
TabIndex = 54
Top = 600
Width = 615
End
Begin VB.Label Label26
Alignment = 1 'Right Justify
Caption = "---> F："
Height = 255
Left = 2400
TabIndex = 53
Top = 600
Width = 855
End
Begin VB.Label Label25
Alignment = 1 'Right Justify
Caption = "F："
Height = 255
Left = 360
TabIndex = 52
Top = 960
Width = 495
End
Begin VB.Label Label24
Alignment = 1 'Right Justify
Caption = "---> T："
Height = 255
Left = 2400
TabIndex = 51
Top = 960
Width = 855
End
End
Begin VB.Frame Frame
Caption = "作为波特率发生器的定时器 T1 的初值Mx"
Height = 1335
Index = 4
Left = 7320
TabIndex = 12
Top = 2160
Visible = 0 'False
Width = 6375
Begin VB.TextBox txtSMOD
Height = 270
Left = 2760
TabIndex = 152
Text = "0"
Top = 960
Width = 1095
End
Begin VB.TextBox Mxh
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 5400
Locked = -1 'True
TabIndex = 45
Top = 960
Width = 855
End
Begin VB.TextBox Mx
BackColor = &H00FF0000&
ForeColor = &H00FFFFFF&
Height = 270
Left = 4200
Locked = -1 'True
TabIndex = 44
Top = 960
Width = 1095
End
Begin VB.TextBox Fx
Height = 270
Left = 1440
TabIndex = 43
Text = "11.0592"
Top = 960
Width = 1215
End
Begin VB.TextBox B
Height = 270
Left = 120
TabIndex = 42
Text = "1200"
Top = 960
Width = 1215
End
Begin VB.Label Label73
Alignment = 1 'Right Justify
Caption = "SMOD 0/1"
Height = 255
Left = 2760
TabIndex = 153
Top = 720
Width = 855
End
Begin VB.Label Label18
Alignment = 1 'Right Justify
Caption = "Mx(hex)"
Height = 255
Left = 5280
TabIndex = 41
Top = 720
Width = 855
End
Begin VB.Label Label22
Alignment = 1 'Right Justify
Caption = "时间常数 Mx"
Height = 255
Left = 4200
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -