首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Commandl的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序: Private Sub Commandl Click()_ Dim x As String,s As String,temp As String Dim
窗体上有1个名称为Commandl的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序: Private Sub Commandl Click()_ Dim x As String,s As String,temp As String Dim
admin
2018-10-18
50
问题
窗体上有1个名称为Commandl的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序:
Private Sub Commandl 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.Add
选项
A、year new Happy
B、Happy new year
C、raey wen yppaH
D、yppaH wen raey
答案
A
解析
本题的循环中倒序从字符串s中依次取出每一个字符,只要该字符不是空格就将其连接到temp的前面,见到空格就把连接好的temp加入到列表框中,即先加入year,然后是new,最后是Happy。
转载请注明原文地址:https://www.kaotiyun.com/show/7HFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1个命令按钮,并编写如下事件过程:PrivateSubCommand1_Click() Dima(3,3) Form=1To3 Forn=1To3 Ifn=mOrn=4-mThen
当文本框中的内容发生改变时所触发的事件是( )。
在名称为Form1,标题为“图片练习”的窗体上添加1个名称为Image1、宽和高分别为1800和1200的图像框,设置属性使图形能自动放大或缩小以与图像框的大小相适应。最后将考生文件夹下的图片文件“pic1.jpg”在图像框中显示。程序运行后的窗体如图所示
下列不包含滚动条的控件是()。
在数据库设计中,将E-R图转换成关系数据模型的过程属于()。
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommand1_Click()循环1Fori=1
某二叉树共有7个节点,其中叶子节点有1个,则该二叉树的深度为(假设根节点在第1层)()。
在标准模块中用Public关键字定义的变量,其作用域为()。
设有如下通用过程:PublicFunctionf(xAsInteger)DimYAsIntegerx=20y=2f=x*yEndFunction在窗体上画一个命令按钮
设栈的顺序存储空间为S(1:m),初始状态为top=m+1。现经过一系列入栈与退栈运算后,top=20,则当前栈中的元素个数为
随机试题
A.131I.6-iCB.131I-MIBGC.131I-NaID.131I-OIHE.131I-Lipiodol哪种显像剂可进行肾上腺皮质显像
A.不发生转移B.直接蔓延C.种植转移D.淋巴道转移E.血道转移视网膜母细胞瘤转移至骨
一男性中学生,17岁,因畏寒,发热咳嗽,右胸闷痛3天,咳铁锈色痰半来诊,经X线胸透、化验证实为,左胸上叶大叶性肺炎而入院。住院后4小时排尿后大汗,面色苍白,恶心,呕吐。体检:T38.9℃,BP16/10kPa(120/75mmHg),P64次/分,R
患者,女性,16岁,因上呼吸道感染,痰液黏稠,医嘱给予超声雾化吸入。超声雾化吸入时使用下列哪种药物可以稀释痰液
输卵管妊娠胚胎死亡的可靠依据是
A.瑞格列奈B.格列本脲C.罗格列酮D.二甲双胍E.阿卡波糖属于非噻唑烷二酮类胰岛素增敏剂的药物是
石料的单轴压缩变形试验加载速率为()。
按照资金使用用途划分,商业银行贷款在银行内部管理中分为()。
在IS-LM模型中,政府购买C的变动将会导致GDP更大的变动的情形是()
ThefirstimmigrantsinAmericanhistorycamefrom______,somerunningawayfromreligiousandpoliticalpersecutionandsomec
最新回复
(
0
)