设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" str

admin2013-04-11 67

问题设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr) i=1 Do While i＜=strL/2 tStr=tStr & Mid(xStr, i, 1)& Mid(xStr,strL-i+1,1) i=i+1 Loop Fun=tStr End Function 在窗体上画—个名称为Command1的命令按钮。然后编写如下的事件过程： Private Sub Command1_Click() Dim S1 As String S1="abcdef" Print UCase(Fun(S1)) End sub 程序运行后，单击命令按钮，输出结果是______。

选项 A、ABCDEF
B、abcdef
C、AFBECD
D、DEFABC

答案C

解析 Mid(字符串,p,n)：从第p个字符开始，向后截取n个字符。p和n都是算术表达式。
"&"：字符串连接运算符，将两个字符串按顺序连接起来。
UCase(字符串)：将字符串所有的字母都转换成大写字符。
Len(字符串)：返回字符串的长度。
分析程序：当Fun过程用语句Fun(S1)调用后，S1的值"abcdef"被赋给xStr，执行第一次循环时Mid(xStr,i,1)相
当于Mid(xStr,1,1)，Mid(xStr,strL-i+1,1)相当于Mid(xStr,6,1)，此时tStr=AF，由此判断选项C正确。

转载请注明原文地址:https://www.kaotiyun.com/show/dlhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" str

二级VB

NCRE全国计算机二级

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。(1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。(1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。

编写如下两个事件过程：PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintCb_r(KeyCode)EndSub

有如下程序：PrivateSubForm_Click()DimiAsInteger,SumAsIntegerSum=0Fori=2To10

以下语句用于打开一个顺序文件Open"C:\MyFile.txt"ForOutPut，但是该语句的一个重要错误是没有

以下关系表达式中，其值为假的是：______。

在下列4个VisualBasic表达式中，非法的表达式是______。

军队建设的中心是()

在Excel2010中选定任意10行，再在选定的基础上改变第五行的行高，则()

中国近代史上第一次明确将美育列入教育方针，并提出“以美育代宗教”的教育家是()。

Beautyisacuriousphenomenon,oneofpermeable,shiftingboundaries.Wemaythinkweunderstandit,【C1】______wesenseiteffor

重度哮喘的病人由于缺氧严重，吸氧时应该给予高流量吸氧。

尸斑一般在动物死亡多长时间内出现()。

某保险代理机构对中国保监会的行政处理措施不服，根据《保险代理机构管理规定》，该机构可以采取以下(　　)救济措施。

行为主义是最早的学习理论，它为学校的教学做出的主要贡献是()。

OnherfirstmorninginAmerica,lastsummer,mydaughterwentouttoexplorehernewneighborhood—alone,withouteventellingm

A、inahotel.B、Inarestaurant.C、Atschool.A第一个人说：“我想住宿。”第二个人问：“你想住几晚?”可推断出他们是在宾馆里，所以应选A。

设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="" str

二级VB

NCRE全国计算机二级

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。(1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。(1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。

编写如下两个事件过程：PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintCb_r(KeyCode)EndSub

有如下程序：PrivateSubForm_Click()DimiAsInteger,SumAsIntegerSum=0Fori=2To10

以下语句用于打开一个顺序文件Open"C:\MyFile.txt"ForOutPut，但是该语句的一个重要错误是没有

以下关系表达式中，其值为假的是：______。

在下列4个VisualBasic表达式中，非法的表达式是______。

军队建设的中心是()

在Excel2010中选定任意10行，再在选定的基础上改变第五行的行高，则()

中国近代史上第一次明确将美育列入教育方针，并提出“以美育代宗教”的教育家是()。

Beautyisacuriousphenomenon,oneofpermeable,shiftingboundaries.Wemaythinkweunderstandit,【C1】______wesenseiteffor

重度哮喘的病人由于缺氧严重，吸氧时应该给予高流量吸氧。

尸斑一般在动物死亡多长时间内出现()。

某保险代理机构对中国保监会的行政处理措施不服，根据《保险代理机构管理规定》，该机构可以采取以下( )救济措施。

行为主义是最早的学习理论，它为学校的教学做出的主要贡献是()。

OnherfirstmorninginAmerica,lastsummer,mydaughterwentouttoexplorehernewneighborhood—alone,withouteventellingm

A、inahotel.B、Inarestaurant.C、Atschool.A第一个人说：“我想住宿。”第二个人问：“你想住几晚?”可推断出他们是在宾馆里，所以应选A。

某保险代理机构对中国保监会的行政处理措施不服，根据《保险代理机构管理规定》，该机构可以采取以下(　　)救济措施。