填空题
在程序的空白处填写适当的语句(一个空白处只能填写一条语句),使程序完成相应的数据处理。Form_Load事件过程给数组赋初值35,48,15,22,67。Form_Click事件过程对数组元素进行处理。
DimA rr(1 To 5)
Private Sub Form_Load()
[11]
End Sub
Private Form_Click()
[12]
If Int(x/3)=x/3 Then
PrintX
End If
Next X
End Sub
【参考答案】
Arr=Anay(CE,DH,AE,BB,FG)
点击查看答案
<上一题
目录
下一题>
热门
试题
填空题
下面程序的功能是利用随机函数模拟投币,方法是:每次随机产生一个0或1的整数,相当于一次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、 Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如下图所示。程序运行后,在文本框Text1中输入总次数,然后卑.击“开始”按钮,按照输入的次数模拟投币,分别统计出现正面、反面的次数,并显示结果。以下是实现上述功能的程序,请填空。 Private Sub Commandl_Click() Rmldomize n=CInt(Text1.Text) n1=0 n2=0 Fori=1 To______ r=Int(Rnd*2) Ifr=1 Then n1=n1+1 Else n2=n2+1 End fI Next Text2.Text=n1 Text3.Text=n2 End Sub
点击查看答案
填空题
一个变量未被显示定义,末尾也没有类型说明符,则该变量的隐含类型是上______类型。
点击查看答案
相关试题
下列程序是用来计算1+2+3+…+10的...
下列事件过程的功能是:通过Foma_Load事件...
For Each x In Arr
Visual Basic变量名字只能由字母、___...
用户可以用______语句定义自己的数据...