设有如下通用过程： Pubfic Function Fun(xStr As String)As String Dim tStr As String，strL As Integer tstr=“” strL=Len(xStr) i=1 Do While i

admin2009-08-25 61

问题设有如下通用过程：
Pubfic 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
EndFunction
在窗体上画一个名称为Commandl的命令按钮。然后编写如下的事件过程：
Private Sub Commandl_Click()
Dim S1 As String
S1=“abcdef”
Print UCase(Fun(S1))
End Sub
程序运行后，单击命令按钮，输出结果是

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

答案C

解析此题主要考核Mid函数、UCASE函数，MID返回文本字符串中从指定位置开始的特定数目的字符，其格式为：MID(text，start-num，hum-chars)。Text包含要提取字符的文本字符串。Start-num文本中要提取的第一个字符的位置。文本中第一个字符的start-num为1，以此类推。Num_chars指定希望MID从文本中返回字符的个数。UCASE函数则将小写字母转换成大写字母。

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

设有如下通用过程： Pubfic Function Fun(xStr As String)As String Dim tStr As String，strL As Integer tstr=“” strL=Len(xStr) i=1 Do While i

二级VB

NCRE全国计算机二级

用于在子类中调用被重写父类方法的关键字是()。

通常，将软件产品从提出、实现、使用维护到不再使用的过程称为【】。

下列说法中错误的是()。

为用户与数据库系统提供接口的语言是()。

若要求尽可能快地对实数数组进行稳定的排序，则应选()。

软件测试的常用方法通常可分为白盒测试和【】。前者是根据程序的内部逻辑来设计测试用例，后者是根据软件的规格说明来设计测试用例。

以下各项中可以减少相同数据重复存储现象的是()。

数据库DB，数据库系统DBS，数据库管理系统DBMS，这3者之间的关系是()。

表达式-31＞＞＞5＞5＞＞＞5＞＞5＞＞＞5＞＞5值为()。

阅读《冯谖客孟尝君》中的一段文字，回答问题：驱而之薛，使吏召诸民当偿者悉来合券。券遍合，起，矫命以责赐诸民，因烧其券。民称万岁。解释“矫命”一词的概念。

患者男性，主诉上腹痛。六个月前出现上腹疼痛，近日疼痛加重，无发热，无体重下降，二便正常。上腹痛时伴有背部闷胀样疼痛，持续30分钟至1小时左右。拟诊为___________。

某产妇，产后第6天发热达40℃，恶露多而浑浊，有臭味，子宫复旧不佳，有压痛。下述哪一项护理不妥

计算机输入法是影响挂号快慢的重要因素之一，能提高挂号速度的输入法是

中年妇女乳头血性溢液，应首先考虑

___________不是与计量标准的环境条件相关。

为了提高处理效果，在石油化工废水处理中多效采用（）。

投资的风险性来源于投资的()。

担保合同是主合同的______，主合同无效的，担保合同无效。