在窗体上有一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a(5) As StringFOR i=1 To 5a(i) =Chr(Asc("A") +(i-1))NextFor Each b In aPrint b;NextEnd Sub程序运行后,单击命令按钮,输出结果是A.ABCDEB.1 2 3 4 5C.abcdeD.出错信息

题目

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

Private Sub Command1_Click()

Dim a(5) As String

FOR i=1 To 5

a(i) =Chr(Asc("A") +(i-1))

Next

For Each b In a

Print b;

Next

End Sub

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

A.ABCDE

B.1 2 3 4 5

C.abcde

D.出错信息


相似考题
更多“在窗体上有一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a(5)As StringF ”相关问题
  • 第1题:

    在窗体上有个命令按钮,然后编写如下事件过程

    程序运行后,单击命令按钮,先后在两个输入框中分别输入”1”和”5”,则输出结果为

    A.1

    B.51

    C.6

    D.15


    正确答案:B
    在默认的情况下,InputBox的返回值是一个字符串,而不是变体类型。如果没有事先声明返回值变量的类型,或声明为变体类型,则当把函数的返回值赋给这个变量时,VisualBasic将把它作为字符串来处理。因此当需要用InputBox函数输入数据,并且需要输入的数值参加运算时,必须在进行运算前用Val函数(或其他函数)把它转换为相应类型的数值,否则有可能会得到不正确的结果。如果正确地声明了返回值的变体类型,则可不必进行类型转换;由于本题没有事先声明m、n变量,所以,m、n所获得的为字符“1”和“5”,所以输出n+m时是“51”。

  • 第2题:

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

    Private Sub Command1Click( )

    Dim a(5)As String

    For i=1,To 5

    a(i)=Chr(Asc("A")+(i-1))

    Next i

    For Each b In a

    Print b;

    Next

    End Sub

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

    A.ABCDE

    B.1 2 3 4 5

    C.abcde

    D.出错信息


    正确答案:A
    A。【解析】Asc(字符)将字符转换为其ASCII码值,Chr(数字)将数字转换为ASCII相对应的字符。本程序首先定义一维字符串数组a(5),然后将字符“A”的ASCII码值分别加上0、1、2、3、4,转换为字符串存入a(5)。其值为ABCDE。

  • 第3题:

    窗体上有一个名为Button1的命令按钮和一个标签框,然后编写如下事件过程: 程序运行后,单击命令按钮,则在标签框上显示的内容是()

    A5.8

    B5

    C7

    D无数据


    B

  • 第4题:

    在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim() a=Array(”机床”,”车床”,”钻床”,”轴承”)Printa(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.机床

    B.车床

    C.钻床

    D.轴承


    正确答案:C
    暂无解析,请参考用户分享笔记

  • 第5题:

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

    程序运行后,单击命令按钮,在输入对话框内输入-1,输出结果是 。


    正确答案:
    -1的平方根是一个虚数
    【解析】在Sub过程中,定义了一个Double型变量N,并调用InputBox函数,给N赋值,即将从对话框中输入的-1赋给N;通过运算符”&”,将N与字符串”的平方根”连接起来并赋给Msg;在条件块语句中将N作为参数,调用SR事件过程,将Function过程的返回值作为测试表达式;在SR函数中,调用Sgn函数测试x的值为正数还是负数,如果是正数,那么就执行条件块语句中的SR=Sqr(x),即将X的平方根作为返回值,如果x值为零,Sgn函数返回值为零,那么就将0作为返回值;如果为负数。Sgn函数返回值为-1,SR=-1,即将-1作为返回值;在Sub程序的条件块语句中,根据SR返回值的不同,执行不同操作,当返回值为0,将Msg字符串加”是0”,赋给Ms9,如果是-1,将Msg加”是一个虚数”赋给Msg,当为其他时,即在平方根时,将字符串Msg加”是”,再加上这个数的平方根赋给Msg,并用MsgBox函数输出。