首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Command 1的命令按钮,事件过程及函数过程如下: Private Sub Command 1 Click() Dim m As String m=InputBox("请输入字符串") Print pick_str(m) E
窗体上有1个名称为Command 1的命令按钮,事件过程及函数过程如下: Private Sub Command 1 Click() Dim m As String m=InputBox("请输入字符串") Print pick_str(m) E
admin
2015-05-29
33
问题
窗体上有1个名称为Command 1的命令按钮,事件过程及函数过程如下:
Private Sub Command 1 Click()
Dim m As String
m=InputBox("请输入字符串")
Print pick_str(m)
End Sub
Private Function pick_str(s As String)As String
temp="":i=1:sLen=Len(s)
Do While i<=sLen/2
temp=temp+Mid(s,i,1)+Mid(s,sLen-i+1,1)
i=i+1
Loop
pick_str=temp
End Function
运行程序,单击命令按钮,并在输入对话框中输入“basic”,则在窗体上显示的内容为
选项
A、bcai
B、cbia
C、bcais
D、cbias
答案
A
解析
本题的函数中使用了Do循环,循环条件是i<=sLen/2;由于字符串的长度为5,所以循环会执行两次;布每次循环中使用Mid函数依次取得字符串的第一个字符、最后一个字符、第二个字符、倒数第二个字符。
转载请注明原文地址:https://kaotiyun.com/show/eDQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置井改正错误。
有如下程序:PrivateSubFormClick()DimCheck,CounterCheck=TrueCounter=0DoDoWhileCounter<20
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger,则以下叙述中正确的是
设a="a",b="b",c="c",d="d",执行语句x=IIf((a<B)Or(c>D),"A","B")后,x的值为
下列程序段的执行结果为DimA(10,10)ForI=2To4ForJ=4To5A(I,J)=I*JNextJNextIPr
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text2.Text="’’Text1.S
下列叙述中正确的是
以下语句错误的是
在长度为n的顺序表的第i(1≤i≤n+1)个位置上插入一个元素,元素的移动次数为【】。
通用对话框中打开“颜色对话框”的方法是()。
随机试题
道格拉斯窝位于下列哪两个结构之间
A.罗格列酮B.二甲双胍C.伏格列波糖D.艾塞那肽E.西格列汀α葡萄糖苷酶抑制剂()。
白天病区较理想的声音强度范围是
(操作员:李主管;账套:102账套;操作日期:2014年1月1日)设置职员档案。职员编码:0801职员姓名:李红性别:女所属部门:销售部职员类型:中层干部
甲公司向乙公司发出以3000己每台的单价购买100台电脑的要约,乙公司回复“同意出售100台电脑,但单价为每台3100元的()”。
已知有向图G=(V,A),其中V={a,b,c,d,e},A={<a,b>,<a,c>,<d,c>,<d,e>,<b,e>,<c,e>}。对该图进行拓扑排序,下面序列中不是拓扑排序的是()。
[*]
请用数学公式,在光标处输入以下绝对值方程|5x+8|—6=0。
若用如下的SQL语句建立一个Worker表:CREATETABLEworker(NOC(4)NOTNULL,NAMEC(8)NOTNULL,SEXC(2),AGEN(2))可以插入到worker表中的是______。
MissZhaoisoneofthemostpopularteachersintheschool.Yesterdayshecameintothe【B1】withabigsmileonherface.She
最新回复
(
0
)