【VB开源代码栏目提醒】：以下是网学会员为您推荐的VB开源代码-直接指定参数种类及数据.frm，希望本篇文章对您学习有所帮助。

    VERSION 5.00
    Begin VB.Form Form1 
       AutoRedraw      =   -1  'True
       BackColor       =   &H0000FFFF&
       BorderStyle     =   1  'Fixed Single
       Caption         =   "Hello"
       ClientHeight    =   1620
       ClientLeft      =   45
       ClientTop       =   330
       ClientWidth     =   2415
       BeginProperty Font 
          Name            =   "宋体"
          Size            =   12
          Charset         =   136
          Weight          =   400
          Underline       =   0   'False
          Italic          =   0   'False
          Strikethrough   =   0   'False
       EndProperty
       LinkTopic       =   "Form1"
       MaxButton       =   0   'False
       MinButton       =   0   'False
       ScaleHeight     =   1620
       ScaleMode       =   0  'User
       ScaleWidth      =   2415
       StartUpPosition =   3  '窗口缺省
       Begin VB.CommandButton Command1 
          Caption         =   "请按我"
          BeginProperty Font 
             Name            =   "宋体"
             Size            =   9
             Charset         =   136
             Weight          =   400
             Underline       =   0   'False
             Italic          =   0   'False
             Strikethrough   =   0   'False
          EndProperty
          Height          =   500
          Left            =   360
          TabIndex        =   0
          Top             =   800
          Width           =   1800
       End
    End
    Attribute VB_Name = "Form1"
    Attribute VB_GlobalNameSpace = False
    Attribute VB_Creatable = False
    Attribute VB_PredeclaredId = True
    Attribute VB_Exposed = False
    Private Sub Command1_Click()
        Number% = 3456
        My$ = "Visual Basic"
        Print Number%
        Print My$
    End Sub