首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,名称为Text1,然后编写如下程序: Private Sub Form Load0 Private Sub Form_Click() Textl.Text=""Textl.SetFocus Dim a As SUing,S As SU
在窗体上画一个文本框,名称为Text1,然后编写如下程序: Private Sub Form Load0 Private Sub Form_Click() Textl.Text=""Textl.SetFocus Dim a As SUing,S As SU
admin
2015-11-24
112
问题
在窗体上画一个文本框,名称为Text1,然后编写如下程序:
Private Sub Form Load0 Private Sub Form_Click()
Textl.Text=""Textl.SetFocus Dim a As SUing,S As SUing
End Suba=Textl.Text:s=”
For k=1 To Len(A)
S=UCase(Mid(a,k,1))+s
Next k
Text1.Text=s
End Sub
程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中
选项
A、与原字符串相同
B、与原字符串中字符顺序相同,但所有字母均转换为大写
C、为原字符串的逆序字符串,且所有字母转换为大写
D、为原字符串的逆序字符串
答案
C
解析
Mid(字符串,起始位置【,个数】)函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串,UCase( )函数用于将字符串中小写字母转化为大写字母。原本大写或非字母字符保持不变。本题中在循环内每次取出第k位个字符并且连接到结果字符串的前面,所以结果字符串是源字符串的逆序字符串。
转载请注明原文地址:https://kaotiyun.com/show/13Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为“Command1”,标题为“计算”的命令按钮,再画7个标签,其中5个标签组成名称为Label1的控件数组;名称为Label2的标签用于显示计算结果,其Caption属性的初始值为空;标签Label3的标题为“计算结果”。运行程序时会自
如果A为整数,且|A|>=100,则打印"OK",否则打印"Error",表示这个条件的单行格式If语句是()。
用VisualBasic编写的应用程序的特点是()。
向顺序文件Temp.txt中写入1,2,3这3个数。在程序中加入以下语句的那项可以使程序功能完整。PrivateSubCommand1_ClickOpen"c:\Temp.txt",OutputAs#1Fori=0To3Nex
下列不属于VisualBasic特点的是
两个或两个以上模块之间联系的紧密程度称为()。
一个关系中属性个数为1时,称此关系为
软件开发模型包括Ⅰ.瀑布模型Ⅱ.扇形模型Ⅲ.快速原型法模型Ⅳ.螺旋模型
下列对于软件测试的描述正确的是()。
软件测试分为白箱(盒)测试和黑箱(盒)测试。等价类划分法属于【】测试。
随机试题
认真阅读下面材料,仔细分析,联系现实生活,看能引出何种观点,然后任选一个角度,写一篇700字左右的论说文,题目自拟。有一句格言说:“谦虚与怀疑是富有的淘金者的左手和右手,作为一个富有的淘金者,不仅要用他的左手,也要用他的右手。”
8周妊娠,难免流产,首选的治疗是
下列关于慢粒白血病急性变的叙述,不恰当的是
下列哪项不是外科疾病总的发病机制
对证券价格波动原因解释是:对价格与所反映信息内容偏离的调整的学派是基本分析流派。()
某企业拟采购一批原材料,价值10000元,供应商规定的付款条件如下:(1)立即付款,价格9630元。(2)第20天付款,价格9750元。(3)第40天付款,价格9870元。(4)第60天付款,价格10000元。要求:假设银行短期贷款的利
在某地暴恐案件处置中,为抓捕穷凶极恶的暴恐分子,特警队员们周密部署、全方位立体配合,在海拔3000多米、沟壑纵横的深山中千里追击,连续战斗。他们不畏艰险、不惧牺牲,在雪地中埋伏、在冰水中潜行、在山石缝隙中穿过,经过近两个月的顽强拼搏,最终将暴恐分子剿灭,保
甲与乙共谋达成分工配合杀害丙的计划,按照计划,甲从前门进入丙家追杀丙,丙欲从后门逃跑之时,被守候在此的乙一刀捅死。甲、乙的共同犯罪形式是()
【S1】【S2】
A、Itisverycommercial.B、Itisveryinsecure.C、Itisverynoisy.D、Itisveryunfriendly.B[听力原文]Whatdoesthespeakerthink
最新回复
(
0
)