题目

有一个单击按钮过程，其作用是产生50个60~100 的随机数，统计其中被6整除余2的个数，并将这些数输出。请补充下面的程序： Private Sub command1_click()   Dim X, N As Integer   im count As Integer 'count 用来保存能被 6 整除余 2 的数据的个数   Randomize Timer '随机数初始化，以时钟为随机数种子   For N = 1 To 50       X = + int(Rnd * 40) '随机产生 50 个 60~100 的随机数       If X Mod 6 = 2 Then         List1.AddItem Str(X)               End If     Next N   Label1.Caption=str（count） End Sub 答案：【1】60【2】count=count+1

查看本题答案和解析