窗体上有1个名称为Commandl的命令按钮；1个名称为List1、没有列表项的列表框。编写如下程序： Private Sub Commandl_Click() Dim x As String，s As String，temp As Str

admin2020-01-02 56

问题窗体上有1个名称为Commandl的命令按钮；1个名称为List1、没有列表项的列表框。编写如下程序：
Private Sub Commandl_Click()
Dim x As String，s As String，temp As String
Dim i As 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．AddItem temp
   s=""：temp=""
End If
Next
List 1．AddItem temp
  Else
      MsgBox”输入内容为空!”
End If
End Sub
程序运行后，单击命令按钮Command1，并输入“Happy new year”，则在List1中显示的内容为

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

答案A

解析本题的循环中倒序从字符串s中依次取出每一个字符，只要该字符不是空格就将其连接到temp的前面，见到空格就把连接好的temp加入到列表框中，即先加入year，然后是new，最后是Happy。

转载请注明原文地址:https://kaotiyun.com/show/9LTp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

窗体上有1个名称为Commandl的命令按钮；1个名称为List1、没有列表项的列表框。编写如下程序： Private Sub Commandl_Click() Dim x As String，s As String，temp As Str

二级VB

NCRE全国计算机二级

有三个关系R、S和T如下，则关系T由关系R和S通过()得到。

下列说法中错误的是()。

设有如下事件过程：PrivateSubForm—Click()x=0Whilex10x=x+1x=x*xWendPrintxEndSub运行程序，单击窗体

阅读程序：OptionBase1PrivateSubForm—Click()DimArr(3，3)AsIntegerFori=1To3Forj=1To3Ⅱj=iOrj=3一i+1ThenArr(i，j)=1El

下面对软件特点描述正确的是()。

若要清除列表框控件中的所有列表项，应该使用的方法是()。

如果在列表框List1中没有选中项目，则List1．ListIndex的值为()。

数据流图中带有箭头的线段表示的是()。

软件设计中模块划分应遵循的准则是()。

下列表达式的值为2123的是()。

函数在区间[0，1]上的平均值为________．

下列哪种激素的受体属于酪氨酸蛋白激酶受体

关于妄想，下列说法正确的是

单排脚手架不适用于下列情况（）。

提款条件不包括()。

2013年12月1日，张某突发疾病去世，留下房屋一处，由其儿子小张继承。2014年2月1日，小张将房屋过户到自己名下。2014年3月1日，小张将房屋出租给李某，双方口头约定租期1年，月租金2000元，并未签订书面合同。2014年7月，小

下列关于心理辅导的说法中，不正确的是()。