首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,名称为Text1,然后编写如下程序: Private Sub Form_Load() Private Sub Form Click() Text1.Text="":Text1.SetFocus
在窗体上画一个文本框,名称为Text1,然后编写如下程序: Private Sub Form_Load() Private Sub Form Click() Text1.Text="":Text1.SetFocus
admin
2019-01-17
34
问题
在窗体上画一个文本框,名称为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
程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中的内容
选项
A、与原字符串相同
B、与原字符串中字符顺序相同,但所有字母均转换为大写
C、为原字符串的逆序字符串,且所有字母转换为大写
D、为原字符串的逆序字符串
答案
C
解析
Mid(字符串,起始位置[,个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串,UCase()函数用于将字符串中小写字母转化为大写字母,原本大写或非字母字符保持不变。本题中在循环内每次取出第k位个字符并且连接到结果字符串的前面,所以结果字符串是源字符串的逆序字符串。
转载请注明原文地址:https://kaotiyun.com/show/EvFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面叙述中错误的是
在编辑VB应用程序时,如果不小心关闭了属性窗口,则可以单击主窗口标准工具栏上的一个按钮直接打开属性窗口,这个按钮的图标是
窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下:PrivateSubCommand1_Click(IndexAsInteger) IfIndex=1Then Print"计算机等级考试" En
设a=4,b=5,c=6,执行语句Printa<bAndb<c后,窗体上显示的是( )。
通用对话框Filter属性的作用是
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为"VBProgramming"。运行程序后,选中其中的"VB",并执行如下事件过程:PrivateSubCommand1_Click()
下面不能作为结构化方法软件需求分析工具的是
要使图像框(Image)中的图像能随着图像框的大小伸缩,应该设置的属性及值是( )。
由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得f(x0)=0(该点称为"零点")。设有VB函数:PrivateFunctionf(xAsSingle)AsSingle可以返
某个工厂有若干个仓库,每个仓库存放有不同的零件,相同零件可能放在不同的仓库中。则实体仓库和零件间的联系是
随机试题
考生文件夹下存在一个数据库文件“samp2.mdb”,里面已经设计好一个表对象“tStud”和一个查询对象“qStud4”。试按以下要求完成设计:(1)创建一个查询,计算并输出学生的最大年龄和最小年龄信息,标题显示为“MaxY”和“MinY”,所
构成意见沟通程序的基本要素包括
合同权利转让无须经债务人同意,但应通知__________。
合成蛋白质时由前体转变而成的氨基酸是
原发性支气管肺癌早期最常见的表现是
采用技术推算法清查的实物资产应具备的特点有()。
(2014年)2013年3月18日,甲机械公司与乙融资租赁公司接洽融资租赁某型号数控机床事宜,同年4月1日,乙按照甲的要求与丙精密设备公司签订了购买1台某型号数控机床的买卖合同。丁以乙的保证人身份在该买卖合同上签字,但合同中并没有保证条款,丙和丁亦未另行签
设有3阶实对称矩阵A满足A3-6A2+11A-6E=0,且|A|=6.判断二次型f=xT(A+E)x的正定性.
计算机中,负责指挥计算机各部分自动协调一致地进行工作的部件是()。
Whileattendingahighereducationsystemoffersmanypositives,italsoofferscertainnegatives.Onenegativeisthefacthigh
最新回复
(
0
)