VisualBasic程序设计—实验报告册参考答案.doc

实验一 VERSION 5.00 Begin VB.Form Form1 Caption = Form1 ClientHeight = 3195 ClientLeft = 60 ClientTop = 345 ClientWidth = 4680 LinkTopic = Form1 ScaleHeight = 3195 ScaleWidth = 4680 StartUpPosition = 3 窗口缺省 Begin VB.CommandButton Command1 Caption = Command1 Height = 375 Left = 2640 TabIndex = 0 Top = 2400 Width = 1575 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() Print Sqr(8), 8 ^ (1 / 3) End Sub VERSION 5.00 Begin VB.Form Form1 Caption = Form1 ClientHeight = 3195 ClientLeft = 60 ClientTop = 345 ClientWidth = 4680 LinkTopic = Form1 ScaleHeight = 3195 ScaleWidth = 4680 StartUpPosition = 3 窗口缺省 Begin VB.CommandButton Command1 Caption = Command1 Height = 495 Left = 3720 TabIndex = 0 Top = 2640 Width = 855 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() Dim i% For i = 100 To 110 Print i, i ^ (1 / 2) Next End Sub VERSION 5.00 Begin VB.Form Form1 AutoRedraw = -1 True Caption = Form1 ClientHeight = 3195 ClientLeft = 60 ClientTop = 345 ClientWidth = 4680 BeginProperty Font Name = 楷体_GB2312 Size = 21.75 Charset = 134 Weight = 400 Underline = 0 False Italic = 0 False Strikethrough = 0 False EndProperty