?? frmmain.frm
字號:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.Form frmMain
AutoRedraw = -1 'True
BorderStyle = 1 'Fixed Single
Caption = "仿真技術上機作業"
ClientHeight = 6090
ClientLeft = -1140
ClientTop = 5805
ClientWidth = 10185
Icon = "frmMain.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 6090
ScaleWidth = 10185
StartUpPosition = 1 'CenterOwner
Begin VB.TextBox txtbxishu
Height = 285
Left = 2160
TabIndex = 25
Text = "1"
Top = 2880
Width = 975
End
Begin VB.Frame Frame3
Caption = "數據輸入"
BeginProperty Font
Name = "隸書"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 5535
Left = 240
TabIndex = 4
Top = 120
Width = 5055
Begin VB.ComboBox suanfacom
Height = 315
ItemData = "frmMain.frx":030A
Left = 1920
List = "frmMain.frx":0317
TabIndex = 27
Text = "四階龍格庫塔法"
Top = 720
Width = 1935
End
Begin VB.CommandButton resetcmd
Caption = "開始輸入"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 23
Top = 240
Width = 1095
End
Begin VB.TextBox chuzhi
Height = 285
Left = 1920
TabIndex = 14
Text = "1"
ToolTipText = "請按從低階到高階的順序輸入"
Top = 2280
Width = 2895
End
Begin VB.TextBox qujiand
Height = 285
Left = 3720
TabIndex = 13
Text = "1"
Top = 3360
Width = 975
End
Begin VB.TextBox qujianc
Height = 285
Left = 1920
TabIndex = 12
Text = "0"
Top = 3360
Width = 975
End
Begin VB.TextBox xishu
Height = 285
Left = 1920
TabIndex = 11
Text = "0 1"
ToolTipText = "請按從低階到高階的順序輸入"
Top = 1800
Width = 2895
End
Begin VB.TextBox jieshu
Height = 285
Left = 1920
TabIndex = 10
Text = "1"
Top = 1320
Width = 975
End
Begin VB.CommandButton jieshucmd
Caption = "階數輸入"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 3720
TabIndex = 9
Top = 1320
Width = 1095
End
Begin VB.TextBox txtJD
Height = 270
Left = 1920
TabIndex = 8
Text = "0.01"
Top = 4440
Width = 2175
End
Begin VB.TextBox txtBC
Height = 270
Left = 1920
TabIndex = 7
Text = "0.1"
Top = 3960
Width = 2175
End
Begin VB.CommandButton cmdOK
Caption = "計 算"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 600
TabIndex = 6
Top = 5040
Width = 975
End
Begin VB.CommandButton cmdEXIT
Caption = "退 出"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 3000
TabIndex = 5
Top = 5040
Width = 975
End
Begin VB.Label Label3
Caption = "請選擇算法模型"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 26
Top = 840
Width = 1695
End
Begin VB.Label Label11
Caption = "請輸入右端系數b"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 24
Top = 2880
Width = 1575
End
Begin VB.Label Label4
Caption = "從"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 1560
TabIndex = 22
Top = 3360
Width = 255
End
Begin VB.Label Label6
Caption = "請輸入各階初值"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 21
Top = 2280
Width = 1575
End
Begin VB.Label Label7
Caption = "到"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 3120
TabIndex = 20
Top = 3360
Width = 255
End
Begin VB.Label Label8
Caption = "請輸入解區間"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 19
Top = 3360
Width = 1335
End
Begin VB.Label Label9
Caption = "請輸入各階系數"
BeginProperty Font
Name = "隸書"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 18
Top = 1800
Width = 1575
End
Begin VB.Label Label10
Caption = "請輸入方程的階數"
BeginProperty Font
Name = "隸書"
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -