VBA经典试题及答案.doc
5星
- 浏览量: 0
- 大小:None
- 文件类型：None
简介：
《VBA经典试题及答案》是一份文档集合了众多有关Visual Basic for Applications编程的经典练习题及其详细解答，旨在帮助学习者掌握和巩固VBA技能。
编写一个程序来随机生成20个两位整数，并统计其中小于等于60、大于60且小于等于80以及大于80的数字及其数量，最后将结果打印输出到窗体上。
```vb
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 a <= 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
```
全部评论 (0)
还没有任何评论哟~
