计算机题库VB期末考试试题(A、B卷)

  • 格式:doc
  • 大小:53.50 KB
  • 文档页数:12

下载文档原格式

  / 12
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

VB期末考试试题(A卷)

一、选择题

1.要改变控件的宽度,应修改该控件的( B )属性。

A、TOP

B、width

C、Left

D、Height

2.将命令按钮Command1设置为不可见,应修改该命令按钮的(A)属性。

A、Visible

B、Value

C、Caption

D、Enabled

3.单机滚动条两端的任何一个滚动箭头,将触发该滚动条的( C )事件。

A、Scroll B 、KeyDown C、change D、Dragver

4.( D )对象具有clear方法。

A、图片框

B、窗体

C、复选框

D、列表框

5.中心定义图片框控件的坐标系统,可采用该图片框的( A )

A、scale

B、Scale X

C、scale Y

D、setFocus

6.将通过对话框CommdDialog1的类型设置成另存为对话框,可调用该控件的( B)方法。

A、Showopen

B、Showsave

C、ShowColor

D、ShowFont

7.形状控件所显示的图形不可能是( D )

A、圆

B、椭圆

C、圆角正方形

D、等边三角形

8.由Fro K=10 TO oslept 3:next K循环语句控件的循环次数是(B )

A、12

B、0

C、-11

D、-10

9.下列数据类型中,占用内存最大值是( D )

A、Boolwan

B、Byte

C、Lnteger

D、Single

10.如果在图片框上使用绘图方法绘制一个实心圆,则图片框的(C )属性决定了该图片的颜色。

A、BackColro

B、Forelklor

C、Fillcolor

D、Dlawstyle

一、选择题

1.要在垂直位置上移动控件,应利用控件的(C)属性。

A、Left

B、Width

C、Top

D、Height

2.要在文本框中的文本显示掩码(密码)符,在属性设置时,首先必须设置( D)属性为False。

A、Txet

B、Enabled

C、Visible

D、Multline

3.用键盘的光标键选中某一菜单项,并按回车触发菜单的( C )的

A、KeyPress

B、KeyDown

C、Click

D、Keyllp

4.一下( D )对象不具有Clear方法。

A、列表框

B、组合框

C、剪贴框

D、图片框

5.软件列表中设定“文件列表”显示文件类型应改该控件的( D )属性。

A、Path

B、FileName

C、Name

D、Patterw

6.组合框有三种风格,它们由Style属性所决定,其中为简单组合框时,Style属性值应为(B )

A、0

B、1

C、2

D、3

7.下列可调整图片框的大小以适合图片的属性是( B )

A、Stretch

B、autosize

C、picture

D、oledropmode

8.要想清除文本框中的内容则可利用( A )进行。

A、Caption

B、Text

C、Clear

D、Cls

9.下列表达式中,其值为0的是( C )

A、7/9

B、7mod 15

C、7\9

D、15 mod 9

10.求以10 为底X的常用对数的表达式为( A )

A、LoG(X)/LoG(10)

B、LN(X)

C、LoG(X)/LoG(E)

D、LoG(X)

二、填空题(每空2分,共20分)

1.代数式的Visual Basic 表达式是

sqr((x^3+exp(-6)*log(y))*atn(a*3.14159/180)/(x*x+y*y))

2.设x=2,y=4,a=4,b=6,表达式(a>x Xor b

3.a 和b 中有仅只有一个不为1,相应的Visual Basic逻辑表达式为 a<>1 xor b<>1。

4.把条件为1£ x £ 5 写成VB表达式为: x>=1 and x<=5。

5. 语句Line(1000,1000)-Step(2000,1500),vbRed,BF的含义是:在窗体上绘制以角点为(2000,2000)和(4000,3500)的红色实心的矩形。

6.用随机函数产生10个100~500的整数,其表达可为:for I=1 to 10

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

7.当x=2时,语句if x=2 then Print x=2 的结果值是True。

8. Static Private Sub cmdSum_Click()

Dim Sum as integer

Sum=2*Sum+1

End Sub

问:第三次单击命令按钮cmdSum后,Sum的值为:7。

9.声明单精度常量g(重力加速度)代表9.8可写成:const g=9.8。10.欲使在自己设计VB程序运行过程中,不中止本程序的运行,同时又可调用系统中已有的应用程序c:\windows\notepad.exe,可在程序代码窗口必要的地方添加语句:shell(“c:\windows\notepad.exe”)。

三、编程题

1随机产生n个两位正整数(n由对话框输入,切n>0)。求出其中的偶数之和,并在标签框Labol1上显示。

程序写在命令按钮Command1的click事件中。

Private Sub Command1_Click()

Dim n As Integer

Dim i As Integer, sum As Long

n = Val(InputBox("Please input a integer", "Input N value")) For i = 1 To n

rnddat = (10 + Int(90 * Rnd))

If rnddat Mod 2 = 0 Then

sum = sum + rnddat

End If

Next i

Label1.Caption = sum

End Sub

2由输入对话框中输入100个数值数据,放入数组a,将其中的整数放入数组b,然后运用选择分类将数组b中的数据按从大到小的顺序排列,并以每行5个数据在窗体上输出。

注:程序写在窗体form的click事件上。

Private Sub Form_Click()

Dim a(1 To 100)

相关主题