首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
函数fun如下: Private Function fun(ch As String)As Integer Dim n%,st$,c$ For k=1To Len(ch) c=Mid(ch,k,1) If c<>"A"Then st=st&c Else n
函数fun如下: Private Function fun(ch As String)As Integer Dim n%,st$,c$ For k=1To Len(ch) c=Mid(ch,k,1) If c<>"A"Then st=st&c Else n
admin
2018-06-20
30
问题
函数fun如下:
Private Function fun(ch As String)As Integer
Dim n%,st$,c$
For k=1To Len(ch)
c=Mid(ch,k,1)
If c<>"A"Then
st=st&c
Else
n=n+1
End If
Next k
ch=st
fun=n
End Function
函数的功能是( )。
选项
A、从字符串ch中删除所有字符“A”,返回值为删除的个数
B、从字符串ch中删除所有字符“A”,返回值为删除后的字符串
C、统计宁符串ch中字符“A”的个数并返回
D、把字符串ch中不等于“A”的字符都改成“A”,返回值为修改的个数
答案
A
解析
fun函数中字符串变量ch作为形参,函数的返回值类型为整型,For循环中循环变量k的初始值为1终止值为字符串的长度,每当循环执行一次时,将字符串ch中的一个字符取出赋值给字符变量c,然后使用if语句判断取出的字符是否等于字符“A”,若取出的字符不是“A”,则将该字符放人字符串st中,若取出的字符是“A”,则将变量n的值加1;由程序可知for循环的功能是:将字符串ch中非“A”字符存放到字符串变量st中,并对字符串ch中“A”字符的个数进行计数,故本题A选项叙述正确。本题选择A选项。
转载请注明原文地址:https://jikaoti.com/ti/Vjy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Commandl的命令按钮,并有如下程序代码:PrivateSubCommandl_Click()Staticaa=1:b=2:c=3Callf(
窗体上有一个名称为Commandl的命令按钮,一个名称为Textl的文本框。编写如下程序:PrivateSubCommandl_Click()DimxAsIntegerx=Val(InputB
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的函数过程如下:PrivateSubCommandl_Click()DimiAsIntegerFori=1To500
要将单选按钮Optl设为被选中,应设置的属性是
对于列表框控件Listl,能够表示当前被选中列表项内容的是
命令按钮不支持的事件为
以下关于命令按钮的叙述中正确的是
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:PrivateSubCommandlClick()
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommandl_Click()Dims1AsString,s2AsStri
窗体上有一个名称为commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:PrivateSub
随机试题
门静脉高压的三大表现为脾大、_______、腹水。
候选码
中国社会主义民主政治中独特的、独有的、独到的民主形式是()
嗜酸粒细胞减少见于
通过常规管理足以保证其安全性、有效性的医疗器械植人人体的医疗器械
下列可能作为原始凭证的是()。
下列税种中,应记人“管理费用”科目核算的有()。
有关法人民事权利能力的下列说法中,正确的有()。
[2002年]已知四阶方阵A=[α1,α2,α3,α4],α1,α2,α3,α4均为四维列向量,其中α2,α3,α4线性无关,α1=2α2一α3.如果β=α1+α2+α3+α4,求线性方程组AX=β的通解.
A、Thesun.B、Themoon.C、Shadows.D、Sandals.CWhatindicatedthelongestandshortestdaysoftheyear?
最新回复
(
0
)