VB程序设计作业 三 答案

发布 2022-07-04 11:26:28 阅读 1688

客观题部分:

选择题(每题1分,共15题)

1. 把字符串“123”转换为数值 123 时应该使用的函数是( b )。

a)str b)val c)len d)log

2. 在sub过程被定义时,使用private类型符进行修饰表示( d )。

a)此过程可以被任何其它过程调用。

b)此过程不可以被任何其它过程调用。

c)此过程只可以被本工程中的其它过程调用。

d)此过程只可以被本模块中的其它过程调用。

3. 以下叙述不正确的是( d )。

a) 在sub过程中可以调用function过程。

b) 在用call调用sub过程时必须把参数放在括号里。

c) 在sub过程中可以嵌套定义function

d) 用static声明的过程中的局部变量都是static类型。

4. 在窗体上绘制一个命令按钮command1,然后编写如下程序:

function func(byval x as integer, y as integer)

y = x * y if y > 0 then func = x else func = y end if

end function

private sub command1_click()

dim a as integer, b as integer

a = 3 b = 4 c = func(a, b) print "a=";a print "b=";b print "c=";c end sub

程序运行后,单击命令按钮,输出结果为( b )。

a)a=3 b=12 c=3 b)a=3 b=4 c=3

c)a=3 b=4 c=12 d)a=3 b=12 c=12

5. 在窗体上绘制一个文本框text1,然后编写事件过程:

privatesubtext1_keypress(keyasciiasinteger)endsub

若焦点位于文本框中,则能够触发keypress事件的操作是( d )。

a)单击鼠标b)双击文本框c)鼠标滑过文本框d)按下键盘上的某个键。

6. 在窗体上绘制一个命令按钮command1,两个标签label1和label2,然后编写如下程序**:

private x as integer

private sub command1_click()

x = 5: y = 3 call proc(x, y) =x = y end sub

private sub proc(byval a as integer, byval b as integer)

x = a * a y = b + b end sub

程序运行后,单击命令按钮,两个标签中显示的内容是( c )。

a)5和3 b)25和3 c)25和6 d)5和6

7. 在窗体上画一个命令按钮command1,然后编写事件过程:

private sub command1_click()

a = inputbox("enter the first integer") b = inputbox("enter the second integer") print a + b end sub

程序运行后,单击命令按钮,先后在两个输入对话框中分别输入123和456,则输出结果是( b )。

a)456 b)579 c)456123d)123456

8. 如果要改变窗体的标题,需要设置窗体对象的( b )属性。

a)caption b)name c)borderstyle d)backcolor

9. 为了取消窗体的最大化功能,需要把它的( d )属性设置为false。

a)controlbox b)minbutton c)enabled d)maxbutton

10. 为了使窗体在需要时被加载到内存中并同时显示在屏幕上,应该使用( a )方法。

a)show b)hidec)loadd)unload

可以用一下几种方法:1:showwindow(hwnd,sw_hide ),hwnd 为窗口的句柄。

2:加载到可视区域以外。3:vb: 把窗体的visible 设为 false 加载用 load form

11. 为了使文本框同时具有水平和垂直滚动条,应先将multiline属性设置为true,然后再把scrollbars 属性设置为( c )。a)0 b)1 c)2 d)3

12. 使文本框获得焦点的方法是( c )。

a)change b)gotfocus c)setfocus d)lostfocus

获取焦点动作 获取焦点时事件

失去焦点事件 文本框发生变化事件。

13. 表示滚动条控件取值范围最大值的属性是( a )。

a)max b)largechange c)value d)max—min

14. 对以下控件叙述正确的是( a )。

a)组合框包含了列表框的功能。

b)列表框包含了组合框的功能。

c)组合框和列表框的功能完全不同。

d)组合框和列表框的功能完全相同。

15. 制作菜单的分隔栏时,标题名称只能是( a )。

abcd) ∽

主观题部分:

编程题(每题15分,共1题)

编程实现一个命令按钮command1的单击事件,单击该按钮后生成10个100到200之间的随机整数,输出其中能被5整除的数并求出它们的和。

private sub command1_click()

dim a%(1 to 10), i%, s%, n%

print "产生的10个随机数为:"

for i = 1 to 10

a(i) =int(rnd * 1 + 100)

print a(i);

if i mod 5 = 0 then print

next i

print "其中能被5整除的数有:"

for i = 1 to 10

if a(i) mod 5 = 0 then

print a(i);

s = s + a(i)

end if

next i

printprint "它们的和为:" s

end sub

VB程序设计作业 二 答案

精品文档。客观题部分 选择题 每题1分,共15题 1.当vb执行下面语句后,a的值为 a a 1 if a 0 then a a 1 if a 1 then a 0a 0 b 1c 2 d 32.当vb执行下面语句后,输出的结果是 b private sub form click score int...

VB程序设计作业 二 答案

客观题部分 选择题 每题1分,共15题 1.当vb执行下面语句后,a的值为 a a 1 if a 0 then a a 1 if a 1 then a 0 a 0 b 1 c 2 d 3 2.当vb执行下面语句后,输出的结果是 b private sub form click score int r...

VB程序设计作业二答案

客观题部分 选择题 每题1分,共15题 1.当vb执行下面语句后,a的值为 a a 1 if a 0 then a a 1 if a 1 then a 0 a 0 b 1 c 2 d 3 2.当vb执行下面语句后,输出的结果是 b private sub form click score int r...