首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下程序代码: 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
53
问题
设有如下程序代码:
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/jNHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于文件的叙述中,错误的是()。
窗体上有一个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。下列说法错误的是()。
程序运行时,要清除图片框Picture1中的图像,应使用语句()。
在菜单编辑器中建立如下图所示的菜单,并为了每个菜单项编写了鼠标单击事件过程。 关于此菜单,以下叙述中错误的是( )。
要将单选按钮Opt1设为被选中,应设置的属性是
软件生命周期是指( )。
实现字符的UniCode编码方式与ANSI编码方式相互转换的函数是()。
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。程序代码如下:Dimcolor(3)AsIn
(1)在考生文件夹下有一个工程文件sit3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标
以下选项中,不合法的VisualBasic的变量名是
随机试题
组织设计的统一指挥原则可以理解为()
用俞募配穴法治疗小儿遗尿选()
下列关于混凝土坝地基的开挖与清理的说法错误的是()。
会计电算化系统开发资料和会计软件系统也应视同会计档案保管,保管期截至该系统停止使用或有重大更改后10年。()
下列关于耕地占用税的征收管理的说法,正确的有()。
下列不属于会计计量属性的有()。
局里派你到企业调查拖欠民工工资问题,企业招待很周到,陪同全面,结果没有发现问题,问你接下来怎么处理?
我国历史上的原始人群时期,从距今一百七八十万年前开始,到距今四五万年前结束,相当于考古学上的()。
学术论文的基本类型主要有()。
CSMA/CD的访问控制方式是IEEE的(33)标准中制定的,其中的CSMA是指(34),CD是(35),当侦听到冲突时,(36)标准采用的是(33)继续侦听,发现冲突后采用的退避算法是(37)。
最新回复
(
0
)