Visual Basic是一种面向对象的可视化程序设计语言，采取了( )的编程机制。 三种逻辑运算符号优先次序为（ ）。有如下程序,运行后输出的结果是( )。j=0:n=0 Do While n Visual Basic是一种面向对象的可视化程序设计语言，采取了( )的编程机制。 三种逻辑运算符号优先次序为（ ）。有如下程序,运行后输出的结果是( )。j=0:n=0 Do While n 2022-01-25 19
在Visual Basic中，不能关闭的窗口是( )。 下列程序段的运行结果是（ ）。 Dim A As Integer , B As Integer A = 15 B = 4 Print 4 + A B 下列程序段的执行结果为( ) 在Visual Basic中，不能关闭的窗口是( )。 下列程序段的运行结果是（ ）。 Dim A As Integer , B As Integer A = 15 B = 4 Print 4 + A B 下列程序段的执行结果为( ) 2022-01-24 11
以下可以构成语句的是（ ）。A:True B:False C:Null D:出错信息 答案: False关于MsgBox函数，以下说法不正确的是（ ）。静态数组的大小是可变的，但所有数组元素的类型必须相同1 1A:对象名.属性 B:对 以下可以构成语句的是（ ）。A:True B:False C:Null D:出错信息 答案: False关于MsgBox函数，以下说法不正确的是（ ）。静态数组的大小是可变的，但所有数组元素的类型必须相同1 1A:对象名.属性 B:对 2022-01-21 10
以下关于VB语言的说法中，正确的是（ ）。 下列符号常量的声明中，（ ）是不合法的。 结构化程序设计的三种基本结构不包括（ ）。 以下关于静态数组的描述正确的是（ ）。 假定有如下的Sub过程：Sub fun(x As Single 以下关于VB语言的说法中，正确的是（ ）。 下列符号常量的声明中，（ ）是不合法的。 结构化程序设计的三种基本结构不包括（ ）。 以下关于静态数组的描述正确的是（ ）。 假定有如下的Sub过程：Sub fun(x As Single 2022-01-20 11
在Visual Basic环境下，当写一个新的Visual Basic程序时，所做的第一件事是（ ）。C:Const a As Double=Sin（1） D:Const a =“OK” 答案: Const a As Integer=“ 在Visual Basic环境下，当写一个新的Visual Basic程序时，所做的第一件事是（ ）。C:Const a As Double=Sin（1） D:Const a =“OK” 答案: Const a As Integer=“ 2022-01-20 13
下列不是Visual Basic 文件的是（ ）。表达式4+56*7/8 Mod 4的值是（ ）。D:x=1为赋值语句, y=1为关系表达式静态数组的大小是可变的，可以有不同类型的数组元素1.5 2A:*.frm文件 B:*.bas 下列不是Visual Basic 文件的是（ ）。表达式4+56*7/8 Mod 4的值是（ ）。D:x=1为赋值语句, y=1为关系表达式静态数组的大小是可变的，可以有不同类型的数组元素1.5 2A:*.frm文件 B:*.bas 2022-01-19 16
答案:1925有如下函数过程：Function Cys(ByVal x As Integer, ByVal y As Integer) As Integer Dim quotients Do While y 0 答案:1925有如下函数过程：Function Cys(ByVal x As Integer, ByVal y As Integer) As Integer Dim quotients Do While y 0 2021-12-27 13
A:3a*b*c(d+e) B:3abc(d+e) 30有如下函数过程：Function secproc(x As Integer, y As Integer, z As Integer) secproc = 3 * A:3a*b*c(d+e) B:3abc(d+e) 30有如下函数过程：Function secproc(x As Integer, y As Integer, z As Integer) secproc = 3 * 2021-12-25 9
C:NOTANDOR D:ORNOTAND 答案: NOTANDOR 下列的程序段执行后,x的值为( )。x=0 For i=1 To 10 For j=i To 10 x=x+1 Nex C:NOTANDOR D:ORNOTAND 答案: NOTANDOR 下列的程序段执行后,x的值为( )。x=0 For i=1 To 10 For j=i To 10 x=x+1 Nex 2021-12-23 12
下列的程序段执行后,x的值为( )。x=0 For i=1 To 10 For j=i To 10 x=x+1 Next j Next i A 50 B 55 C 5 D 105 下列的程序段执行后,x的值为( )。x=0 For i=1 To 10 For j=i To 10 x=x+1 Next j Next i A 50 B 55 C 5 D 105 2021-12-12 9
如果要对已经声明的数组重新定义大小，并保留原有数据，可以使用语句（ ）。 在窗体上画一个命令按钮(名称为Command1)，并编写如下代码：Function Fun1(ByVal a As Integer, b As Integer) 如果要对已经声明的数组重新定义大小，并保留原有数据，可以使用语句（ ）。 在窗体上画一个命令按钮(名称为Command1)，并编写如下代码：Function Fun1(ByVal a As Integer, b As Integer) 2021-11-28 9
D: D: 控件数组的建立通过Dim语句声明，而一般控件不需要声明 语句“maxval = max ”应改为“maxval = a(max)” D: D: 控件数组的建立通过Dim语句声明，而一般控件不需要声明 语句“maxval = max ”应改为“maxval = a(max)” 2021-11-27 16
B: B: 控件数组的索引属性值Index值为0，而一般控件的Index值为空 语句“For i = 2 To 10”应改为“For i = 1 To 10” B: B: 控件数组的索引属性值Index值为0，而一般控件的Index值为空 语句“For i = 2 To 10”应改为“For i = 1 To 10” 2021-11-25 16
答案: For i = 2 To 10 2,6,1,2,-1,1 If a(i) > a(max) Then max = i 答案: For i = 2 To 10 2,6,1,2,-1,1 If a(i) > a(max) Then max = i 2021-11-21 7
-5 6 x(i) = Int(Rnd() * 100) D: Print x(i); -5 6 x(i) = Int(Rnd() * 100) D: Print x(i); 2021-11-19 17
C: 以下是一个能返回数组a中最大数的函数过程代码： 2,6,1,2,-1,1 Function maxval(a() As Integer) As Integer C: 以下是一个能返回数组a中最大数的函数过程代码： 2,6,1,2,-1,1 Function maxval(a() As Integer) As Integer 2021-11-19 14
-5 0 Dim x(1 To 10) As Integer C: For i = 1 To 10 -5 0 Dim x(1 To 10) As Integer C: For i = 1 To 10 2021-11-18 20
……C:End Sub 以上语句所定义的数组A为（ ）维数组，共有（ ）个元素，第一维下标从（ ）到（ ），第二维下标从（ ）到（ ）。5 ……C:End Sub 以上语句所定义的数组A为（ ）维数组，共有（ ）个元素，第一维下标从（ ）到（ ），第二维下标从（ ）到（ ）。5 2021-11-14 5
Private Sub Command1_Click() A: Dim a 4 6 6 Private Sub Command1_Click() A: Dim a 4 6 6 2021-10-28 12
ReDim Preserve 0 下列程序的输出结果为（ ）。 下面程序的运行结果为（ ）。Dim a%, b%, c%Sub p1(x%, y%) Dim c As Integer x = 2 * x: y = y ReDim Preserve 0 下列程序的输出结果为（ ）。 下面程序的运行结果为（ ）。Dim a%, b%, c%Sub p1(x%, y%) Dim c As Integer x = 2 * x: y = y 2021-10-28 18
