首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String, strL As Integer tStr="" strL=Len(xStr) i=strL
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String, strL As Integer tStr="" strL=Len(xStr) i=strL
admin
2018-07-11
40
问题
设有如下通用过程:
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 Command1_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循环的功能是从参数字符串中依次取出后半部分的字符组成一个字符串,然后这个字符串再重复一次由函数返回。函数Len用于返回字符串的长度,过程中字符串的长度做为Do循环的结束条件。Mid是字符串中部截取函数,用来从指定位置开始截取指定个数的字符。过程中使用Mid(xStr, i+1, 1),通过循环依次取出字符串后半部分的字符。函数返回的字符串经Lcase函数转换为小写然后显示在文本框中。程序中做为Fun过程参数的字符串为"ABCDEF",经处理返回并转为小写后为"defdef"。
转载请注明原文地址:https://kaotiyun.com/show/PzFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
关于随机文件,以下叙述中错误的是
窗体上有一个名称为VScrol11的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
以下关于图片框、图像框的叙述中,正确的是
PrintRight("VBProgramming",2)语句的输出结果是
以下关于VB的叙述中,错误的是
下面程序的运行结果是()。PrivateSubFormClick()i=0DoUntil0i=i+1Ifi>10ThenExitDoLoopPrintiEndSub
以下VisualBasic不支持的循环结构是
表达式Sgn(15.6)+Int(-16.8)的值是
假定有以下循环结构:DoUntil条件表达式 循环体Loop则以下正确的描述是( )。
随机试题
属于同质移植的是
功能清热凉血,活血化瘀,又能除无汗之骨蒸的是
代谢性酸中毒的治疗不正确的是
国民经济内部的“转移支付”不应计入国民经济的费用效益。下面属于转移支付的是()。
社会主义市场经济体制要求不包括()。
下列属于舞弊的动机或压力的是()。
沙龙:志趣相投
.
(2008下软设)在UML的各种视图中,______(1)显示外部参与者观察到的系统功能;______(2)从系统的静态结构和动态行为角度显示系统内部如何实现系统的功能;______(3)显示的是源代码以及实际执行代码的组织结构。(1)
实施BSP方法的主要目的是为企业提供信息系统的总体规划,下述哪个不是BSP实施的任务?
最新回复
(
0
)