⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 math.frm

📁 不错的一个VB菜单设计 界面和功能都不错
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Object = "{75D4F53D-8785-11D3-93AD-0000832EF44D}#2.1#0"; "FAST2002.ocx"
Begin VB.Form frmMath 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "Advanced Math functions"
   ClientHeight    =   6540
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   7395
   Icon            =   "Math.frx":0000
   LinkTopic       =   "Form1"
   LockControls    =   -1  'True
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   6540
   ScaleWidth      =   7395
   ShowInTaskbar   =   0   'False
   StartUpPosition =   2  'CenterScreen
   Begin VB.Frame fraFrame 
      Caption         =   "Roots"
      Height          =   1395
      Index           =   3
      Left            =   135
      TabIndex        =   60
      Top             =   4965
      Width           =   7065
      Begin VB.ListBox lstRoots 
         BackColor       =   &H8000000F&
         Height          =   840
         Left            =   4170
         TabIndex        =   35
         TabStop         =   0   'False
         Top             =   450
         Width           =   2775
      End
      Begin VB.TextBox txtRootExp 
         Height          =   300
         Left            =   135
         TabIndex        =   31
         Text            =   "x^4 - 6*x^3 + 12*x^2 - 10*x + 3"
         Top             =   540
         Width           =   2610
      End
      Begin VB.TextBox txtRootFrom 
         Height          =   300
         Left            =   2880
         TabIndex        =   32
         Text            =   "0"
         Top             =   540
         Width           =   555
      End
      Begin VB.TextBox txtRootTo 
         Height          =   300
         Left            =   3570
         TabIndex        =   33
         Text            =   "10"
         Top             =   540
         Width           =   525
      End
      Begin VB.CommandButton cmdRoots 
         Caption         =   "Roots"
         Height          =   345
         Left            =   2760
         TabIndex        =   34
         Top             =   930
         Width           =   1320
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "Function"
         Height          =   195
         Index           =   23
         Left            =   135
         TabIndex        =   63
         Top             =   315
         Width           =   615
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "From"
         Height          =   195
         Index           =   22
         Left            =   2880
         TabIndex        =   62
         Top             =   315
         Width           =   345
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "To"
         Height          =   195
         Index           =   21
         Left            =   3540
         TabIndex        =   61
         Top             =   315
         Width           =   195
      End
   End
   Begin VB.Frame fraFrame 
      Caption         =   "Lineal Equation Systems"
      Height          =   2025
      Index           =   2
      Left            =   135
      TabIndex        =   43
      Top             =   2895
      Width           =   7065
      Begin VB.ListBox lstSolutions 
         BackColor       =   &H8000000F&
         Height          =   1035
         Left            =   4530
         TabIndex        =   30
         TabStop         =   0   'False
         Top             =   870
         Width           =   2385
      End
      Begin VB.CommandButton cmdSolutions 
         Caption         =   "Solutions"
         Height          =   435
         Left            =   4530
         TabIndex        =   29
         Top             =   360
         Width           =   2415
      End
      Begin VB.TextBox txtR 
         Height          =   285
         Index           =   4
         Left            =   3840
         TabIndex        =   28
         Text            =   "0"
         Top             =   1590
         Width           =   465
      End
      Begin VB.TextBox txtW 
         Height          =   285
         Index           =   4
         Left            =   2880
         TabIndex        =   27
         Text            =   "6"
         Top             =   1590
         Width           =   465
      End
      Begin VB.TextBox txtZ 
         Height          =   285
         Index           =   4
         Left            =   1950
         TabIndex        =   26
         Text            =   "-7"
         Top             =   1590
         Width           =   465
      End
      Begin VB.TextBox txtY 
         Height          =   285
         Index           =   4
         Left            =   1080
         TabIndex        =   25
         Text            =   "4"
         Top             =   1590
         Width           =   465
      End
      Begin VB.TextBox txtX 
         Height          =   285
         Index           =   4
         Left            =   210
         TabIndex        =   24
         Text            =   "1"
         Top             =   1590
         Width           =   465
      End
      Begin VB.TextBox txtR 
         Height          =   285
         Index           =   3
         Left            =   3840
         TabIndex        =   23
         Text            =   "-5"
         Top             =   1200
         Width           =   465
      End
      Begin VB.TextBox txtW 
         Height          =   285
         Index           =   3
         Left            =   2880
         TabIndex        =   22
         Text            =   "2"
         Top             =   1200
         Width           =   465
      End
      Begin VB.TextBox txtZ 
         Height          =   285
         Index           =   3
         Left            =   1950
         TabIndex        =   21
         Text            =   "-1"
         Top             =   1200
         Width           =   465
      End
      Begin VB.TextBox txtY 
         Height          =   285
         Index           =   3
         Left            =   1080
         TabIndex        =   20
         Text            =   "2"
         Top             =   1200
         Width           =   465
      End
      Begin VB.TextBox txtX 
         Height          =   285
         Index           =   3
         Left            =   210
         TabIndex        =   19
         Text            =   "0"
         Top             =   1200
         Width           =   465
      End
      Begin VB.TextBox txtR 
         Height          =   285
         Index           =   2
         Left            =   3840
         TabIndex        =   18
         Text            =   "9"
         Top             =   780
         Width           =   465
      End
      Begin VB.TextBox txtW 
         Height          =   285
         Index           =   2
         Left            =   2880
         TabIndex        =   17
         Text            =   "-6"
         Top             =   780
         Width           =   465
      End
      Begin VB.TextBox txtZ 
         Height          =   285
         Index           =   2
         Left            =   1950
         TabIndex        =   16
         Text            =   "0"
         Top             =   780
         Width           =   465
      End
      Begin VB.TextBox txtY 
         Height          =   285
         Index           =   2
         Left            =   1080
         TabIndex        =   15
         Text            =   "-3"
         Top             =   780
         Width           =   465
      End
      Begin VB.TextBox txtX 
         Height          =   285
         Index           =   2
         Left            =   210
         TabIndex        =   14
         Text            =   "1"
         Top             =   780
         Width           =   465
      End
      Begin VB.TextBox txtR 
         Height          =   285
         Index           =   1
         Left            =   3840
         TabIndex        =   13
         Text            =   "8"
         Top             =   360
         Width           =   465
      End
      Begin VB.TextBox txtW 
         Height          =   285
         Index           =   1
         Left            =   2880
         TabIndex        =   12
         Text            =   "1"
         Top             =   360
         Width           =   465
      End
      Begin VB.TextBox txtZ 
         Height          =   285
         Index           =   1
         Left            =   1950
         TabIndex        =   11
         Text            =   "-5"
         Top             =   360
         Width           =   465
      End
      Begin VB.TextBox txtY 
         Height          =   285
         Index           =   1
         Left            =   1080
         TabIndex        =   10
         Text            =   "1"
         Top             =   360
         Width           =   465
      End
      Begin VB.TextBox txtX 
         Height          =   285
         HelpContextID   =   1
         Index           =   1
         Left            =   210
         TabIndex        =   9
         Text            =   "2"
         Top             =   360
         Width           =   465
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "w ="
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   240
         Index           =   20
         Left            =   3420
         TabIndex        =   59
         Top             =   1650
         Width           =   345
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "z +"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   240
         Index           =   19
         Left            =   2490
         TabIndex        =   58
         Top             =   1650
         Width           =   300
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "y +"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   240
         Index           =   18
         Left            =   1620
         TabIndex        =   57
         Top             =   1650
         Width           =   315
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "x +"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   240
         Index           =   17
         Left            =   750
         TabIndex        =   56
         Top             =   1650
         Width           =   300
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "w ="
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   240
         Index           =   16
         Left            =   3420
         TabIndex        =   55
         Top             =   1260
         Width           =   345
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "z +"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   240
         Index           =   15
         Left            =   2490
         TabIndex        =   54
         Top             =   1260
         Width           =   300
      End
      Begin VB.Label lblLabel 
         AutoSize        =   -1  'True
         Caption         =   "y +"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   9.75
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -