下列程序段的运行结果是（ ）。 Dim A As Integer , B As Integer A = 15 B = 4 Print 4 + A B
举一反三
- 有如下程序段 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 y as integer If y Then Print y+1 Else Print y+2 运行后，显示的结果是()
- 有如下的程序段： 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
- 下列数组声明语句，________是正确的。 A: Dim a(3, 4) As Integer B: Dim a(3, 4) As Single C: Dim a{3, 4} As Integer D: Dim a[3, 4] As Integer E: Dim a(3 4) As Integer F: Dim a[3：4] As Integer
- 有如下函数过程： Function secproc(x As Integer, y As Integer, z As Integer) secproc = 3 * y + z + 2 * x End Function Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a = 2: b = 3: c = 4 Print secproc(c, b, a) End Sub 该程序的运行结果是（ ）。