2024知到网课 VISUAL BASIC程序设计（吉林医药学院）智慧树答案-知到智慧树答案大全

第一章单元测试

1、单选题：以下关于VB语言的说法中，正确的是（）。
A:VB是一种面向过程的语言
B:VB是一种机器语言
C:VB是一种面向对象的语言
D:VB是一种低级语言
正确答案:【VB是一种面向对象的语言】

2、单选题：在Visual Basic环境下，当写一个新的Visual Basic程序时，所做的第一件事是（）。
A:新建一个工程
B:打开属性窗口
C:进入Visual Basic环境
D:编写代码
正确答案:【新建一个工程】

3、单选题：以下可以构成语句的是（）。
A:对象名.事件名
B:对象名.属性
C:对象名.方法名
D:对象名.函数名
正确答案:【对象名.方法名】

4、单选题：（）是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。
A:窗体
B:文件
C:属性
D:方法
正确答案:【方法】

5、单选题：下列不是Visual Basic 文件的是（）。
A:*.bas
B:*.frm文件
C:*.cls文件
D:*.txt
正确答案:【*.txt】

6、单选题：下列不能打开工具箱窗口的操作是()。
A:执行“视图”菜单中的“工具箱”命令
B:按Alt+F8键
C:按Alt+V，然后按Alt+X键
D:单击工具栏上的“工具箱”按钮
正确答案:【按Alt+F8键】

7、单选题：下列可以打开立即窗口的操作是()。

A:Ctrl+E
B:Ctrl+F
C:Ctrl+D
D:Ctrl+G
正确答案:【Ctrl+G】

8、单选题：Visual Basic6.0集成环境的主窗口中不包括()。
A:菜单栏
B:标题栏
C:状态栏
D:工具栏
正确答案:【状态栏】

9、单选题：在Visual Basic中，不能关闭的窗口是()。
A:工程窗口
B:窗体设计器窗口
C:属性窗口
D:立即窗口
正确答案:【工程窗口】

10、单选题：Visual Basic是一种面向对象的可视化程序设计语言，采取了()的编程机制。
A:事件驱动
B:按书写顺序执行
C:从窗体开始执行
D:从主程序开始执行
正确答案:【事件驱动】

第二章单元测试

1、单选题：下列符号常量的声明中，（）是不合法的。

A:Const a As Double=Sin（1）
B:Const a =“OK”
C:Const a As Single=1.1
D:Const a As Integer=“12”

正确答案:【Const a As Integer=“12”

】

2、单选题：表达式“Turbo”+“c”>“Ture”+“Basic”的值是（）。
A:出错信息
B:True
C:Null
D:False
正确答案:【False】

3、单选题：执行下列语句后，V的值是（）。

A=“56789” V=Val（Mid（A，3，2））
A:89
B:67
C:0
D:78
正确答案:【78】

4、单选题：表达式4+56*7/8 Mod 4的值是（）。
A:7
B:5
C:4
D:6
正确答案:【5】

5、单选题：下列符号（）是Visual Basic中合法的变量名。

A:END
B:x23
C:X8[B]
D:8xy
正确答案:【x23】

6、单选题：在一行内写多条语句时，每个语句之间用（）来分隔。
A:：B:；
C:、
D:，
正确答案:【：】

7、单选题：在VB中，用Single来表示的数据类型是（）。

A:单精度型
B:逻辑型
C:字符型
D:长整型
正确答案:【单精度型】

8、单选题：下列程序段的运行结果是（）。
Dim A As Integer , B As Integer
A = 15
B = 4
Print 4 + A B

A:7.75
B:-7
C:7
D:8
正确答案:【7】

9、单选题：三种逻辑运算符号优先次序为（）。

A:NOT、AND、OR
B:NOT、OR、AND

C:OR、NOT、AND
D:AND、NOT、OR
正确答案:【NOT、AND、OR 】

10、单选题：数学式3abc(d+e)改写为VB表达式为（）。

A:3abcd +3abce
B:3abc(d+e)

C:3*a*b*c*(d+e)
D:3a*b*c(d+e)
正确答案:【3*a*b*c*(d+e)】

第三章单元测试

1、单选题：结构化程序设计的三种基本结构不包括（）。

