首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr=“” strL=Len(xStr)
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr=“” strL=Len(xStr)
admin
2018-09-19
69
问题
设有如下通用过程:
Public Function Fun(xStr As String)As String
Dim tStr As String,strL As Integer
tStr=“”
strL=Len(xStr)
i=strL/2
Do While i<=strL
tStr=tStr&Mid(xStr,i+1,1)
i=i+1
Loop
Fun=tStr&tStr
End Function
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程:
Private Sub Commandl_Click()
Dim S1 As String
S1=”ABCDEF”
Text1.Text=LCase(Fun(S1))
End Sub
程序运行后,单击命令按钮,文本框中显示的是( )。
选项
A、ABCDEF
B、abcdef
C、defdef
D、defabc
答案
C
解析
程序中过程Fun的Do循环的功能是从参数字符串中依次取出后半部分的字符组成一个字符串,然后这个字符串再重复一次由函数返回。函数kn用于返回字符串的长度,过程中字符串的长度做为Do循环的结束条件。Mid是字符串中部截取函数,用来从指定位置开始截取指定个数的字符。过程中使用Mid(xStr,i+1,1),通过循环依次取出字符串后半部分的字符。函数返回的字符串经Lcase函数转换为小写然后显示在文本框中。程序中做为Fun过程参数的字符串为“ABCDEF”,经处理返回并转为小写后为“defdef”。
转载请注明原文地址:https://kaotiyun.com/show/GIFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面属于黑盒测试方法的是
如果过程的首行是:PrivateSubproc(xAsControl),则调用此过程时使用的实际参数应该是
下列关于菜单的说法中,错误的是
在Open语句中可以用Output和Append两种方式打开顺序文件,其主要区别是
设有工程文件Proj,其中含有Form1窗体、Form2窗体、标准模块Module1.bas,在Form1窗体模块的通用声明段中书写了如下语句PublicXAsInteger,在Form1窗体模块中还定义了通用过程LocalSub。则以下说法中正确的
深度为5的完全二叉树的结点数不可能是
以下说法中正确的是( )。
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
某二叉树共有13个结点,其中有4个度为1的结点,则叶子结点数为
下列运算符中,优先级别最高的是
随机试题
将填充材料用铁钉固定在模板内侧后,再浇混凝土,这样拆模后填充材料即可贴在混凝土上。这种填料安装方法是()。
拔牙后出血是指拔牙后多长时间仍明显出血
下列说法错误的是()。
在设备购置费的构成内容中,不含有()费。
在事先确定企业资本规模的前提下,吸收一定比例的债务资本,可能产生的结果有()。
部分简报为了说明编发简报的目的或对简报的内容进行评论,往往加注编者按。编者按的位置在()。
请谈一件你最成功的事。
A、 B、 C、 C
Krygersaidinaninterviewthateverybodyneedsadifferentamountofsleep.Gettingsufficientamountsofshut-eyeisa"life-
A、Hekeepschanginghisjobs.B、Hecan’tearnenoughmoneytosupportthefamily.C、Hehasgotabadtemper.D、Hehasfallenin
最新回复
(
0
)