填空题

下列程序是用来计算1+2+3+…+10的程序段，请补充完整该程序。
Dimi,s,k As Integer
s=0:k=0
For______To-1
k=k+1
s=s+k
Nexti
Print S

【参考答案】

i=-10

<上一题目录下一题>

热门试题

填空题

下面程序的功能是利用随机函数模拟投币，方法是：每次随机产生一个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

填空题

窗体上有两个按钮，执行程序后按Cancel按钮的输出结果是______。 Private Sub Commandl_Click() Print“北京”； End Sub Private Sub Command2,_Click() Print“南京”； End Sub Private Sub Form_Load() Command2.Cancel=Tree Command1.Cancel=Tree End Sub

相关试题