vb模拟测试卷

发布 2023-12-28 02:45:11 阅读 8779

vb模拟测试卷2满分:80分。

姓名:__1、单项选择题(本题共计40分)

1、执行以下程序,在窗体上显示的第一行内容是___第二行内容是private sub command1_click()dim x%, y%x = 10y = 15call value(x, y)print "x=";x, "y=";yend sub

private sub value(byval m%, n%)m = m * 2n = n - 5

print "m=";m, "n=";nend sub()

a、m=20 n=10b、x=10 y=15c、x=20 y=10

2、若整型实参x、y的值分别为,则引用以下function过程的返回值是___private function f(byval m%, byval n%) as integerdo

r = m mod nm = nn = r

loop while r <>0f = m

end function()

a、1b、2c、4d、都不是。

3、关于语句if x=1 then y=1,下列说法正确的是。

a、x=1和y=1均为赋值语句b、x=1和y=l均为关系表达式c、x=1为关系表达式,y=1为赋值语句d、x=1为赋值语句,y=l为关系表达式。

4、vb也提供了结构化程序设计的三种基本结构,这三种基本结构是。

a、递归结构、选择结构、循环结构b、选择结构、过程结构、顺序结构c、过程结构、输入\输出结构、转向结构。

d、选择结构、循环结构、顺序结构。

5、假设boolvar是一个逻辑型变量,则下面的赋值语句正确的是。

a、boolvar='true'b、boolvar=.<4

6、在cmdl_c1ick事件中有效的地址传递的调用语句是public sub fl(n%)

…n =3*n+4……end sub

private sub cmdl_click()dim n%, m%n=3 :m =4'调用f1语句end sub

a、.f1 n+m .b、f1 mc、f1 5d、f1 m+5

7、程序中用“private function fun(x as integer,y as single)”定义了函数fun。调用函数fun的过程中的变量i、j均定义为integer型,能正确引用函数fun的是。

fun(i,j)②call fun(i,3.65)③fun(3.14,234)④fun("245","231.5")

a、①③b、②③c、①②d、①②

8、假定已定义了一个过程sub add(a as single, b as single),则正确的调用语句是___

a、add (12 , 12)

b、call add( 2 * x , sin(1.57) )c、call add x , yd、call add(12 ,12, x)

9、若需要在同一窗口内安排两组相互独立的单选按钮(optionbutton),可使用控件将它们分隔开。①texbox②picture③image④frame

a、①②b、②③c、②④

d、③④10、执行vb工程时第一次出现的窗体称启动窗体,关于该窗体的叙述不正确的是。

a、若不对启动窗体进行设置,工程中的第一个窗体默认为启动窗体b、启动窗体可进行设置,设置方法是执行“工程”菜单中的“属性”c、启动窗体和其他窗体一样可以隐藏和关闭d、启动窗体一般作为用户工作的界面,不可更改。

11、以下有关由多个窗体和标准模块组成的应用程序设计方法的叙述中,错误的是。

a、在缺少情况下,设计时的一个窗体被指定为启动窗体b、通过人为设置,可指定任一窗体为启动窗体。

c、通过人为设置,可指定标准模块中的main()过程为启动过程d、通过人为设置,可指定窗体模块中的main()过程为启动过程12、在程序中的不同过程之间,不能通过进行数据传递。①全局变量。

窗体或模块级变量③形参与实参结合④静态变量。

a、①②b、①②c、②④d、④

13、sub过程与function过程的本质区别是。

a、sub过程可以使用call语句或直接使用过程名调用,而function过程不可以b、function过程可以有形参,sub过程不能有形参c、两种过程参数传递方式不同。

d、sub过程没有返回值,function过程能返回值。

14、在过程中定义的变量,如果希望在离开该过程后,还能保持过程中局部变量的值,则应该使用___关键字在过程中定义局部变量。()

a、dimb、privatec、publicd、static

15、以下有关变量作用域的说明中,错误的是。

a、只有在标准模块中用public语句说明的变量才是全局变量b、在过程中不能使用public语句说明全局变量c、在标准模块的通用声明处可用语句说明模块级变量d、在窗体的通用声明处可用private语句说明窗体级变量16、下面的过程定义语句中合法的是___

