《计算机技术基础（VB ）》实验报告 实验 五
数组的使用（1 1 ）
学院
班级
学号
姓名
实验日期
批次
地点
教师
教师评语
年
月
日 一、实验目的 1．掌握数组的声明、数组元素的引用。
2．掌握静态数组的使用。
3．应用数组解决与数组有关的常用算法。
二、实验内容（你做了哪几个题）
1．必做题：实验 5-1
2．选做题：实验 5-2
三、简述验 实验 5-2 的具体操作步骤 ：
1. 在窗体上放置两个标签，两个图形框来显示产生的随机数与计算的结果，两个命令按钮计算相应的题目 2. 编写 command1 和 command2 的程序代码产生随机数、计算结果。
3. 保存文件 sy5-2.frm 和 sy5-2.vbp。运行并调试程序
计算机技术基础（VB ）实验报告—— 实验五 五
四、思考并回答 1．请分别写出实验 5-1 中声明 A、B 两个数组的语句。
Dim A(1 To 10) As Integer Dim B(1 To 10) As Integer
2．实验 5-1 中共有 6 个命令按钮，除了指导书中给出的二段代码，请写出其它任意两个按钮中的代码。
Private Sub Command1_Click() Picture1.Cls: Picture2.Cls Randomize For i = 1 To 10 A(i) = 0 B(i) = Int(Rnd * 100 + 1) Picture1.Print A(i); Picture2.Print B(i); Next i Picture1.Print: Picture2.Print End Sub
Private Sub Command2_Click() Picture1.Cls: Picture2.Cls For i = 1 To 10 A(i) = i B(i) = 2 * i + 1 Picture1.Print A(i); Picture2.Print B(i); Next i Picture1.Print: Picture2.Print End Sub
五、简述本次实验存在的问题 掌握 Exit sub 的作用：结束当前的过程,不再执行后续程序。