A:倒序结构
B:选择结构
C:循环结构
D:顺序结构
正确答案:【倒序结构】

2、单选题：下面四个语句中，能打印显示20*30字样的是（）。

A:Print“20*30”
B:Print val(“20”)*val(“30”)
C:Print 20*30
D:Print Chr(20)+“*”+Chr(30)
正确答案:【Print“20*30”】

3、单选题：关于MsgBox函数，以下说法不正确的是（）。

A:“标题”参数可选，显示在对话框标题栏中的字符串表达式
B:“按钮”参数是数值表达式，是表示指定显示按钮的数目和类型、使用的图标样式，默认按钮的标识以及消息框样式的数值的总和
C:“提示”参数用于在MsgBox函数产生的对话框内显示提示信息
D:MsgBox函数的返回值是一个字符串，这个字符串与所选择的命令按钮有关
正确答案:【MsgBox函数的返回值是一个字符串，这个字符串与所选择的命令按钮有关】

4、单选题：语句If x=1 Then y=1,下列说法正确的是( )。

A:x=1和y=1均为关系表达式
B:x=1和y=1均为赋值语句
C:x=1为关系表达式,y=1为赋值语句

D:x=1为赋值语句, y=1为关系表达式

正确答案:【x=1为关系表达式,y=1为赋值语句
】

5、单选题：下面程序段执行结果为( )。 x = 5 : y = -6If not x > 0 Then x = y – 3 Else y = x + 3End IfPrint x – y; y – x

A:3 -3
B:-3 3
C:-6 5
D:5 -9
正确答案:【-3 3】

6、单选题：编写如下事件过程: Private Sub Form_Click() score=Int(Rnd*10)+80 Select Case score Case Is< 60 a$=”F” Case 60 To 69 a$=”D” Case 70 To 79 a$=”C” Case 80 To 89 a$=”B” Case Else a$=”A” End Select Print a$ End Sub 程序运行后,单击窗体,则窗体上显示的内容是( )。

A: B
B: D
C: A
D: C
正确答案:【 B】

7、单选题：循环结构For I%= -1 to –17 Step –2 共执行( )次。

A: 8
B: 9
C: 5
D: 6
正确答案:【 9】

8、单选题：下列程序段的执行结果为( )。 a=0:b=1 Do a=a+b b=b+1 Loop While a<10 Print a;b
A: 0 1
B: 10 5
C: a b
D: 10 30
正确答案:【 10 5】

9、单选题：有如下程序,运行后输出的结果是( )。j=0:n=0 Do While n<3 j=(j+1)*(j+2) n=n+1 Loop Print j;n
A: 3 3
B: 0 1
C: 182 3
D: 30 4
正确答案:【 182 3】

10、单选题：下列的程序段执行后,x的值为( )。x=0 For i=1 To 10 For j=i To 10 x=x+1 Next j Next i

A: 5
B: 50
C: 55
D: 105
正确答案:【 55】

第四章单元测试

1、单选题：以下关于静态数组的描述正确的是（）。
A:

静态数组的大小是可变的，但所有数组元素的类型必须相同

静态数组的大小是固定的，可以有不同类型的数组元素

静态数组的大小是可变的，可以有不同类型的数组元素

静态数组的大小是固定的，所有数组元素的类型必须相同

正确答案:【

静态数组的大小是固定的，可以有不同类型的数组元素

】

2、单选题：执行下面程序段后，输出的结果为（）。 Dim m(5) As Integer s = 0 For i = 0 To 5 m(i) = 5 Next i For j = 0 To 5 s = s + m(j) Next j

Print s
A:

正确答案:【

】

3、单选题：下面程序：Private Sub Form_Click() Dim a(100) As Integer For i = 1 To 10 j = i * i a(j) = j Next i Print a(25)End Sub运行后，单击窗体，则输出的结果是（）。
A:

正确答案:【

】

4、单选题：

有如下语句：

Option Base 1

Private Sub Command1_Click()

Dim A(2, -1 To 1) As Integer

……

End Sub 以上语句所定义的数组A为（）维数组，共有（）个元素，第一维下标从（）到（），第二维下标从（）到（）。
A:

2,1,6,-1,1,2

