求VB实验报告,(程序设计基础,实验项目 数组)

2021-03-12 15:49:00 字数 1207 阅读 3997

1楼:匿名用户

一、实验目的

1. 掌握定义数组的方法;

2. 能配合循环语句编程对数组进行操作;

3. 了解控件数组的基本概念与简单编程。

二、实验内容

1. 填空完成下列程序段,产生一组[100,200]间的随机整数,显示这组数,并求出它们的平均值。

private sub ***mand1_click()

dim ab(20) as integer ' 数组ab有______个元素

dim i%, s as integer

for i = 1 to 20

ab(i) = ____________ ' 填空为数组元素赋值

print "第"; i; "个数是 "; ab(i) ' 试改为用标签输出

s = ____________

__________

print "平均值是:"; s / 20

end sub

2.编程输入10名学生某一门课的成绩,求出其中的最高分、最低分和所有学生的平均分。

3.编程输入10名学生姓名和一门课的成绩,输出最高分的学生姓名及其成绩,再显示成绩低于平均分的学生姓名及其成绩。

4. 用计算机模拟掷骰子游戏。编程序统计掷n次(n尽量的大,例如100000次)后各点数出现的次数。

〔提示〕定义数组dian(1 to 6),分别存放1至6点出现的次数。产生一个[1,6]间的随机整数x,如果是3,就将dian(3)的值增加1,依此类推。

5.制作一个模拟**拨号的界面。按下标题为0~9的十个数字键时文本框中显示相应数字号码;按“退格”键时清除最后一位数字;按“清空”键时清除文本框中的所有数字。

[提示] 10个数字键设计成一个控件数组,可简化**。

6.在文本框text1中输入一串字符,用标签label1显示其中出现频率最高的字母及其出现次数。

例如:输入“ this is a beautiful world. ”则输出“使用频率最高的是i,共出现3次。”

三、实验结果

请在此简述实验完成情况,并列出你编写的各工程的主要命令**:

四、讨论

你在完成实验过程中遇到的最大困难是什么?

2楼:匿名用户

一、实验目的

二、实验内容

三、实验结果

四、讨论

五、做出认识