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

📄 help2.frm

📁 runge kutta program to test run with VB code
💻 FRM
字号:
VERSION 5.00
Begin VB.Form Help2 
   Appearance      =   0  'Flat
   BackColor       =   &H80000005&
   BorderStyle     =   1  'Fixed Single
   Caption         =   "Informations"
   ClientHeight    =   5355
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   4425
   Icon            =   "help2.frx":0000
   LinkTopic       =   "Form3"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   357
   ScaleMode       =   3  'Pixel
   ScaleWidth      =   295
   StartUpPosition =   2  'CenterScreen
   Begin VB.PictureBox Picture1 
      Appearance      =   0  'Flat
      BackColor       =   &H80000005&
      BorderStyle     =   0  'None
      ForeColor       =   &H80000008&
      Height          =   7200
      Left            =   105
      ScaleHeight     =   480
      ScaleMode       =   3  'Pixel
      ScaleWidth      =   266
      TabIndex        =   1
      Top             =   0
      Width           =   3990
      Begin VB.Label Label18 
         BackStyle       =   0  'Transparent
         Caption         =   " -- "
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   2040
         TabIndex        =   29
         Top             =   4080
         Width           =   135
      End
      Begin VB.Image Image2 
         Height          =   435
         Left            =   2040
         Picture         =   "help2.frx":000C
         Top             =   3960
         Width           =   1560
      End
      Begin VB.Label Label31 
         BackStyle       =   0  'Transparent
         Caption         =   " - variable"
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   600
         TabIndex        =   28
         Top             =   5400
         Width           =   1455
      End
      Begin VB.Label Label30 
         BackStyle       =   0  'Transparent
         Caption         =   """ x """
         ForeColor       =   &H000000C0&
         Height          =   255
         Left            =   120
         TabIndex        =   27
         Top             =   5400
         Width           =   615
      End
      Begin VB.Label Label29 
         BackStyle       =   0  'Transparent
         Caption         =   "mistake in writeing the function will change the graphic."
         ForeColor       =   &H00800080&
         Height          =   495
         Left            =   120
         TabIndex        =   26
         Top             =   6120
         Width           =   3855
      End
      Begin VB.Label Label27 
         BackStyle       =   0  'Transparent
         Caption         =   "Use the brackets where are needet. Any"
         ForeColor       =   &H00800080&
         Height          =   255
         Left            =   960
         TabIndex        =   25
         Top             =   5880
         Width           =   3255
      End
      Begin VB.Label Label26 
         BackStyle       =   0  'Transparent
         Caption         =   "Attention:"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H00008000&
         Height          =   255
         Left            =   120
         TabIndex        =   24
         Top             =   5880
         Width           =   855
      End
      Begin VB.Label Label4 
         BackStyle       =   0  'Transparent
         Caption         =   " - brackets"
         ForeColor       =   &H00800000&
         Height          =   375
         Left            =   600
         TabIndex        =   23
         Top             =   5160
         Width           =   3375
      End
      Begin VB.Label Label25 
         BackStyle       =   0  'Transparent
         Caption         =   """ ( ... ) """
         ForeColor       =   &H000000C0&
         Height          =   255
         Left            =   0
         TabIndex        =   22
         Top             =   5160
         Width           =   735
      End
      Begin VB.Label Label24 
         BackStyle       =   0  'Transparent
         Caption         =   "- returns the absolute value "
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   1200
         TabIndex        =   21
         Top             =   4920
         Width           =   2415
      End
      Begin VB.Label Label23 
         BackStyle       =   0  'Transparent
         Caption         =   """ | expreseie | """
         ForeColor       =   &H000000C0&
         Height          =   255
         Left            =   0
         TabIndex        =   20
         Top             =   4920
         Width           =   1095
      End
      Begin VB.Label Label21 
         BackStyle       =   0  'Transparent
         Caption         =   " - trigonometic functions"
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   1800
         TabIndex        =   19
         Top             =   4680
         Width           =   1935
      End
      Begin VB.Label Label20 
         BackStyle       =   0  'Transparent
         Caption         =   """ sin(...) , cos(...) , tg(...) , ctg(...) , arcsin(...) , arcos(...) , arctg(...) , arcctg(...) """
         ForeColor       =   &H000000FF&
         Height          =   495
         Left            =   0
         TabIndex        =   18
         Top             =   4440
         Width           =   3855
      End
      Begin VB.Label Label17 
         BackStyle       =   0  'Transparent
         Caption         =   """ radical(base,expression) """
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   0
         TabIndex        =   17
         Top             =   4080
         Width           =   1935
      End
      Begin VB.Label Label16 
         BackStyle       =   0  'Transparent
         Caption         =   " - logarithm"
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   720
         TabIndex        =   16
         Top             =   3720
         Width           =   2895
      End
      Begin VB.Label Label15 
         BackStyle       =   0  'Transparent
         Caption         =   " "" ln(...) """
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   0
         TabIndex        =   15
         Top             =   3720
         Width           =   735
      End
      Begin VB.Label Label14 
         BackStyle       =   0  'Transparent
         Caption         =   " - power function"
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   600
         TabIndex        =   14
         Top             =   3480
         Width           =   3015
      End
      Begin VB.Label Label13 
         BackStyle       =   0  'Transparent
         Caption         =   """ ...^..."""
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   0
         TabIndex        =   13
         Top             =   3480
         Width           =   615
      End
      Begin VB.Label Label12 
         BackStyle       =   0  'Transparent
         Caption         =   " - minus"
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   360
         TabIndex        =   12
         Top             =   3240
         Width           =   1815
      End
      Begin VB.Label Label11 
         BackStyle       =   0  'Transparent
         Caption         =   """ - """
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   0
         TabIndex        =   11
         Top             =   3240
         Width           =   375
      End
      Begin VB.Label Label10 
         BackStyle       =   0  'Transparent
         Caption         =   " - sum operation"
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   480
         TabIndex        =   10
         Top             =   3000
         Width           =   1695
      End
      Begin VB.Label Label9 
         BackStyle       =   0  'Transparent
         Caption         =   """ + """
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   0
         TabIndex        =   9
         Top             =   3000
         Width           =   375
      End
      Begin VB.Label Label8 
         BackStyle       =   0  'Transparent
         Caption         =   " - division operation"
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   960
         TabIndex        =   8
         Top             =   2760
         Width           =   1695
      End
      Begin VB.Label Label7 
         BackStyle       =   0  'Transparent
         Caption         =   """ / "" or "" : """
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   0
         TabIndex        =   7
         Top             =   2760
         Width           =   975
      End
      Begin VB.Label Label6 
         BackStyle       =   0  'Transparent
         Caption         =   " - multiplication operation"
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   360
         TabIndex        =   6
         Top             =   2520
         Width           =   2055
      End
      Begin VB.Label Label5 
         BackStyle       =   0  'Transparent
         Caption         =   """ * """
         ForeColor       =   &H000000FF&
         Height          =   255
         Left            =   0
         TabIndex        =   5
         Top             =   2520
         Width           =   375
      End
      Begin VB.Label Label3 
         BackStyle       =   0  'Transparent
         Caption         =   "      The operation that can be used:"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H00800000&
         Height          =   255
         Left            =   0
         TabIndex        =   4
         Top             =   2160
         Width           =   3975
      End
      Begin VB.Image Image1 
         Height          =   420
         Left            =   0
         Picture         =   "help2.frx":1016
         Top             =   1560
         Width           =   4035
      End
      Begin VB.Label Label2 
         BackStyle       =   0  'Transparent
         Caption         =   "     The fucnction must be writed in the special place. Then press ""Proceed""."
         ForeColor       =   &H00800000&
         Height          =   375
         Left            =   0
         TabIndex        =   3
         Top             =   960
         Width           =   3975
      End
      Begin VB.Label Label1 
         Alignment       =   2  'Center
         BackStyle       =   0  'Transparent
         Caption         =   "The mode to write the function"
         BeginProperty Font 
            Name            =   "Times New Roman"
            Size            =   14.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H00FF0000&
         Height          =   615
         Left            =   480
         TabIndex        =   2
         Top             =   0
         Width           =   3135
      End
   End
   Begin VB.VScrollBar VScroll1 
      Height          =   5355
      LargeChange     =   3
      Left            =   4155
      Max             =   11
      TabIndex        =   0
      Top             =   0
      Width           =   255
   End
End
Attribute VB_Name = "Help2"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Load()
  Picture1.Top = 0
End Sub

Private Sub Form_Unload(Cancel As Integer)
   Form2.Enabled = True
End Sub

Private Sub VScroll1_Change()
  Help2.Picture1.Top = -10 * Help2.VScroll1.Value
End Sub

⌨️ 快捷键说明

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