文档介绍：内蒙古工业大学信息工程学院
实验报告
课程名称：高级语言程序设计（VB）Ⅰ
实验名称：选择、循环、数组和过程综合程序设计
2 个一维数组中。用 Sub 子过程分别对偶数和奇数进行排序，然
后在主调过程内，将排好序的偶数和奇数按每行 15 个数分别输出到 2 个图片框中。
3．用 Function 函数过程判断随机整数是否为素数。在主调过程内，将找出的素数按每行20 个数在
文本框中输出，将素数的个数及求和结果也输出到同一个文本框中。
4．界面可参照如图所示的运行结果进行设计，要求各个控件在窗体上布局合理、大小适中。对象属
性的设置要求用表格填写，包括用到的对象名、属性名和属性值。
5．运行程序后，单击“产生随机整数”按钮，则在窗体上输出90 个随机整数；单击“找奇偶数并排
序”按钮，则分别在 2 个图片框中输出已经排好序的偶数和奇数；单击“找素数并求和”按钮，则在文本
框中输出素数、素数的个数及素数的和；单击“结束”按钮，结束程序的运行。
四、界面设计和属性设置
控件名称属性名属性值说明
F o r m 1 c a p t i o n F o r m 1 标题
L a b e l 1 c a p t i o n 标题
L a b e l 2 C a p t i o n 标题
P i c t u r e 1 A u t o s i z e T r u e
P i c t u r e 2 A u t o s i z e t r u e
T e x t 1 t e x t 清空
C o m m a n d 1 c a p t i o n 产生随机整数标题
C o m m a n d 2 c a p t i o n 找奇偶数并排序标题
C o m m a n d 3 c a p t i o n 找素数并求和标题
C o m m a n d 4 c a p t i o n 结束标题
五、源程序代码
Option Base 1
Dim a(90) As Intege