首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,名称为Text1,然后编写如下程序: Private Sub Form Load() Private Sub Form Click() Text1.Text="":Text1.SetFocus Di
在窗体上画一个文本框,名称为Text1,然后编写如下程序: Private Sub Form Load() Private Sub Form Click() Text1.Text="":Text1.SetFocus Di
admin
2015-05-29
96
问题
在窗体上画一个文本框,名称为Text1,然后编写如下程序:
Private Sub Form Load() Private Sub Form Click()
Text1.Text="":Text1.SetFocus Dim a As String.s As String
End Sub a=Text1.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/IDQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了把寻个VisualBASIC应用程序装入内存,只要装入【】文件即可。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1Click()Dimarray1(10,10)AsInteger
执行以下语句后,输出的结果是a$="Good"b$="Afternoom"Printa$+b$Printa$&b$
以下叙述中错误的是
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday",,,"Daybeforeyesterday",5)将显示一个对话框,在对话框的输入区中显示的信息是
在结构化设计方法中,生成的结构图(SC)中,带有箭头的连线表示
确定一个控件在窗体上的位置的属性是
组合框控件是将()组合成一个控件。
声明一个变量为局部变量应该用()。
下列程序执行后,变量x的值为()。Dima,b,c,dAsSingleDimxAsSinglea=10b=30c=400Ifb>aThend=a:a=b:b=dEndIfIfb>cThe
随机试题
ThenorthernpartsoftheUnitedStatesgetverycoldinthewinter.Itsnowsagreatdealandthetemperatureoftengoes【C1】___
早期青少年牙周炎特征性表现不包括
案情:甲与乙合伙承包村里的水塘养虾。2009年5月,甲乙二人向水塘投放虾苗2万尾。投放后二人精心管理。10天后,二人发现塘内有少量的死虾出现,当即捞起部分死虾送造纸厂与其交涉。造纸厂派人到现场了解情况。经双方估算,塘内漂浮和打捞上岸的死虾约10000尾。厂
价值工程的核心和所采用的成本分别是产品的()。
戒严由县级以上人大常委会或人民政府作出决定,由公安机关执行,必要时,也可派人民解放军、武警部队协助。()
用微波炉加热食物时不能用金属器皿盛装食物,是因为()。
货轮上卸下若干只箱子,总重量为10吨,每只箱子的重量不超过1吨,为了保证能把这些箱子一次运走,问至少需要多少辆载重3吨的汽车?
栈和队列的共同点是()。
Statusesaremarveloushumaninventionsthatenableustogetalongwithoneanotherandtodeterminewherewe"fit"insociety.
A、Thepickuptimeisnotscheduled.B、Extrapackagingisrequired.C、Valuablesareeasilylost.D、Thepricemightbetoohigh.D
最新回复
(
0
)