窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下:Private Sub Command1 Click( )

题目

窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下:

Private Sub Command1 Click( )

Static x As Variant

n=0

x=Array(1,2,3,4,5,6,7,8,9,10)

While n<=4

x(n)=x(n+5)

Print x(n):

n=n+1

Wend

End Sub

运行程序,单击命令按钮Command1,窗体上显示的是( )。

A.1 2 3 4 5

B.6 7 8 9 10

C.2 3 4 5 6

D.6 2 3 4 5

如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是( )。

A.Private Sub Form1 Click( )

End Sub···

B.Private Sub Form1. Click( )

End Sub···

C.Private Sub Command1 click( )

End Sub···

D.Private Sub Command Click( )

End Sub···


正确答案:B
B。【解析】窗体单击事件为Form—Click事件。

第2题:

窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下: Private Sub Command1 Click( ) Static x As Variant n=0 x=Array(1,2,3,4,5,6,7,8,9,10) While n<=4 x(n)=x(n+5) Print x(n): n=n+1 Wend End Sub 运行程序,单击命令按钮Command1,窗体上显示的是( )。

A.1 2 3 4 5

B.6 7 8 9 10

C.2 3 4 5 6

D.6 2 3 4 5


正确答案:B
B。【解析】X是当作变量来声明,当作数组来使用,n=0,n<=4,因此n是5个值,x(n)=x(n+5),x(n)是每个值加5,因此,是6,7,8,9,10。

第3题:

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。

A.VVV

B.Vis

C.sic

D.11


正确答案:A
解析:函数string(n,字符串)的功能是返回由n个指定“字符串”中第一个字符组成的字符串。本题中的字符串“VisualBasic”的第一个字符为“V”,所以返回3个“V”,即String函数返回的字符为“VVV”。

第4题:

窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是

A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()

End Sub End Sub

C)Private Sub Commandl_Click() D)Private Sub Command_ Click()

End Sub End Sub


正确答案:B

第5题:

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是

A.VVV

B.Vis

C.sic

D.11


正确答案:A
解析:String返回n个字符。如果为字符串,则返回n个字符串的首字符。返回3个"VisualBasic”的首字母“V”。

第6题:

在窗体中有一个名为(Command1的命令按钮,Click事件的代码如下:

单击命令按钮后,标签显示的结果是( )。


正确答案:25
25

第7题:

在窗体上有一个标签Lb1和一个命令按钮Command1,事件代码如下: Option Compare Database Dim a As String * 10 Private Sub Command1_Click( ) a="1234" b=Len(a) Me. Lb1. Caption=b End Sub 打开窗体后单击命令按钮,窗体中显示的内容是( )。

A.4

B.5

C.10

D.40


正确答案:C
解析:首先定义a为字符串类型,长度为10,当单击命令按钮后将a的长度值赋予b,并且将b的值10通过标签显示出来。

第8题:

在窗体上有一个命令按钮Command1,编写事件代码如下:

Private Sub Command1_Click()

Dim a(10),P(3) As Integer

k=5

For i=1 To 10

For i=1 To 3

For i=1 To 3

End Sub

打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。


正确答案:201
201 解析: 本题考查的是VBA编程基础。经过第一个for循环,a(i)中a(1)~a(10)存的分别是1~10的平方。第二个循环后,p(i)中的p(1)存的是a(1)的值,p(2)中存的是a(4)的值,p(3)中存的是a(9)的值,经过最后一个循环之后,k的值应该为201。

第9题:

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:

Private Sub Command1_Click()

a = 12345

Print Format$(a, "000.00")

End Sub

程序运行后,单击命令按钮,窗体上显示的是( )。

A.123.45

B.12345.00

C.12345

D.00123.45


正确答案:B

第10题:

(6)在窗体上有1个名称为Command 1的命令按钮,并有如下事件过程和函数过程:

Private Sub Command 1_Click()

Dim p As Integer

p=m(1)+m(2)+m(3)

Print p

End Sub

Private Function m(n As Integer) As Integer

Static s As Integer

For k=1 To n

s=s+1

Next

m=s

End Function

运行程序,单击命令按钮Command 1的输出结果为【6】。


正确答案:
(6)10