填空题:以下程序的功能是:程序产生100个在区间【20,100】中的随机整数,然后求其中所有偶数的和。请在空白处填上适当的内容,

  • 题目分类:VB
  • 题目类型:填空题
  • 查看权限:VIP
题目内容:
以下程序的功能是:程序产生100个在区间【20,100】中的随机整数,然后求其中所有偶数的和。请在空白处填上适当的内容,将程序补充完整。
Option Base l
Private Sub Form_Click()
Dim arr(100)As Integer,S As Integer
For i=l T0 100
arc(i)=20+80$Rnd
Next i
For i=1 T0 100
If arr(i)Mod 2=0Then
End If
Next i
Print S
End Sub
参考答案:
答案解析:

在窗体上画一个命令按钮,其Name属性值设为Command 1,然后编写如下事件过程:Private Sub Comma

在窗体上画一个命令按钮,其Name属性值设为Command 1,然后编写如下事件过程:Private Sub Command 1_Click()Dim arrl

查看答案

设有如下程序:Sub subP(b()As Integer)Fori=1 T0 4b(i)=2+iNext iEnd S

设有如下程序:Sub subP(b()As Integer)Fori=1 T0 4b(i)=2+iNext iEnd SubPrivate Sub Comman

查看答案

阅读程序:OptionBase 1Private Sub Form_lick()Dim arr,SumSum=0arr=

阅读程序:OptionBase 1Private Sub Form_lick()Dim arr,SumSum=0arr=Array(1,3,5,7,9,11,1

查看答案

在窗体上画一个名称为Command 1的命令按钮,然后编写如下事件过程:Option Base lPrivate Sub

在窗体上画一个名称为Command 1的命令按钮,然后编写如下事件过程:Option Base lPrivate Sub Command 1_Click()Di

查看答案

在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后,如果单

在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后,如果单击“初始化”命令按钮,则对数组a的各元素

查看答案