• 2021-04-14
    窗体上有一标签Label1,将1~9连接成123456789的9位数,显示在标签中。应该在填入的内容,完善程序。
    Dim i%, s&
    s = 0
    For i = 1 To 9
    s = ___________
    Next
    Label1.Caption = s
  • s * 10 + i

    内容

    • 0

      下列程序中 s = s + j 语句共执行了______次。 Dim s As Integer Dim i As Integer, j As Integer For i = 1 To 10 Step 2 For j = 1 To 5 Step 2 s = s + j Next j Next i Print s

    • 1

      以下VBA程序运行的结果是( ) Public Sub Form_Click() Dim s As Integer s = 0 For i = 1 To 2 s = 1 For j = i To 3 s = s + i * j Next j Next i MsgBox "s=" &; s End Sub A: 11 B: 18 C: 22 D: 7

    • 2

      下列程序: Option Base 1 Private Sub Form_Click() Dim a(5,5) For i = 1 To 5 For j = 1 To 5 k = k + 1 a (i,j)= k Next j Next i For i = 1 To 5 s = s + a (i,i) Next i Print s End Sub 运行时的输出结果是( )。

    • 3

      有如下程序段:s = 0For i = 1 To 10 s = s + iNext iPrint s与上述程序段输出结果相同的程序段为( )。 A: s = 0: i = 0 While i <= 10 i = i + 1 s = s + i Wend Print s B: s = 0: i = 1 While i < 10 i = i + 1 s = s + i Wend Print s C: s = 0: i = 1 Do s = s + i i = i + 1 Loop While i < 10 Print s D: s = 0: i = 1 Do s = s + i i = i + 1 Loop Until i > 10 Print s

    • 4

      已知变量s的值是一个字符串,以下能用于判断s这个字符串是否以字符“0”开头,且以字符“9”结尾的表达式为: A: A.s[0]="0" or s[-1]="9" B: A.s[0]==0 and s[9]==9 C: s[0]=="0" and s[-1]=="9" D: A.s[0]=="0" or s[-1]=="9"