a、sub procl (byval n ()b、sub procl ( n ) as integerc、function procl (procl )d、function procl (byval n )

17、如果在被调用过程中改变了形参值,只影响副本,而不会影响实参的变量本身,这种参数传递方式称为传递。

a、按值b、按地址c、byref

d、按形参<

18、系统默认的参数传递方式是。

a、按值b、按地址c、byvald、按实参。

19、对正实数x的第四位小数四舍五入的vb表达式是。

a、0.001*int(x+0.0005)b、0.

001*(1000*x+0.5)c、0.001*int(1000*x+5)d、0.

001*int(1000*(x+0.0005))

20、设整型变量a、b的当前取值分别为200与20,以下赋值语句中不能正确执行的是___a、text1=a/b*ab、text1=a*a/bc、text1=“200”*a/bd、text1=a & b & a

21、函数cint(–3.5),int(–3.5),fix(–3.5)的值分别是。

a、-3,–4,–3b、-4,–4,–3c、-3,–4,–4d、-4,–3,–3

22、下面___语句,可以将列表框list1中当前选定的列表项的值替换成“abc”。(

a、c、前三项均可。

23、在vb中,下列关于控件的属性或方法中,搭配错误的有___个。①

a、0b、1c、2d、3

24、运行程序产生死循环时,按___键可以终止程序的运行。()

a、ctrl+cb、ctrl +zc、ctrl+breakd、单击停止运行按钮。

25、以下有关对象属性的说法中正确的是。

a、对象所有的属性都罗列在属性窗口列表。

b、不同对象不可能有同名属性c、不同对象的同名属性取值一定相同。

d、对象的某些属性即可在属性窗口设置,也可以通过属性**设置或改变。26、下面的表达试的值为真的是。

a、mid(“visual basic”,1,12)=right(“programing language visual basic”,12)b、“abcrg”>”abcde”c、int(134.69) >cint(134.69)

d、78.9/32.77 < 97.5/43.97 and–45.4 > 4.98

27、若在应用程序中用private sub sub1(xasinteger,yassingle)定义了子程序sub1,调用程序中的变量i、j均为integer型,则正确调用子程序sub1的call语句是___

call sub1(i,j)②call sub1(3.1415,1)③call sub1(3.14,234)

call sub1(“245”,“231.5”)(

a、①③b、③④c、①②d、无。

28、下列语句中的语句可以用来正确地声明一个动态数组。()

a、private a(n) as integerb、dim a() as integerc、dim a(,)as integerd、dim a(1 to n)

29、在visualbasic最基本的对象是___它是应用程序的基石。a、标签b、窗体c、文本框d、命令按钮。

30、visualbasic程序设计时常用的print、cls属于。

a、属性b、打印字库c、方法d、事件31、下列程序:private sub form_click( )for j=1 to 15a=a+j mod 3next jprint aend sub

运行后输出的结果是。

a、1b、15c、90

d、12032、对窗体编写如下**:option base 1

private sub command1_click( )a=array(237,126,87,48,498)m1=a(1)m2=1for i=2 to 5if a(i)>m1 thenm1=a(i)m2=iend ifnext iprint m1;m2end sub

程序运行后,按回车键,输出结果为。

a、484b、237 1c、498 5d、498 4

33、参数传递有值传递和地址传递关键字表示地址传递。()

a、byvalb、byrefc、valued、refrence

34、visualbasic中的工程文件的扩展名是。

a、.regb、.frmc、.basd、.vbp

35、计时器控件每次经历一个固定的时间间隔。

a、修改窗体b、触发事件c、建立窗体d、显示**。

36、如果单击一个当前没有被选中的复选框,其他已被选中的复选框会处于___状态。

a、不选中b、不显示c、禁止d、选中。

37、使用___方法,可取得列表框中的项数。()

a、listcountb、additemc、clear

d、removeitem

38、下列控件中,没有caption属性的是。

a、框架b、列表框c、复选框d、单选按钮。

39、以下程序输出的结果是dim a

a=array(1,2,3,4,5,6,7)for i=lbound(a)to ubound(a)a(i)= a(i)*a(i)next i

print a(i)()

a、49b、0c、不确定d、程序出错。

40、以下程序段可以实施x,y变量值的变换。()

a、y=x:x=yb、z=x:y=z:x=yc、z=x:x=y:y=zd、z=x:w=y:y=z:x=y

2、填空题(本题共计40分)

1、两质数的差为2,称此对质数为质数对,下列程序是找出100以内的质数对,并成对显示结果。其中,函数isp判断参数m是否为质数。public function isp(m) as booleandim i%__1)__for i=2 to int(sqr(m))

if __2)__then isp=falsenext iend function

private sub commandl_click()dim i%pl=isp(3)

for i=5 to 100 step 2p2=isp(i)

if __3)__then print i-2,ip1 __4)__next iend sub

