VB高手进来~~把代码发给我袄~~

来源：百度知道 编辑：UC知道 时间：2024/05/26 12:55:11
1.要求利用随机函数随机产生10个10~99的随机整数，利用数组将它们从小到大以及从大到小排列并显示，并显示平均数。
2.要求利用InputBox输入若干个学生的成绩（人数不确定），利用动态数组计算出平均成绩并统计出低于平均成绩的人数。
3.要求利用控件数组完成一个简易计算器的功能（整数）。要求能够连续运算。界面如下。

一题
Private Sub Command1_Click()
Dim a, b As Integer
a = Text1.Text
b = Text2.Text
Label1.Caption = Int(Rnd * (b - a + 1)) + a
Label2.Caption = Int(Rnd * (b - a + 1)) + a
Label3.Caption = Int(Rnd * (b - a + 1)) + a

偶是懒人,分太少了....

太简单了,没有时间给你搞.