6,2,1,2,-1,1

1,2,6,2,-1,1

2,6,1,2,-1,1

正确答案:【

2,6,1,2,-1,1

】

5、单选题：有如下程序： Const n = -5 Const m = 6 Dim a(n To m) As Integer For i = LBound(a, 1) To UBound(a, 1) a(i) = i Next i Print a(LBound(a, 1)); a(UBound(a, 1))运行后输出的结果为（）。
A:

-5 6

0 0

0 6

-5 0

正确答案:【

-5 6

】

6、单选题：下面关于控件数组与一般控件的叙述中正确的是（）。
A:

控件数组的建立通过Dim语句声明，而一般控件不需要声明

控件数组一定有1个以上同类型的控件组成，而一般控件只有一个控件

控件数组的Index值为1，而一般控件的Index值为0

控件数组的索引属性值Index值为0，而一般控件的Index值为空

正确答案:【

控件数组一定有1个以上同类型的控件组成，而一般控件只有一个控件

】

7、单选题：如果要对已经声明的数组重新定义大小，并保留原有数据，可以使用语句（）。
A:

Dim

ReDim

ReDim Preserve

Dim Preserve

正确答案:【

ReDim Preserve

】

8、单选题：下列程序的输出结果为（）。

Private Sub Command1_Click()

Dim a

ReDim a(6)

For j=1 To 5

a(j)=j*j

Next j

Print a(a(2)*a(3)-a(4)*2)+a(5)

End Sub
A:

正确答案:【

】

9、单选题：执行下面程序段后，输出的结果为（）。 Dim a(10, 10) As Integer For i = 2 To 4 For j = 4 To 5 a(i, j) = i * j Next j Next i Print a(2, 5) + a(3, 4) + a(4, 5)
A:

正确答案:【

】

10、单选题：要分配存放如下方阵的数据，正确的且最节约存储空间的数组声明语句是（）。

1.1 2.2 3.3

4.4 5.5 6.6

7.7 8.8 9.9
A:

Dim a(-1 To 1, -5 To -3) As Single

Dim a(9) As Single

Dim a(-3 to 1, -5 to 7) As Integer

Dim a(3, 3) As Single

正确答案:【

Dim a(-1 To 1, -5 To -3) As Single

】

第五章单元测试

1、单选题：假定有如下的Sub过程：Sub fun(x As Single, y As Single) t = x x = t / y y = t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim a As Single Dim b As Single a = 6 b = 4 fun a, b Print a, bEnd Sub程序运行后，单击命令按钮，输出结果为（）。
A:

5 4

1.5 2

1.25 4

1 1

正确答案:【

1.5 2

】

2、单选题：假定有以下函数过程：Function Fun(s As String) As String Dim s1 As String For i = 1 To Len(s) s1 = UCase(Mid(s, i, 1)) + s1 Next i Fun = s1End Function在窗体上添加一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim Str1 As String Dim Str2 As String Str1 = InputBox(“请输入一个字符串”) Str2 = Fun(Str1) Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后再窗体上输出的结果为（）。
A:

Abcdefg

gfedcba

ABCDEFG

GFEDCBA

正确答案:【

GFEDCBA

】

3、单选题：有如下函数过程：Function secproc(x As Integer, y As Integer, z As Integer) secproc = 3 * y + z + 2 * xEnd 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该程序的运行结果是（）。
A:

正确答案:【

】

4、单选题：有如下函数过程：Function Cys(ByVal x As Integer, ByVal y As Integer) As Integer Dim quotients Do While y <> 0 quotients = x / y x = y y = quotients Loop Cys = xEnd Function以下是调用该函数的事件过程，该程序的运行结果是（）。Private Sub Command1_Click() Dim a As Integer Dim b As Integer a = 10 b = 2 x = Cys(a, b) Print xEnd Sub
A:

100

正确答案:【

】

5、单选题：以下是一个能返回数组a中最大数的函数过程代码：

Function maxval(a() As Integer) As Integer

Dim max%

max = 1

For i = 2 To 10

If a(i) > a(max) Then max = i

Next i

maxval = max

End Function

Private Sub Command1_Click()

Dim x(1 To 10) As Integer

For i = 1 To 10

