首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Commandl_Click() Dim strl As String,str2 As String strl=InputBox(“输入一个字符串”) subf st
编写如下程序: Private Sub Commandl_Click() Dim strl As String,str2 As String strl=InputBox(“输入一个字符串”) subf st
admin
2013-11-29
21
问题
编写如下程序:
Private Sub Commandl_Click()
Dim strl As String,str2 As String
strl=InputBox(“输入一个字符串”)
subf strl,str2
Print str2
End Sub
Sub subf(sl As String,s2 As String)
Dim temp As String
Static i As Integer
i=i+1
temp=Mid(sl,i,1)
If temp<>”“Then subf s1.s2
s2=s2&temp
End Sub
程序运行后,单击命令按钮Commandl,且输入“abcdef”,则输出结果为( )。
选项
A、atbecd
B、cdbeaf
C、fedcba
D、adbecf
答案
C
解析
程序中过程subf的两个参数都默认按址传递,其内部定义的变量i为Static即静态变量,在过程调用时它会保留上次的值。这个过程的功能是通过递归调用自己依次取出参数1中即sl中的字符连接在S2的尾部,即使s1的字符串倒序后存入s2中。程序中输入了abcdef,则输出结果为fecdba。
转载请注明原文地址:https://jikaoti.com/ti/NK60FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人编写了下面的程序PrivateSubCommandl_click()DimaAsInteger,bAsIntegera=InputBox(“请输入整数”)b=InputBox(“请输入整数”)proaprobCallpr
为计算a“的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLongDimPAsLongP=aFork=lT0nP=P*aNextkp
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:optionBase1PdvateSubCommandl_Click()Dimaa=Array(1,2,3,4)J=1Fori=3To1Step-1s=s+a(
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePersonnameAsString*8mjotAsString+
(1)在名称为Forml的窗体上画一个框架、一个文本框、一个命令按钮。框架的名称为Framel,标题为“框架”。文本框在Frame1框架中,名称为Text1、标题为“模拟试题”。命令按钮的名称为Commandl、标题为“屏蔽”。编写适当的事件过程,当程序运
(1)在名称为Forml的窗体中画一个名称为Textl的文本框,其标题为“0”;再添加一个名称为Timerl的计时器。请设置适当的控件属性,并编写适当的事件过程.使得在运行时,每隔1秒钟文本框中的数字加1,当达到10时,在窗口上打印“10”,然后重新从O开
随机试题
数字式测量仪表在测量时不存在有“视差”。()
汉语的语素、音节和汉字不是完全一一对应的。
患者积块软而不坚,固定不移,胀与痛并存,舌苔薄,脉沉实。其证候是
以下哪些是在全国人大闭会期间,全国人大常委会根据最高人民法院院长的提请,可以任免的人员?()
根据《中华人民共和国合同法》,属于可变更、可撤销合同的是()的合同。
新股发行,需由股东大会作出决议的是()。
三和路线
惠帝初年,胶西()好黄老言,应齐丞相曹参之聘,仕于齐国,为当时黄老之宗。
Everyyearlandslides(滑坡)cause25to50deathsand$1.5billionindamageintheUnitedStates.Theyaccountfor15percentof
WhenSakenaYacoobiwasachildinHerat,Afghanistan,shesawmanywomensuffer.Theyhadnoeducationand【C1】______ornomedic
最新回复
(
0
)