首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有一个文本框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-10-23
56
问题
设窗体上有一个文本框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/7HLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在用通用对话框控件建立″打开″或″保存″文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarr(10,10)AsInteger,i,jAsIntegerFori=
执行下列程序后,鼠标单击窗体,输出结果为PrivateSubForm_Click()Print"Click";EndSubPrivateSubForm_mouseDown(ButtonAsInteger,Shift
Text文本框接受的最长字符数由文本框的______属性确定。
下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。SubPR()RandomizeDima(10)Forj=1To10a(i)=Int(【】)If【
软件是指
下述关于数据库系统的叙述中正确的是______。
如果在程序中要将c定义为静态变量,且为整型数,则应使用的语句是
声明一个变量为局部变量应该用
随机试题
患儿女,10岁。因发热、腰痛5天入院。右肾区有叩击痛,尿常规:红细胞5~6个/HP,白细胞20~30个/H,中段尿培养大肠埃希菌>105/ml。经抗生素静脉用药治疗3天后体温正常。患儿住院2周,出院时尿常规正常,尿培养阴性,不发热,轻微腹痛,肾区无叩痛
新疆维吾尔自治区某多民族杂居的地区(当地通用语言为汉语)发生了一起故意伤害案件,其中被告人杨光(汉族),男,17岁;被害人买买提(维吾尔族),男,19岁。崔义是杨光的辩护律师,刘兴是买买提的诉讼代理人。在侦查过程中,由于买买提不会讲汉语,公安机关只好为他聘
关于报关员的记分周期,报关员在海关注册登记之日起至当年12月31日不足1年的,按一个记分周期计算。()
当经济衰退至尾声,投资者已远离证券市场,每日成交稀少的时候,可以断定()
某手表生产企业为增值税一般纳税人,生产各类高中低档手表,成本中的外购比例60%,2016年2月底留抵税额2300元,3月发生以下业务:(1)邮寄进口有商业价值的货样手表2只,支付价款和邮寄费共计4000欧元;进口生产设备一台,合同货价1000000元,境
怀柔长城国际文化村,坐落于风景秀丽的金山岭长城脚下。()
犯罪分子没有法定减轻处罚情节,但根据案件特殊情况,经_______核准,可在法定刑以下判处刑罚;被判处无期徒刑的犯人,如有特殊情况,经_______核准,实际执行未达13年的,可以假释;在死刑缓期执行期间,如故意犯罪,查证属实,由_______核准,执行死
このきんじょに住んでいます。
Spaceisadangerousplace,notonlybecauseofmeteors(流星)butalsobecauseofraysfromthesunandotherstars.Theatmosphe
What’swrongwithyou?Whereareyougoing?
最新回复
(
0
)