x(i) = Int(Rnd() * 100)

Print x(i);

Next i

Print maxval(x())

End Sub程序运行时，发现函数过程的返回值是错的需要修改，下面的修改方案中正确的是（）。
A:

语句“max = 1”应改为“max = a(1)”

语句“For i = 2 To 10”应改为“For i = 1 To 10”

If语句“max = i”应改为“max = a(i)”

语句“maxval = max ”应改为“maxval = a(max)”

正确答案:【

语句“maxval = max ”应改为“maxval = a(max)”

】

6、单选题：在窗体上画一个命令按钮(名称为Command1)，并编写如下代码：Function Fun1(ByVal a As Integer, b As Integer) As Integer Dim t As Integer t = a – b b = t + a Fun1 = t + bEnd Function Private Sub Command1_Click() Dim x As Integer x = 10 Print Fun1(Fun1(x, (Fun1(x, x – 1))), x – 1)End Sub程序运行后，单击命令按钮，输出结果是()。
A:

正确答案:【

】

7、单选题：下面程序的运行结果为（）。Dim a%, b%, c%Sub p1(x%, y%) Dim c As Integer x = 2 * x: y = y + 2: c = x + yEnd SubSub p2(x%, ByVal y%) Dim c As Integer x = 2 * x: y = y + 2: c = x + yEnd SubPrivate Sub Command1_Click() a = 2: b = 4: c = 6 Call p1(a, b) Call p2(a, b) Print a; b; cEnd Sub
A:

8 8 6

8 6 6

4 6 6

4 6 10

正确答案:【

8 6 6

】

8、单选题：下面程序：Function a(x) Static b As Integer b = b + x ^ 2 Print bEnd Function Private Sub Command1_Click() Dim c% c = a(2)End Sub单击两次命令按钮，第二次显示的结果是（）。
A:

正确答案:【

】

9、单选题：下列叙述中正确的是（）。
A:

在调用过程时，所有局部变量被系统初始化为0或空字符串

局部变量的作用域可以超出所定义的过程

在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程

在窗体的Form_Load事件中定义的变量是全局变量

正确答案:【

在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程

】

10、单选题：若已编写了一个Sort子过程，在该工程中有多个窗体，为了方便地调用Sort子过程，应将该过程放在（）中。
A:

类模块

窗体模块

工程

标准模块

正确答案:【

标准模块

】

第六章单元测试

1、单选题：若要求显示一个指定窗体,所用的方法是( )。

Load

Show

Open

Hide

正确答案:【

Show

】

2、单选题：确定一个窗体或控件大小的属性是( )。

Width和Height

Top和Left

Top和Right

Width和Top

正确答案:【

Width和Height

】

3、单选题：当一个工程含有多个窗体时,其中的启动窗体是( )。

在“工程属性”对话框中指定的窗体

第一个添加的窗体

最后一个添加的窗体

启动 Visual Basic时建立的窗体

正确答案:【

在“工程属性”对话框中指定的窗体

】

4、单选题：每建立一个窗体,工程管理器窗口中就会增加一个( )。

程序模块文件

窗体文件

工程文件

类模块文件

正确答案:【

窗体文件

】

5、单选题：当运行程序时,系统自动执行启动窗体的( )事件过程。

GotFocus

UnLoad

Load

Click

正确答案:【

Load

】

6、单选题：若要改变窗体中显示文本的颜色,应该使用的属性是( )。

剩余章节答案支付后查看
如有疑问请及时联系QQ 50895809反馈
如遇卡顿看不了剩余内容请换个浏览器即可打开

没找到的科目也可以提醒我们更新

点我支付 ¥3

已支付？输入手机号或商家订单号阅读

声明：本站点所有资源均来源于网络，如有发现侵权请联系我们，我们将及时断开侵权资源的链接。
如有任何疑问请及时联系QQ 50895809反馈

智慧树章节测试答案知到网课答案

第一章 单元测试

第二章 单元测试

第三章 单元测试

第四章 单元测试

第五章 单元测试

第六章 单元测试

相关文章

发表回复

商家订单号查看步骤

第一章单元测试

第二章单元测试

第三章单元测试

第四章单元测试

第五章单元测试

第六章单元测试