首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有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-06-30
22
问题
窗体上有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/EBHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为()。
在考生目录下有一个工程文件sjt4.vbp。程序的功能是,单击“产生随机数”按钮可以产生10个随机数放到数组中并显示在图片框中,在文本框中输入一个小于10的正整数m,单击“移动数据”按钮,可以把数组中的前m个数据移动到后面去,并显示在图片框中。如图所示。
以下变量名中合法的是( )。
以下表达式与Int(3.5)的值相同的是
工程文件包含Form1、Form2两个窗体。Form1有包含二个菜单命令的菜单;Form2上有一个名称为Command1的命令按钮,如图所示。Form1中菜单项"隐藏Form1"的单击事件过程代码如下:PrivateSubhideF1_Click
PrintAbs(-5^2)+Int(-5^2)的输出结果是
在VisualBasic环境下设计应用程序时,系统能自动检查出的错误是( )。
在数据库中,数据模型包括数据结构、数据操作和
下面不能作为软件设计工具的是()。
随机试题
交易所上市交易的债券一般按照哪一种价格进行估值?()
清胃散的功用是
肾实质表面结核空洞,病灶与肾不连通,药物治疗6个月无效,应行肾结核患者,排泄性尿路造影示左肾不显影,右肾功能正常,应行
成功的房地产销售过程一般分为()三阶段。
按照()的不同,可分出外延型和飞地型两种类型的城市化。
南方某6层砖混结构的住宅楼,基础为钢筋混凝土条形基础,建设单位委托A监理公司监理,经过招标投标,B建筑工程有限公司中标,并成立了项目部组织施工。项目部计划混凝土及砂浆采用现场搅拌。该工程计划于2012年1月8日开工,2013年1月28日工程整体竣工,并交付
施焊单位应有符合焊接工艺要求的()且性能稳定可靠。
全球富国每年补贴农业的拨款是惊人的3000亿美元,这个“天文数字”一度让富国的农民更富,穷国的农民更穷。2004年世界贸易组织“多哈回合”谈判,发达国家承诺把农业补贴削减20%。与此同时,我国对农业发展,不仅给予政策扶持,还加强了对农业的补贴,这说明(
以下是交换机Switch1的部分配置。请解释配置命令。1.配置VLANTrunk端口……Switch1(config)#interfacef0/24(进入端口24配置模式)Switch1(config-if)#swi
A、Aweekago.B、Atninethirtyp.m.C、OnWednesday.D、It’stimetogetonthetrain.B本题询问“到广州的最后一班火车是几点?”Whattime...引导一个询问时间的疑
最新回复
(
0
)