Caption = "粘贴"
Shortcut = ^V
End
Begin Menu_Cut
Caption = "剪切"
Shortcut = ^X
End
Begin line1
Caption = "-"
End
Begin Menu_All
Caption = "全选"
Shortcut = ^A
End
Begin line2
Caption = "Exp"
Height = 390
Left = 840
TabIndex = 31
Top = 960
Width = 630
End
Begin Cmd_Sin
Caption = "Sin"
Height = 390
Left = 120
T0
Style = 1 'Graphical
TabIndex = 21
Top = 2400
Width = 510
End
Begin Command1
Caption = "."
Height = 390
Index = 11
Left = 3915
TabIndex = 20
Top = 2400
Width = 510
Left = 825
TabIndex = 33
Top = 1935
Width = 630
End
Begin Cmd_Operator
Caption = "X^Y"
Height = 390
Index = 5
Left = 840
TabIndex = 32
Top = 1455
Width = 630
End
Begin Cmd_Exp
Begin Frm_Scientific
Caption = "计算器"
ClientHeight = 2925
ClientLeft = 165
ClientTop = 735
ClientWidth = 5595
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
End
Begin Cmd_CE
Caption = "CE"
Height = 405
Left = 3975
TabIndex = 14
Top = 405
Width = 750
End
Begin Cmd_Backspace
Caption = "Backspace"
Height = 405
Left = 2820
Caption = "-"
End
Begin Menu_Exit
Caption = "退出"
End
End
Begin Menu_Help
Caption = "帮助(&H)"
Begin Menu_HelpSubject
Caption = "帮助主题(&H)"
End
Begin Menu_About
Caption = "关于计算器"
ScaleHeight = 2925
ScaleWidth = 5595
StartUpPosition = 3 '窗口缺省
Begin Cmd_Rnd
Caption = "Rnd"
Height = 390
Left = 5025
TabIndex = 39
Top = 1455
Width = 510
End
Begin Cmd_PI
TabIndex = 25
Top = 210
Width = 795
End
Begin Otn_Deg
Caption = "角度"
Height = 180
Left = 135
TabIndex = 24
Top = 210
Value = -1 'True
Width = 675
End
End
Begin Cmd_Operator
Begin Command1
Caption = "1"
Height = 390
Index = 1
Left = 2820
TabIndex = 1
Top = 1935
Width = 510
End
Begin Txt_Result
Alignment = 1 'Right Justify
Height = 315
Index = 3
Left = 3915
TabIndex = 3
Top = 1935
Width = 510
End
Begin Command1
Caption = "2"
Height = 390
Index = 2
Left = 3360
TabIndex = 2
Top = 1935
Width = 510
End
End
End
End
Attribute VB_Name = "Frm_Scientific"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Left = 90
Locked = -1 'True
TabIndex = 0
Text = "0."
Top = 0
Width = 5385
End
Begin Menu_Edit
Caption = "编辑(&E)"
Begin Menu_Copy
Caption = "复制"
Shortcut = ^C
End
Begin Menu_Paste
Top = 1935
Width = 630
End
Begin Cmd_Atan
Caption = "Atan"
Height = 390
Left = 120
TabIndex = 27
Top = 2400
Width = 630
End
Begin Frame1
Height = 510
Left = 90
TabIndex = 23
Top = 960
Width = 510
End
Begin Command1
Caption = "9"
Height = 390
Index = 9
Left = 3915
TabIndex = 9
Top = 960
Width = 510
End
Begin Command1
Caption = "8"
Height = 390
Top = 1455
Width = 510
End
Begin Command1
Caption = "4"
Height = 390
Index = 4
Left = 2820
TabIndex = 4
Top = 1455
Width = 510
End
Begin Command1
Caption = "3"
Height = 390
Caption = "Sqrt"
Height = 390
Left = 5025
TabIndex = 16
Top = 960
Width = 510
End
Begin Cmd_C
Caption = "C"
Height = 405
Left = 4785
TabIndex = 15
Top = 405
Width = 750
Caption = "6"
Height = 390
Index = 6
Left = 3915
TabIndex = 6
Top = 1455
Width = 510
End
Begin Command1
Caption = "5"
Height = 390
Index = 5
Left = 3360
TabIndex = 5
End
Begin Cmd_Log
Caption = "Log"
Height = 390
Left = 1575
TabIndex = 36
Top = 1455
Width = 630
End
Begin Cmd_Ln
Caption = "Ln"
Height = 390
Left = 1575
TabIndex = 35
Dim i As Integer
Dim opnre As Integer
Dim prev As Double
Dim oflag As Integer