当前位置： 文档下载 > 所有分类 > IT/计算机 > 计算机软件及应用 > VBA典型试题 及答案1、 编写程序，随机生成20个两位整数，并统计出其中小于等于60、大于60小于等于80及大于80的数据以及相应个数，结果打印输出到窗体。
Private Sub Form_Click()
For i = 1 To 20
a = Fix(Rnd() * 91 + 10)
If a <= 60 Then
x = x & a & " "
b = b + 1
End If
If a > 60 And b <= 80 Then
y = y & a & " "
c = c + 1
End If
If a > 80 Then
z = z & a & " "
d = d + 1
End If
Next i
Print "小于等于60的个数：" & b & "个," & x
Print "大于60小于等于80的个数：" & c & "个," & y
Print "大于80的个数：" & d & "个," & z
End Sub
2、 编写程序：利用随机函数产生10个（59，142）范围内的随机整数，显示它们当中的最大值、最小值和平均值。
Private Sub Form_Click()
Max = 60
Min = 141
For i = 1 To 10
a = Fix(Rnd * 82 + 60)
Sum = Sum + a
If a > Max Then Max = a
If a < Min Then Min = a
Print a;
Next i
Print "最大值：" & Max
Print "最小值：" & Min
Print "平均值：" & Sum / 10
End Sub
VBA考试题及答案_电脑基础知识_IT/计算机_专业资料。(25)若窗体 Frm1 中有一个命令按钮 Cmd1,则窗体和命令按钮的 Click 事件过程名分别为 A)Form_Click() C...
2011年3月等级考试VBA操作题参考答案_工学_高等教育_教育专区。2011年3月等级考试VBA操作题参考答案等级考试中的vba操作题操作说明:不允许修改窗体等对象中未涉及的...
等级考试中的vba操作题操作说明:不允许修改窗体等对象中未涉及的控件、属性;程序代码只允许在 “***”与“***”之间的空行内补充一行语句、完成设计,不允许增删...
吴优整理 全国计算机等级考试 (二级) 全国计算机等级考试 2012 年 01 月 01 日整理学习) (包括历年真题与答案、二级题库、VBA 学习) 包括历年真题与答案、二级题...
Cfaivba保险基础知识考试试卷及答案_电力/水利_工程科技_专业资料。Cfaivba保险基础知识考试试卷及答案Time will pierce the surface or youth, will be on the ...
计算机国考二级辅导AccessVBA其它编程题及参考答案_IT认证_资格考试/认证_教育专区。计算机国考二级辅导,重难点详解VBA 编程的真题链接一、选择题(1)在窗体中有一个...
基于Word VBA技术的自动化试卷编辑系统_计算机软件及...并能 自动生成标准化试卷和答案等文档 的应 用软 ...其典型应用有 : 加速 日 常编辑和格式设置 、 组合...
VBA 与模块典型题 以下关于模块的说法,错误的是 A 窗体模块和报表模块都属于类...D 双精度浮点型 参考答案:B 提示:整型用%表示;长整型用&表示;单精度浮点型...
VBA 与模块典型题 以下关于模块的说法,错误的是 A 窗体模块和报表模块都属于类...窗体模块和报表模块生命周期是伴随着应用程序的打开而开始、关闭结束 参考答案:D...
第一题: Private Sub Command1_Click() TxtWelCome.Value = "欢迎使用 VBA!...(i) End If Next i '计算最大值和最小值的平均值 avg,并显示在标签 ...
闽公网安备 35021102001881号 
热门文档