首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr=””:strL=Len
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr=””:strL=Len
admin
2013-10-16
93
问题
设有如下通用过程:
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 Command 1_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/DFQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于VisualBasic注释语句说法不正确的是______。
以下叙述中错误的是______。
设有如下程序;PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSubPrivateSubForm_Mouse
在窗体上绘制两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为“按钮1和“按钮2”,其中“按钮1”按钮的初始状态为无效(即不可用)。请编写适当的事件过程,使得在运行时单击“按钮2”按钮,则使“按钮1”按钮变为有效(即可以使用)、窗体的初始状态和运行时的
在名为Form1的窗体上绘制两个文本框,名称分别为Text1和Text2;再绘制两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为LeR和Right,如下图所示。要求:(1)编写适当的事件过程,使得程序运行时,单击LeR按钮,则焦点位
在Form1的窗体土绘制一个命令按钮,名为Cmd1,标题为Display,按钮隐藏。编写适当的事件过程,使程序运行后,若单击窗体,则命令按钮出现;此时如果单击命令按钮,则在窗体上显示VisualBasic。程序运行情况如下图所示。注意:程
软件测试方法中,黑盒测试法和白盒测试法是常用的方法,其中黑盒测试法主要是用于测试【】。
表达式Val(".123E2")的值是()。
设A=2,B=-2,则表达式A/2+1>B+5OrB*(-2)=6的值是______。
随机试题
动物脂肪中________含量较多。
中心性发绀见于()
舌的脏腑分部,舌中属于
关于电雷管起爆的缺点的说法,正确的有()。
对单船或两艘拖轮及两艘以上执行同一任务,()对整个船队的航行有绝对指挥权。
在确定经济订货量时,下列表述中正确的有()。
Haveyoueverfeltyourlifegointoslowmotionasyourealizesomethingbadishappening?Nowscientistshavemeasuredexactly
甲想杀死乙,从远处向乙开枪射击,致乙重伤。甲的行为符合()。(2010年单选6)
下列属于表单方法名(非事件名)的是()。
We’vereadhowbabiesstarelongerandcrylesswhenheldbyprettypeople,andheardtalesofhandsomechildrendoingbetteri
最新回复
(
0
)