frmhelp.frm

来自「visual basic课程设计案例精编」· FRM 代码 · 共 41 行

VERSION 5.00
Begin VB.Form frmhelp 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "Help!"
   ClientHeight    =   4020
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   2715
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   4020
   ScaleWidth      =   2715
   StartUpPosition =   3  '窗口缺省
   Begin VB.TextBox Text1 
      BackColor       =   &H00000000&
      ForeColor       =   &H0000FF00&
      Height          =   3375
      Left            =   120
      Locked          =   -1  'True
      MultiLine       =   -1  'True
      TabIndex        =   0
      Top             =   120
      Width           =   2535
   End
End
Attribute VB_Name = "frmhelp"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Load()
frmhelp.Left = frmmain.Left + frmmain.Width
frmhelp.Height = frmmain.Height
frmhelp.Top = frmmain.Top
frmhelp.Text1.Text = "command line:" & vbCrLf & "/exit : exit the program" & vbCrLf & "/who : who is talking" & vbCrLf & "/sound : sound on or off" & vbCrLf
frmhelp.Text1.Text = Text1 & "/save : save the text" & vbCrLf & "/help on : help window on" & vbCrLf & "/help off : help window off" & vbCrLf & "/about : about window show" & vbCrLf


End Sub