首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下程序代码: Private Sub Command1_Click() Dim ch As String Dim num(26) As Integer ch = InputBox("") Call p(num, ch)
设有如下程序代码: Private Sub Command1_Click() Dim ch As String Dim num(26) As Integer ch = InputBox("") Call p(num, ch)
admin
2020-07-22
20
问题
设有如下程序代码:
Private Sub Command1_Click()
Dim ch As String
Dim num(26) As Integer
ch = InputBox("")
Call p(num, ch)
For k = 1 To 26
If num(k) > 0 Then Print num(k);
Next k
End Sub
Private Sub p(a() As Integer, ch As String)
For k = 1 To Len(ch)
st = Mid(ch, k, 1)
If st >= "a" And st <= "z" Then
n = Asc(st) - Asc("a") + 1
a(n) = a(n) + 1
End If
Next k
End Sub
若Command1_Click过程运行时的输入是:program,则产生的输出是
选项
A、1 1 1 1 1 2
B、program
C、1 1 1 1 1 1
D、1 2 1 1 1 2
答案
A
解析
Len(ch)计算program的字符数为7,num(26)数组用来统计每个字符出现的次数,Asc()函数用来返回指定字符的ASCII码值。程序开始执行,输入字符串"program"给变量ch,然后调用过程p,调用开始时实参num()将地址传给形参a(),实参ch将地址传给形参ch。程序开始执行过程p:首先进入For循环,k取值从1到7。当k=1,st=mid(ch,k,1)="p",判断If条件为真,执行n=Asc(st)-Asc("a")+1=16,a(16)=0+1=1;当k=2,st=mid(ch,k,1)="r",判断If条件为真,执行n=Asc(st)-Asc("a")+1=18,a(18)=0+1=1;当k=3,st=mid(ch,k,1)= "o",判断If条件为真,执行n=Asc(st)-Asc("a")+1=15,a(15)=0+1=1;依次执行,当k=7执行最后一次循环结束。a()数组中存放的值为字符串ch中每个字符出现的次数。最后程序返回Command1_Click过程。For循环将数组中非0元素依次打印输出。故答案为A选项。
转载请注明原文地址:https://kaotiyun.com/show/WcHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是
以下关于多重窗体程序的叙述中,错误的是
下列叙述中正确的是
在VB中,函数过程与子程序过程的区别之一是
设在一个工程的窗体中有如下代码:PublicxAsIntegerPrivateSubForm_Load()DimYAsIntegerEndSub在该工程的标准模块的声明部分有代码:PublicaAsInteger:P
窗体上有一个由两个文本框组成的控件数组,名称为Textl,并有如下事件过程:PrivateSubTextl_Change(IndexAsInteger)SelectCaseIndex
在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若Y代表年份,下面判断闰年的正确表达式是
软件生命周期是指()。
软件测试的目的是
随机试题
对车床外露的滑动表面擦净后用油壶浇油进行润滑,称为溅油润滑。()
临床治疗妇女月经不调,常使用活血调经药。症见经血色淡夹有瘀块,面色萎黄者。应选用的药物是()。
患者,男,40岁,午后呕吐3次,腹泻5次,经输液治疗后,夜间吐泻未作,天明前左腿抽筋2次,起床后仍感疼痛。医生建议选用木瓜治疗。上述患者的病证可概括为()。
某证券公司使用自有资金以客户张某的名义买入某公司股票30手,对该行为如何定性?()
下列说法中正确的是()。
数据库保护包括的内容有()。(1)安全性保护(2)完整性保护(3)并发控制(4)恢复
给定材料材料12019年,中国消费增长的规模继续扩大,消费结构不断升级,成为中国经济平稳健康增长的重要压舱石。据国家统计局公布的数据显示,2019年上半年消费对经济增长的贡献率超过60%,第一动力强劲。各省份将促消费作为今后的重要发力点
一个正在访问l临界资源的进程由于申请等待IO操作而被中断时,它是()。
习近平总书记指出:“有事好商量,众人的事情由众人商量,是人民民主的真谛。”在人民内部各方面广泛商量的过程,就是
Wal-Mart[A]Wal-Martismorethanjusttheworld’slargestretailer.Itisaneconomicforce,aculturalphenomenonandalightn
最新回复
(
0
)