首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String, strL As Integer tStr="" strL=Len(xStr) i=
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String, strL As Integer tStr="" strL=Len(xStr) i=
admin
2015-06-30
26
问题
设有如下通用过程:
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
解析
通用过程Fun的主要功能在于tStr=tStr & Mid(xStr, i, 1)& Mid(xStr, strL-i+1, 1)
这一句。其中Mid(xStr, i, 1)的意思是从字符串的左边开始依次取一个字符,Mid(xStr, strL-i+1, 1)的意思是从串的右边开始依次取一个字符。整个这条一语句的用意就是从一个字符串两端依次各取一对字符连成一个字符串。因此当Fun过程的参数为"abcdef"时,返回值为"afbecd",Ucase("afbecd")结果为"AFBECD",这就是输出结果。
转载请注明原文地址:https://jikaoti.com/ti/dV60FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()a$="VisualBasic"PrintString(3,a$)EndSub
在窗体上面两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后,如果单击“初始化”命令按钮,则对数组a的各元素赋值;如果单击“求和”命令按钮,则求出数组a的各元素之和,并在文本框中显示出来,如图所示。请填空
以下声明语句中错误的是
窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2
结构化分析方法是面向()的自顶向下逐步求精进行需求分析的方法。
在窗体中添加一个标签LblResult和一个命令按钮Command1,然后编写程序。程序的功能是单击命令按钮,计算1+2+3+4+5的值,并把结果转化为字符串显示在标签内,能够实现上述功能的程序段是,()
以下控件中不是标准控件的是()
在先左后右的原则下,根据访问根结点的次序,二叉树的遍历可以分为三种;前序遍历、【】遍历和后序遍历。
以下叙述中错误的是
有下列二叉树,对此二叉树前序遍历的结果为()。
随机试题
数控气割机的控制装置,在割炬每移动一步后,都进行偏差判断、________、和终点判断四项工作。
下列各组形声字,全部属于省声字的一组是()
男,50岁,有胃大部切除病史。近半年步行不稳,走路有踩棉花感。体检:双下肢运动觉振,动觉消失,Romberg征阳性。双侧锥体束征阳性。
一般而言,导致生产要素国际直接移动的具体原因主要有()。
自2009年1月1日至12月31日,个人将购买不足2年的非普通住房对外销售时,营业税处理方法正确的是()。
受保险合同保障,享有赔偿请求权的保险当事人是()。
对于实施西部大开发战略,下列叙述错误的是()。
恐龙专家:一些古生物学家声称鸟类是一群叫做多罗米奥索斯的恐龙的后裔。他们求助于化石记录,结果发现,与鸟类和大多数恐龙相比,多罗米奥索斯具有的特征与鸟类更为相似。但是,他们的论述存在致命的缺点,已经发现最早的鸟类的化石比最古老的已知的多罗米奥索斯的化石早几千
若窗体中已有一个名为Command1的命令按钮、一个名为Label1的标签和一个名为Text1的文本框,且文本框的内容为空,然后编写如下事件代码:PrivateFunctionf(xAsLong)AsBooleanIfxMod2=
Anewkindofradarhasbeendevelopedforspace-agetravelers.Aworkinglaboratorymodelofanewsystemofradarthatmakesu
最新回复
(
0
)