窗体上有1个名称为Commandl的命令按钮;1个名称为Listl、没有列表项的列表框。编写如下程序: Private Sub Command1 Click() Dim X As String,s As String,temp As String Dim

admin2020-01-02  30

问题 窗体上有1个名称为Commandl的命令按钮;1个名称为Listl、没有列表项的列表框。编写如下程序:
Private Sub Command1 Click()
Dim X As String,s As String,temp As String
Dim iAs Integer
x=InputBox(“输入字符串”,“输入”)
Ifx<>“”Then
For i=Len(x}To 1 Step一1
S=Mid(x,i,1)
If S<>“”Then
temp=s+temp
Else
List 1-AddI

选项 A、year new Happy
B、Happy new year
C、raey wen yppaaH
D、yppaH wen raey

答案A

解析 本题的循环中倒序从字符串s中依次取出每一个字符,只要该字符不是空格就将其连接到temp的前面,见到空格就把连接好的temp加入到列表框中,即先加入year,然后是new,最后是Happy。
转载请注明原文地址:https://kaotiyun.com/show/UbTp777K
0

最新回复(0)