首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程: Private Sub Command1 Click() Dim s As String,chAs String s="" For k=1 To Len(Text1)ch=
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程: Private Sub Command1 Click() Dim s As String,chAs String s="" For k=1 To Len(Text1)ch=
admin
2020-01-02
37
问题
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:
Private Sub Command1 Click()
Dim s As String,chAs String s=""
For k=1
To Len(Text1)ch=Mie(Text1,k,1)s=ch_+s Next k
Text1.Text=s
End Sub
程序执行时,在文本框中输入“Basic”,然后单击命令按钮,则Text1中显示的是
选项
A、Baslc
B、cisaB
C、BASIC
D、CISAB
答案
B
解析
本题考查的考点是有关循环和取了串函数的。本题比较简单,循环次数就是字符串的长度,每次都在第k位取一个字母,最后倒序连接起来。注意每次都把ch连接到s的前面。
转载请注明原文地址:https://jikaoti.com/ti/2bx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp,已给出了所有控件和部分程序。程序运行时,请按以下顺序操作:1)单击“读入数据”按钮,可把考生目录下的文件in3.dat中的100个整数读到数组a中;2)从名称为List1的列表框中选中
在窗体上没有进行任何属性设置,然后编写如下事件过程,则程序运行结果是()。PrivateSubForm_Load()Fori=1To10sum=sum+iNexti
编写如下事件过程:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)If(ButtonAnd3)=
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是
下列可以打开随机文件的语句是
有数据定义语句:DimX,YAsInteger以上语句表明
窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:PrivateSubCommandl_Click()DimmAsStringm=InputBox(”请输入字符串”)
关于KeVPress事件,以下叙述中正确的是
已知图片框Picturel中己装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是
以下数据结构中,属于非线性数据结构的是()。
随机试题
A.清养补肺B.疏风散热,清肺化痰C.排脓解毒D.清肺解毒,化瘀消痈肺痈成痈期,宜
支付结算工作监督管理部门是()。
凡采购未纳人集中采购目录的政府采购项目,可以自行采购,也可以委托集中采购机构在委托的范围内代理采购。()
召开基金份额持有人大会,召集人应提前()日公告基金份额持有人大会的事项。
甲公司以10万元的价格向乙公司购买10吨食用油,约定8月1日乙公司将该批食用油运到甲公司。甲公司向乙公司支付定金2.5万元。同时约定,一方违约应支付给对方违约金3万元。合同履行期限将至,由于粮油市场的价格有大幅度上调,乙公司认为与甲公司约定的价格过低,遂与
(2014年真题)关于出版物市场需求特征的说法,正确的有()。
下面哪种服务不属于IPTV邑信类服务?()
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。程序代码如下:Dimcolor(3)AsInteger
WhenSpanishfootballclubBarcelonapaidUS$35millionforRonaldinholastsummer,theyweren’tbuyingaprettyface."Iam(51)
Surtseywasbornin1963.Scientistssawthebirthofthisisland.Itbeganat7:30a.m.on14thNovember.Afishingboatwas
最新回复
(
0
)