题目内容

下面程序段显示的结果是____。 Dim x x=Int(Rnd+4) Select Case x Case 5:Print("优秀") Case 4:Print("良好") Case 3:Print("通过") Case Else:Print("不通过") End Select

A. 优秀
B. 良好
C. 通过
D. 不通过

查看答案

搜索结果不匹配？点我反馈

更多问题

列表框中的各条目可用属性List数组来表示，List数组的下标是从______ 开始的。

查看答案

为了表达x处于数轴的x1~x2区间内（不包含端点，且 x1 < x2 ），则VB表达式应写为 x>x1 And ______ 。

查看答案

根据如下程序，则对窗体单击后，程序在窗体上打印的数字为______ 。 Private Sub Form_Click() Dim i As Integer, m As Integer m = 1 For i = 3 To 7 step 2 m = m * i Next i Print m End Sub

查看答案

以下能正确定义数据类型TelBook的代码是：____。

A. Type TelBook Dim Name As String * 10 Dim TelNum As Integer End Type
B. Type TelBook Name As String * 10 TelNum As Integer End Type
C. Type TelBook Name As String * 10 TelNum As Integer End TelBook
D. Type TelBook Name As String * 10 TelNum As Integer End Type TelBook

查看答案

下面程序段显示的结果是____。 Dim x x=Int(Rnd+4) Select Case x Case 5:Print("优秀") Case 4:Print("良好") Case 3:Print("通过") Case Else:Print("不通过") End Select

A. 优秀 B. 良好 C. 通过 D. 不通过

列表框中的各条目可用属性List数组来表示，List数组的下标是从______ 开始的。

为了表达x处于数轴的x1~x2区间内（不包含端点，且 x1 < x2 ），则VB表达式应写为 x>x1 And ______ 。

根据如下程序，则对窗体单击后，程序在窗体上打印的数字为______ 。 Private Sub Form_Click() Dim i As Integer, m As Integer m = 1 For i = 3 To 7 step 2 m = m * i Next i Print m End Sub

以下能正确定义数据类型TelBook的代码是：____。

A. 优秀
B. 良好
C. 通过
D. 不通过