admin 管理员组

文章数量: 1086019


2024年3月27日发(作者:应用程序中服务器错误怎么办)

VB 课程试卷 (B)卷

第 1 页 共 3页

10. 在窗体上添加一个图片框控件(name属性为P1),要在运行时将位于C:盘根目录下

线

名为图形文件装入图片框,所使用语句为e=loadpicture(“c:”)。

一 二 三 四 五 六 七 八 九 十 总分

11. 在V B中有一种控件组合了文本框和列表框的特性,这种控件是__组合框_。

12. 下面程序运行后输出的结果是__2 7__。

a = 8:s = 1

说明:本课程考试分为上机考试和笔试两部分,满分100分,其中上机占40分,笔试60分,本试卷为

do

笔试试卷,卷面满分60分。

s = s + 1

一.填空题(每空1分,共16分)

a = a –1

1. VB是一种面向_对象_的可视化程序设计语言,采取了_事件驱动_的编程机制。

loop while a <=0

print s;a

2. 把

sinacosba

3

写成VB表达式_ sin(a)*sin(b)+a^3_。

13. 下面程序运行后,单击窗体,输出结果为_5+10=15 (换行) 8+20=28 __。

3. 用四舍五入的方法截掉x小数点后面第3位及以后的数_ int(x*100)/100_。

Private Sub Form_Click()

4. 赋值语句的作用是:首先计算“=”右边表达式的值,然后将该值赋给“=”左边的__变量

Print “5+10=”;

__或对象的属性。

Print 5+10

5. 为了提高程序的可读性,在VB中用__’ ____或___ rem ____来表示一条注释语句。

Print “8+20=” ,

6. 同一控件数组中各个控件的___ index ___属性相当于普通数组中的下标。

Print 8+20

7. 要在ListBox控件中的增加某个项目,需要用__ additem __方法。

End Sub

8. 将焦点移动到某个控件上的方法是__ setfocus __。

14. 下列程序运行的输出结果是____12____。

9. 有如下程序段,运行时,从键盘输入-3,输出的结果是_-5 -2__

for I = 1 to 3

x=-5

for j = 0 to I+1

s=inputbox(“请输入s的值”)

x = x+1

select case s

next I

case is >0

next j

y=x+1

print x

case is=0

二.选择题(每小题1分,共12分)

y=x+2

1. ( B )是由VB预定义的对象能够识别的动作。

case else

(A) 对象

y=x+3

(B) 事件

end select

(C) 过程

print x;y

(D) 事件过程

线

VB 课程试卷 (B)卷

第 2 页 共 3页

2.窗体文件的扩展名为( D )。 12. 在窗体上有一个组合框控件Combo1,其中含有4个项目,则以下能删除最后一项的语

(A) .fix (B) .bas (C) .vbp (D) .frm 句是( D )。

3. 执行语句s = len(mid(“VisualBasic”,1,3))后,s的值是( C )。 (A)Item Text (B)Item 2

(A) Vis (B) 2 (C) 3 (D) 4 (C)Item unt (D)Item 3

4.下列选项中,合法的变量名( B )。 三.编程题(每小题4分,共32分)

(A) v+aaa (B) m_2 (C) End (D) 5_p 1. 用输入框输入x,根据下式计算对应的y,并在窗体上输出y的值。

5. 返回字符串首字符的ASIIC值的函数是( C ) 。

(A) Str() (B) Chr() (C) Asc() (D) Trim()

lnxsinxx0

6. 运行以下程序后, i的值是( D )。

y

0x0

x=0

for i = 1 to 10 step 2

e

x

6x0

x = x + i 解:

next i Dim x!, y!

(A) 23 (B) 25 (C) 9 (D) 11 x = InputBox("x=")

7. 对一个窗体对象,其最先发生的事件是( C ) If x > 0 Then

(A) Click (B) DbClick (C) Load (D) Unload y = Log(x) + Sin(x)

8. 确定一个窗体或控件宽度的属性是( B )。 ElseIf x = 0 Then

(A) Height (B) Width (C) Top (D) Left y = 0

9. 使“山东交通学院”在当前窗体上输出的语句是( A )。 Else

(A) Print “山东交通学院” y = Exp(x) + 6

(B) “山东交通学院” End If

(C) Printer. Print “山东交通学院” Print y

(D) Debug. Print “山东交通学院” 2. 输入年份、月份,输出该月天数。

10. 在Visual Basic中,下列哪种控件可以包含其他控件( A )。 解:

(A)Frame (B)Commandbutton Dim y%,m%,d% case 2

(C)Image (D)Checkbox y=inputbox(“输入年份:”) if y mod 4=0 and y mod 100<>0 or y mod

11. 当一个复选框不被选中时,它的Value属性的值是( A )。 m= inputbox(“输入月份:”) 400=0 then

(A)0 (B)1 select case m d=29 : else : d=28

(C)2 (D)3 case 1,3,5,7,8,10,12 end if

d=31 end select

case 4,6,9,11 print y;”年”;m;”月”;d;”天”

d=30


本文标签: 控件 窗体 输出 对象 语句