首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程: Private Sub Command1_Click() Dim s As String, ch As String s="" For k=1 To Len(Te
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程: Private Sub Command1_Click() Dim s As String, ch As String s="" For k=1 To Len(Te
admin
2015-08-28
37
问题
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:
Private Sub Command1_Click()
Dim s As String, ch As String
s=""
For k=1 To Len(Text1)
ch=Mid(Text1, k, 1)
s=ch+s
Next k
Text1.Text=s
End Sub
程序执行时,在文本框中输入"Basic",然后单击命令按钮,则Text1中显示的是( )。
选项
A、Basic
B、cisaB
C、BASIC
D、CISAB
答案
B
解析
Len函数返回字符串的长度,Mid函数为字符串中部截取函数格式为:Mid(字符串,起始位置,长度)。程序中,For循环的终值是Text1中输入的字符串的长度,即"Basic"的长度,为5。循环体中Mid函数从第一个字符开始依次取出一个字符,然后与上次取出的字符连接,本次取出的字符在前,上次取出的字符在后。最终变量s中应该是"cisaB"。
转载请注明原文地址:https://kaotiyun.com/show/WbLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下过程:Subff(x,y,z)x=y+zEndSub下列选项中所有参数的虚实结合都是传址方式调用的是()。
下列关于图像框控件和图片框控件的说法错误的是()。
下列程序实现的功能是:当在窗体上单击时,把C盘根目录下的文件a1.txt,复制到D盘,并取名为a2.txt。PrivateSubForm_Click()DimChAsStringOpen"c:\a1.txt
执行下面的程序段后,S的值为【】。s=5Fori=6To9Step0.6s=s+1Nexti
在面向对象程序设计中,从外面看只能看到对象有外部特征,而不知道也无须知道数据的具体结构以及实现操作的算法,这称为对象的______。
在窗体画一个命令按钮,然后编写如下过程,程序运行后,单击命令按钮,在输入对话框中输入234,输出结果为______。FunctionFun(ByValnumAsLong)AsLongDimkAsLongk=1
程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是______。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()aS="VisualBasic"
随机试题
[背景资料]某施工单位承接了一段长30km、地处平原区的二级公路路基路面施工,合同工期2年,该工程设计路面结构和其中K0+000~K3+000段(该段设计填方高度为+0.7m)土壤地质条件如表28320020—2。施工单位将该工程分为
A.恶寒发热B.发热恶风C.骨蒸潮热D.但热不寒E.往来寒热麻黄汤证的热型是
普通股票股东行使资产收益权有一定的法律限制条件,一般的原则有()。Ⅰ.股份公司只能以留存收益支付Ⅱ.红利的支付不能减少其注册资本Ⅲ.公司在无力偿债时不能支付红利Ⅳ.公司在无力偿债时必须支付红利
在我国国民收入分配过程中,社会消费基金由()构成。
下列权利要求所要求保护的发明创造,哪些不属于实用新型专利保护的客体?
我国现存最大的类书是()。
()是解决城乡差距的根本途径,也是最大的内需所在。
设D是由曲线y=x1/3,直线x=a(a>0)及x轴所围成的平面图形,Vx,Vy分别是D绕x轴,y轴旋转一周所得旋转体的体积,若Vy=10Vx,求a的值.
Ididnotknowthecityatalland,whatismore,Icouldn’tspeakawordofthelanguage.Afterhavingspentmyfirstdaysight
Navigationcomputers,nowsoldbymostcarmakers,cost$2000andup.Nosurprise,then,thattheyaremostoftenfoundinluxu
最新回复
(
0
)