【VB开源代码栏目提醒】：以下是网学会员为您推荐的VB开源代码-3.3.1.frm，希望本篇文章对您学习有所帮助。

    VERSION 5.00
    Begin VB.Form Form5 
       Caption         =   "Form5"
       ClientHeight    =   3195
       ClientLeft      =   60
       ClientTop       =   345
       ClientWidth     =   4680
       LinkTopic       =   "Form5"
       ScaleHeight     =   3195
       ScaleWidth      =   4680
       StartUpPosition =   3  '窗口缺省
    End
    Attribute VB_Name = "Form5"
    Attribute VB_GlobalNameSpace = False
    Attribute VB_Creatable = False
    Attribute VB_PredeclaredId = True
    Attribute VB_Exposed = False
    Private Sub Form_Click()
    Dim a As Integer
    Dim b As Single
    '定义变量a,b
    a = Sqr(5)
    b = Sqr(5)
    '求平方根
    Print "整型输出为：" & a
    Print "浮点型输出为：" & b
    '输出
    End Sub