anical2.frm

通过一系列的算法可以提高性能,包含大部分的科学计算功能

VERSION 5.00
Begin VB.Form scientific 
   AutoRedraw      =   -1  'True
   BorderStyle     =   1  'Fixed Single
   Caption         =   "# Scientific Calc #"
   ClientHeight    =   4305
   ClientLeft      =   1230
   ClientTop       =   2220
   ClientWidth     =   6420
   FontTransparent =   0   'False
   ForeColor       =   &H00000000&
   Icon            =   "Anical2.frx":0000
   KeyPreview      =   -1  'True
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   PaletteMode     =   1  'UseZOrder
   ScaleHeight     =   4305
   ScaleWidth      =   6420
   Begin VB.TextBox Text1 
      Alignment       =   1  'Right Justify
      BackColor       =   &H00000000&
      ForeColor       =   &H000000FF&
      Height          =   315
      Left            =   2880
      TabIndex        =   65
      Top             =   90
      Visible         =   0   'False
      Width           =   3045
   End
   Begin VB.OptionButton Option3 
      Caption         =   "STANDARD"
      Height          =   315
      Left            =   3030
      TabIndex        =   58
      Top             =   600
      Width           =   1215
   End
   Begin VB.Frame Frame1 
      Caption         =   "SCIENTIFIC"
      Height          =   3210
      Left            =   90
      TabIndex        =   0
      Top             =   990
      Width           =   6255
      Begin VB.CommandButton Command8 
         Caption         =   "View"
         Height          =   375
         Index           =   1
         Left            =   3810
         TabIndex        =   63
         Top             =   2610
         Width           =   495
      End
      Begin VB.CommandButton Command2 
         Caption         =   "xPOy"
         Height          =   375
         Index           =   8
         Left            =   3810
         TabIndex        =   62
         Top             =   2160
         Width           =   495
      End
      Begin VB.CommandButton Command2 
         Caption         =   "npr"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   375
         Index           =   7
         Left            =   3810
         TabIndex        =   61
         Top             =   1740
         Width           =   495
      End
      Begin VB.CommandButton Command2 
         Caption         =   "ncr"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   375
         Index           =   5
         Left            =   3810
         TabIndex        =   60
         Top             =   1260
         Width           =   495
      End
      Begin VB.CommandButton Command14 
         Caption         =   "