2、用100元买100鸡,条件是公鸡x每只5元,母鸡y每只3元,小鸡z只1元3只。程序中的选项是___private sub command1_click( )for x = 0 to 100for y = 0 to 100

z=100-x-y

if __then print x, y, znext ynext xend sub

3、下列程序的功能是:单击窗体事件后,在窗体上显示1!+2!

+3!+…9!的和。

private sub form_click( )dim s&a, i%s=0for i=1 to 9s=s +①next iprint send sub

private function fact(②)as longdim i%,f&③for i=2 to n

f=f*inext i

end function

4、当sub过程value形参表中存在byval关键字时,执行本程序,单击窗体在窗体上显示的第一行内容是___1)__若将形参表的byval关键字删掉,在执行本程序,单击窗体后在窗体上显示的第一行内容是___2第二行内容是___3)__

private sub value(byval m as integer, byval n as integer)m = m * 2n = n - 5

print "m=";m, "n=";nend sub

private sub form_click()dim x as integer, y as integerx = 10: y = 15call value(x, y)print "x=";x, "y=";yend sub

5、下面的程序用"冒泡"法将数组a中的10个整数按升序排列,请将程序补充完整。option base 1

private sub command1_click( )dim a,i,j,k as integer

a=array(678,45,324,528,439,387,87,875,273,823)for ifor j

if a(i)__a(j) then

a1=a(j):a(j)=a(i):a(i)=a1

end ifnext jnext ifor k=1 to 10print a(k);next kend sub

6、下面程序的功能是统计随机产生的10个三位正整数中偶数与奇数的个数,并求出该10个数的总和。请将程序补充完整。option explicit

private sub form_click()dim x as integer, s1 as integerdim n1 as integer, i as integerrandomizefor i = 1 to 10x= _1)__print x;

if x mod 2 = 0 then

__(2)__else

n2 = n2 + 1end ifs=s+xnext iprint

print"奇数个数:";n1;"偶数个数为:";n2;"和为";send sub

7、运行下面程序,单击窗体后在窗体上显示的第一行结果是___1)__第二行结果是___2)__第三行结果是___3)__private sub form_click()dim i as integer, s as integerfor i = 1 to 10s = s + iif s >10 thenprint ss = 0end ifnext iend sub

参***。mod i=0,p1 and p2,=p2,2.5*x+3*y+z/3=100, n%,f=1,fact=f, n=10,m=20 n=10,x=20 y=10,5.

1 to 9,i+1 to

10,>=

09vb模拟测试卷

满分 70分。姓名 1 单项选择题 本题共计40分 1 visualbasic是用于开发 环境下的应用程序的工具。b a dosb windows c dos和windows d unix 2 对象在响应某个事件时,计算机要执行一段程序,以完成相应的操作,这样的程序片段叫做 过程。b a 方法。b ...

模拟测试卷

镇江市2014年中考模拟训练。思品试题。第 卷 客观题共60分 一 单项选择题 下列各题的四个选项中,只有一项是最符合题意的。请在答题卡。上指定的位置填写你认为正确的选项。本大题共30小题,每小题2分,共60分。1.近年来,我市广泛开展以 不给别人添麻烦 为主题的道德教育实践活动,开展这一活动旨在 ...

模拟测试卷

一 填空题。20分 1 个数的最大因数是24,这个数是 它的所有因数有 这个数的最小倍数是 2 40厘米 h米 15分钟 h小时。3 小丽家住在,她从开始上楼梯 每层的楼梯数相同 当她上到3 楼时,还剩下总楼梯数的 壬没有上。4 如果8 6 1,那么。和6的最大公因数是 最小公倍数是 口 6均为非0...