垃圾袋厂家
免费服务热线

Free service

hotline

010-00000000
垃圾袋厂家
热门搜索:
产品介绍
当前位置:首页 > 产品介绍

2002年9月VisualBasic语言场地布景裹包机木工机纺织器材吸塑模Frc

发布时间:2023-12-08 06:19:41 阅读: 来源:垃圾袋厂家
2002年9月VisualBasic语言场地布景裹包机木工机纺织器材吸塑模Frc

2002年9月VisualBasic语言程序设计笔试试卷

一、选择题1~35题每题2分,共70分。

下列各题A)、B)、C)、D)四个选项中,只有一个选择是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。

1.下列不能打开属性窗口的操作是( )。

A)执行“视图”菜单中的“属性窗口”命令

B)按F4键

C)按Ctrl+T

D)单击工具栏上的“属性窗口”按钮。

2.下列可以打开立即窗口的操作是( )。

A)Ctrl+D B)Ctrl+E

C)Ctrl+F D)Ctrl+G

3.InputBox函数返回值的类型为( )。

A)数值 B)字符串

C)变体 D)数值或字符串(视输入的数据而定)

4.可以同时删除字符串前导和尾部空白的函数是( )。

A)Ltrim B)Rtrim

C)Trim D)Mid

5.表达式4+5 \ 6 * 7 / 8 Mod 9 的值是( )。

A)4 B)5

C)6 D)7

6.如果在立即窗口中执行以下操作:

a=8 (是回车键,下同)

b=9

print a b

则输出结果是( )。

A)-1 B)0

C)False D)True

7.以下语句的输出结果是( )。

Print Format $(32抛光加工548.5,“000,000.00”)

A)32548.5 B)32,548.5

C)032,548.50 D)32,548.50

8.执行以下程序段后,变量c$的值为我公司可以定制各种力学检测实验机( )。

a$="Visual Basic Programing"

b$="Quick”

c$=b$ UCase(Mid$(a$,7,6)) Right $ (a$,11)

A)Visual BASIC Programing

B)Quick Basic Programin阀芯g

C)QUICK Basic Programing

D)Quick BASIC Programing

9.为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( )。

A)Value B)De由此fault

C)Cancel D)Enabled

10.为了把焦点移到某个指定的控件,所使用的方法是( )。

A)SetFocus B)Visible

C)Refresh D)GetFocus

11.设a=6,则执行 x=IIf(a 5,-1,0)后,x 的值为( )。

A)5 B)6

C)0 D)-1

12.执行下面的程序段后,x 的值为( )。

x=5

For i=1 To 20 Step 2

x=x+i\5

Next i

A)21 B)22

C)23 D)24

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

并停止油泵电动机Private Sub Command1_Click()

For i=1 To 4

x=4

For j =1 To 3

x=3

For k=1 To 2

x=x+6

Next k

Next j

Next i

Print x

End Sub

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

A)7 B)15

C)157 D)538

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

Private Sub Command1_Click()

x=0

Do Until x=-1

a = InputBox(“请输入A的值”)

a = Val(a)

b = InputBox(“请输入B的值”)

b = Val(b)

x = InputBox(“请输入x的值”)

x = V酒瓶架al(x)

a = a+b+x

Loop

Print a

<鹿泉p>End Sub

程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为( )。

A)2 B)3

C)14 D)15

15.在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程:

Private Sub Command1_Click()

a=xt+xt

Print a

End Sub

Private Sub Form_Load()

xt=""

xt=""

End sub

程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321,然后单击命令按钮,则输出结果为( )。

A)444 B)321123

C)123321 D)132231

16.阅读下面的程序段:

For i=1 To 3

For j=1 To i

For k=j To 3

a=a+1

Next k

Next j

Next i

执行上面的三重循环后,a 的值为( )。

A)3 B)9

C)14 D)21

17.在窗体上画一个文本框(其中Name属性为Text1),然后编写如下事件过程:

Private Sub Form_Load()

xt=""

tFocus

For i=1 To 10

Sum=Sum+i

Next i

xt=Sum

End Sub

上述程序的运行结果是( )。

A)在文本框Text1中输出55

B)在文本框Text1中输出0

C)出错

D)在文本框Text1中输出不定值

18.在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程:

Private Sub Command1_Click()

x=0

Do While x 50

x=(x+2)*(x+3)

n=n+1

Loop

xt=Str(n)

xt=Str(x)

End Sub

程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。

A)1和0 B)2和72

C)3和50 D)4和168

19.


线缆检测试验机
一键测量仪塑料制品测量
试验机
插头线静态拉力试验机