首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下通用过程: Public Function Fun(xStr As String) As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr)i=l Do Whil
设有如下通用过程: Public Function Fun(xStr As String) As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr)i=l Do Whil
admin
2015-05-29
62
问题
设有如下通用过程:
Public Function Fun(xStr As String) As String
Dim tStr As String,strL As Integer tStr=""
strL=Len(xStr)i=l
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
在窗体上画一个名称为Commandl的命令按钮。然后编写如下的事件过程:
Private Sub Command 1_Click()
Dim S1 As String
S 1="abcdef":Print UCase(Fun(S 1 ))
End Sub
程序运行后,单击命令按钮,输出结果是
选项
A、ABCDEF
B、abcdef
C、AFBECD
D、DEFABC
答案
C
解析
本题通用过程的功能是:从字符串变量xStr值的左右两端同时开始,由外向里每次取出两个字符(左右各一个),组成一个新的字符串。 本题程序运行后,当调用通用过程函数Fun后,返回值应为“afbecd”,转换为大写后在文本框中的显示结果为“AFBECD”。
转载请注明原文地址:https://kaotiyun.com/show/6DQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有以下循环结构Do循环体LoopWhile<条件>则以下叙述中错误的是
执行以下Command1的Click事件过程在窗体上显示OptionBase1PrivateSubCommand1Click()Dimaa=Array("a","b","C","d","e",
在窗体上绘制一个名称为Labell的标签,然后编写如下事件过程:PrivateSubForm_Click()Dimarr(10,10)AsIntegerDimiAsInteger,jAsInteger
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday",,,"Daybeforeyesterday",5)将显示一个对话框,在对话框的输入区中显示的信息是
数据流的类型有【】和事务型。
以下有关数组定义的语句序列中,错误的是
在窗体上画一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,两个名称分别为Label1、Label2、标题分别为空白和“共有文件”的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同
已知变量boo1Var是一个布尔型的变量,如果要给其赋值为True,则正确的赋值语句就是______。
DefSnga定义的变量a是______类型的变量。
以下声明语句中错误的是
随机试题
对心血管有保护作用的药物是:
年薪
固定资产质量分析时,可以评价固定资产利用率的项目是
女性,25岁,妊娠5个月,因转移性右下腹痛2小时就诊。诊断为急性阑尾炎。不宜采用的治疗措施是
A、胞质量异常B、内容物异常C、着色异常D、颗粒异常E、内外质现象成熟红细胞出现嗜多色性红细胞、嗜碱性红细胞、高色素大红细胞、低色素小红细胞属于
内心信念的作用是
对于普遍存在的再生周期短的资源损失情况,当其基本条件没有发生逆转时,()。
属于路基质量检验中石方路基实测项目的有()。
十七大报告指出:“强调认清社会主义初级阶段基本国情,不是要妄自菲薄、自甘落后,也不是要脱离实际、急于求成。而是要坚持把它作为推进改革、谋划发展的根本依据。”这就明确告诉我们
2/7
最新回复
(
0
)