首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下函数: Function DelSpace(ch As String)As Integer Dim n%, st$, c$ st="" n=0 For k=1 To Len(ch) c=Mid(ch, k, 1) I
设有如下函数: Function DelSpace(ch As String)As Integer Dim n%, st$, c$ st="" n=0 For k=1 To Len(ch) c=Mid(ch, k, 1) I
admin
2018-09-19
67
问题
设有如下函数:
Function DelSpace(ch As String)As Integer
Dim n%, st$, c$
st=""
n=0
For k=1 To Len(ch)
c=Mid(ch, k, 1)
If c<>" " Then
st=st & c
Else
n=n+1
End If
Next k
ch=st
DelSpace=n
End Function
函数的功能是( )。
选项
A、统计并返回字符串ch中字符的个数
B、删除字符串ch中的空格符,返回删除字符的个数
C、统计并返回字符串ch中非空格字符数
D、删除字符串ch中除空格符外的其他字符,返回删除字符的个数
答案
B
解析
过程中对传入的字符串的字符一个个取出,判断如果不是空格则依次连接到一个字符串变量中,如果是空格则计数加1。最后,返回不包含空格的字符串和空格的个数。因此选项B正确。
转载请注明原文地址:https://kaotiyun.com/show/z1Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下事件过程:PrivateSubForm_Click()Dimf1AsInteger,f2AsInteger,iAsIntegerDimsAsIntegerf1=1:f2=1s=f1
有如下程序代码:PrivateSubForm_Click()Dima(10)AsInteger,b(5)AsIntegerFori=1To10a(i)=iNexti
设有以下程序:PrivateSubForm_Click() x=50 Fori=1To4 y=InputBox("请输入一个整数") y=Val(y) IfyMod5=0Then a=a+y
设有语句:Open"c:\Test.Dat"ForOutputAs#1则以下叙述中错误的是( )。
(1)在名称为Form1,标题为“练习”的窗体上添加一个名称为Frame1、标题为“效果”的框架。框架内含有三个复选框,其名称分别为Chk1、Chk2和Chk3,标题分别为“倾斜”、“加粗”和“下划线”。程序运行后的窗体如图所示。要求:存盘时必
为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容,首先应执行的操作是
窗体上有一个名称为Command1的命令按钮,编写如下事件过程:PrivateSubCommand1_Click()i=0DoWhilei<6Forj=1Toin
设有下面的程序段:x=InputBox("请输入一个整数")ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义
VB应用程序不能把一个二维表格中的数据存入文件
随机试题
简述工作场所的物品可区分为几部分。
切割氧气压力如何选择?
患者,男,14岁。右肱骨近端隐痛,行X线检查提示肱骨近端干骺端边界清楚溶骨性病灶,骨皮质变薄。最可能的诊断是()
女性,25岁,近年来难以控制反复持续地服用一种药,药量不断增加,不服或减少服用量则感痛苦难忍,因而无法停服该种药物。该病人目前处于
以划拨方式取得土地使用权的,转让房地产时应当按照国务院的规定报有批准权的人民政府审批。有批准权的人民政府准予转让的,应当由()办理土地使用权出让手续,并依照国家有关规定缴纳土地使用权出让金。
上海证券交易所的运作系统常由交易主机、交易大厅、参与者交易业务单元或交易席位、报盘系统及相关的通信系统组成。
()是批量增大的优点。
甲乙结婚以后,乙的父母于2015年11月1日出资80万为甲乙购买了一套房屋,房产登记在乙的名下,由于甲外出打工,乙在娘家居住,经甲乙夫妻协商将房屋出租。2016年4月,因甲在外打工期间和他人同居,乙提起诉讼离婚,法院判决离婚。下列说法不正确的是()
A、Howtodepositmoneyfromabank.B、Howtodecidewhichbankisthebest.C、Howtoattractcustomerstoabank.D、Howtoadver
Inbringingupchildren,everyparentwatcheseagerlythechild’sacquisition(习得)ofeachnewskill--thefirstspokenwords,th
最新回复
(
0
)