窗体上有一标签Label1,将1~9连接成123456789的9位数,显示在标签中。应该在填入的内容,完善程序。
Dim i%, s&
s = 0
For i = 1 To 9
s = ___________
Next
Label1.Caption = s
Dim i%, s&
s = 0
For i = 1 To 9
s = ___________
Next
Label1.Caption = s
举一反三
- 当执行以下程序时,在名为label1的标签框内将显示_____。 Private Sub command1_click() s=0 For I=1 To 5 Step 1 s=s+I Next I label1.Caption=s End Sub
- 运行下列程序,单击窗体显示的结果为( )。 Private Sub Form_Click() Dim a Dim s As Integer, i As Integer a = Array(1, 2, 3) For i = 2 To 0 Step -1 s = s + a(i) * a(i) Next i Print s End Sub
- 以下程序段实现的输出是()。for(i=0;i<;=9;i++)s[i]=i;for(i=9;i>;=0;i--)printf("%2d",s[i]);[/i][/i] A: 9 7 5 3 1 B: 1 3 5 7 9 C: 9 8 7 6 5 4 3 2 1 0 D: 0 1 2 3 4 5 6 7 8 9
- 下列程序输出结果是( )。 i=1 s=0 while i<=3: s=s+i i=i+1 print(s) A: 1 B: 3 C: 6 D: 9
- 执行下列程序段后,程序的运行结果为()。 s = 1 For i = 1 To 3 For j = 0 To i - 1 s = s + s * j Next j Print s; Next i