itgle.com
在窗体上有一个命令按钮,然后编写如下事件过程。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 String ”相关问题
-
第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函数输出。
程序运行后，单击命令按钮，则在标签框上显示的内容是（）