首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Private Sub Command1_Click() Dim str As String, ch As String str = "Visual Basic Programming" ch = "a"
设有下面程序代码: Private Sub Command1_Click() Dim str As String, ch As String str = "Visual Basic Programming" ch = "a"
admin
2018-12-20
55
问题
设有下面程序代码:
Private Sub Command1_Click()
Dim str As String, ch As String
str = "Visual Basic Programming"
ch = "a"
n = fun(ch, str)
Print str, n
End Sub
Private Function fun(ch As String, str As String) As Integer
Dim strbuf As String, c As String, n As Integer
For k = 1 To Len(str)
c = Mid$(str, k, 1)
If c <> ch Then
strbuf = strbuf & c
Else
strbuf = strbuf & UCase(c)
n = n + 1
End If
Next k
str = strbuf
fun = n
End Function
程序运行时的输出是
选项
A、Visual Basic Programming 0
B、VisuAl BAsic ProgrAmming 3
C、Visul Bsic Progrmming 3
D、VisualBasicProgramming 2
答案
B
解析
Mid$(A$,4,2)是为了与老版本的VB兼容($的作用是强制将函数的返回值设为字符型)。&用来连接字符串。If条件判断字符是否和输入的字符相等,相等则n加1。选B)。
转载请注明原文地址:https://kaotiyun.com/show/EjFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有单选钮和列表框控件。单击名称为Option1、标题为"国家"的单选钮,向列表框中添加国家名称,如下图所示。Option1的单击事件过程如下:PrivateSubOption1_Click() Dimarr arr=Array("
若窗体上有一个名为Command1的命令按钮,并有下面的程序:PrivateSubCommand1_Click() Dimarr(5)AsInteger Fork=1To5 arr(k)=k Nextk prog
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是( )。
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下程序:FunctionFun(xAsInteger,yAsInteger)AsIntegerFun=IIf(x
如果把文本框的Enabled属性设置为False并运行程序,则以下叙述中正确的是
用语句Open"C:\teac.txt"ForInputAs#1打开文件后,就可以编程序
假定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:PrivateTypeRecord IDAsInteger NameAsString*20EndTypePrivateSubCommand1_Click()
随机试题
对宗教节日描述正确的有()。
关于妊娠期及哺乳期妇女用药指导的说法,正确的有
正式提出了无产阶级领导权和工农联盟思想的会议是
新鲜骨折早期对位,对线不良,其最不佳的后果是( )。
()年,陈光浦先生将“旅游部”改为“中国旅行社”。
英国某个中了900万英镑的彩民临终说:我的生活是精彩的。是金钱毁了这一切。对此。你有什么理解?
法国大革命开始的标志:
AnautoloanJohnBakerworksintheloandepartmentofabankinDenver,Colorado.Heisaloanof-ricer.StanleyFanelli
Ithinkhe’sthemostcharming,most______manI’veeverknown.
A、Shehasforgottenwhenthereportisdue.B、She’dlikethemantohelpherwiththereport.C、Sheneedsmoretimetofinishth
最新回复
(
0
)