首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="":strL=Len(xStr) i=strL/2
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr="":strL=Len(xStr) i=strL/2
admin
2017-06-21
41
问题
设有如下通用过程:
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的文本框和一个名称为Commandl的命令按钮。然后编写如下的事件过程:
Private Sub Commandl_Click()
Dim S1 As String
S1="ABCDEF":Text1.Text=LCase(Fun(S1))
End Sub
程序运行后,单击命令按钮,文本框中显示的是
选项
A、ABCDEF
B、abcdef
C、defdef
D、defabc
答案
C
解析
本题考查的考点是有关字符串处理的。本题中过程中的循环变量i的初值是字符串长度的一半,终值是字符串长度,结合循环中的取子串函数,整个循环的功能是取得字符串的后一半放入tstr中,然后连接上自身的值返回到调用程序。
转载请注明原文地址:https://kaotiyun.com/show/EPGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有两个控件:一个是驱动器列表框Drive1,另一个是目录列表框Dir1,现在要使目录列表框跟随驱动器列表框的变化而变化,则需在Drive1_Change事件过程中填入语句【】。
程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是______。
在窗体上画一个命令按钮,然后编写如下代码:PrivateTypeRecordIDAsIntegerNameAsString*20EndTypePrivateSubCommand1_Cli
设有如下程序:PrivateSubCommand1_Click()DimsumAsDouble,xAsDoublesum=0n=0Fori=1To5x=
下图是应用程序的窗体,要求用户选中复选框Check1后,文本框Text1中的文字以粗体显示,选中复选框Check2后,文本框Text1中的文字以斜体显示,单击“关闭”按钮Command1后结束应用程序运行。PrivateSubCheck1_Clic
下列说法错误的是()。
设有如下通用过程:PublicSubFun(a(),ByValxAsInteger)Fori=1To5x=x+a(i)NextEndSub在窗体上画一个名称为Text
当我们输入代码时,VisualBasic可以自动检测______错误。
下列()事件过程可以将打开文件对话框的标题改变为“newCaption”。
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个名为Command1的命令按钮,并编写如下事件过程:PrivateSubCommand1_Click()CommonDialogFlags=cd10FNH
随机试题
同一债权既有保证又有债务人提供的物的担保的,()。A.由保证人先行承担保证责任B.保证人不再承担保证责任C.保证人仅对物的担保以外的债权承担保证责任D.该债权受双重担保
有机氯在生物体内主要蓄积于
慢性呼吸衰竭最早、最突出的表现是()。
区分每一项固定资产的唯一标识是()。
小王购买一套住宅,总价125万元,工商银行给提供8成15年按揭,年利率为5%,小王以其所领到的该房的产权证书做抵押。第一个月应付利息为()元。
当年形成的会计档案在会计年度终了后,编制成册之后,必须移交本单位的档案部门保管。()
金属材料适宜采用计划配送,集团配送或定时、定量配送的形式向用户供货。
1979年元旦,全国人大常委会发表(),第一次正式宣布了争取和平统一祖国的大政方针。
在关系数据库中,要求关系中的元组在组成关键的属性上不能有空值。这是遵守()。
A、Manufacturersdon’tlikeit.B、Medicaladsarenotallowedtodoit.C、Theycan’taffordthecost.D、Theycan’tmakepromises.
最新回复
(
0
)