首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序: Private Sub Command1_Click() Dim x As String, s As String, temp As String
窗体上有1个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序: Private Sub Command1_Click() Dim x As String, s As String, temp As String
admin
2020-02-27
64
问题
窗体上有1个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序:
Private Sub Command1_Click()
Dim x As String, s As String, temp As String
Dim i As Integer
x = InputBox("输入字符串", "输入")
If x <> "" Then
For i = Len(x) To 1 Step -1
s = Mid(x, i, 1)
If s <> " " Then
temp = s + temp
Else
List1.AddItem temp
s = ""
temp = ""
End If
Next
List1.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
解析
List1.AddItem可以为列表框添加列表项。For循环中通过Mid函数从字串中倒序取出字符,碰到空格时添加新列表项。选A)。
转载请注明原文地址:https://kaotiyun.com/show/1UTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于命令按钮的叙述中正确的是()。
窗体上有一个名称为Commandl的命令按钮,—个名称为Textl的文本框,其Text属性值为“VBProgramming”。运行程序后,选中其中的“VB”,并执行如下事件过程:PrivateSubCommandl—Click()Text1.S
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则将考生文件夹下in3.dat文件中的100个正整数读入数组a中。②单击“计算”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另一个整数的
(1)在名称为Form1的窗体上添加一个名称为L1,标题为“业余爱好”的标签,再添加一个名称为Ch1的复选框数组,含3个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”、“音乐”、“美术”,请设置复选框的属性,使其初始状态如下表所示。
把一个名称为mnuOpen的菜单项设置为不可用(呈灰色显示)的语句是()。
下列表达式的值为2123的是()。
一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈,然后再依次出栈,则元素出栈的顺序是
在窗体上画2个文本框(名称分别为Text1和Text2),一个命令按钮(名称为Command1)。并定义以下记录类型和变量:PrivateTypeTeacherIDAsIntegerNameAsString*10En
在关系中凡能惟一标识元组的最小属性集称为该表的键或码。二维表中可能有若干个键,它们称为该表的()。
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是( )。
随机试题
严重的血管内溶血会出现
关于背拉力测定的描述不正确的是
阳明腑实证,燥而不痞者。当用
历代本草著作中记载藏药最多的是()。
存单关系效力认定的要件有()。
下列指标中,属于反映企业经营增长状况的指标是()。
发展
人民警察的工作纪律包括()。
2012年6月24日“神舟九号”航天员成功驾驶飞船与()目标飞行器完成手控对接,标志着我国成为世界上第三个完整掌握空间交会对接技术的国家。
Themainfeatureof(72)isthattheyfollowafirst-come/first-servedrule.Forinstance,thelineof(73)waitingtoberunonac
最新回复
(
0
)