如下程序执行后，应用程序界面显示的是： Dim a As Integer = 2...l1.Text = c.ToString
举一反三
- 如下程序执行后，应用程序界面显示的是： Dim a As Integer = 2 Dim b As Integer = 3 Dim c As Single = 2 If a < b Then If a < c Then c = c - 1 Else c = c + 1 End If End If Label1.Text = c.ToString
- 有如下程序代码 Private Sub Command1_Click( ) Dim A(2 To 7) As Integer Dim i As Integer For i = 2 To 7 A(i) = i Next i print A(i - 2) End Sub 以上程序的执行结果是( )。
- 有如下程序段 Dim a(4) As Integer,b(4) As Integer For k=0 to 2 a(k+1)=k*2 b(3-k)=a(k-1) Next k Print b(k) 执行程序段的结果是
- 有如下的程序段： Dim a(4) As Integer Dim b(4) As Integer For k=0 To 2 a(k+1)=Val(InputBox("Enter data:")) b(3-k)=a(k+1) Next k Print b(k) 程序运行后，依次输入1，3，5，输出的结果是______________。 A: 1 B: 3 C: 5 D: 0
- 程序段如下，程序运行后消息框显示的结果是______。 Dim a, s As String, i As Integer a = "晴空万里" s = "" For i = 1 To 4 Step 2 s &= Mid(a, 4 - i, 2) Next MsgBox(s)? 万里|晴空|万里晴空|晴空万里