首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多砬整数") For k=1 To Len(x) b=Mid(x,
有下面程序代码: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多砬整数") For k=1 To Len(x) b=Mid(x,
admin
2019-03-08
28
问题
有下面程序代码:
Option Base 1
Private Sub Commandl_Click()
Dim a(10)As Integer,x,b
x=InputBox("请输入一个多砬整数")
For k=1 To Len(x)
b=Mid(x,k,1)
a(Val(b)+1)=a(Val(b)+1)+1
Next k
For k=1 To 10
Print a(k):
Next k
End Sub
程序运行时,单击命令按钮Commandl,输入2355270224,则输出是
选项
A、1 0 4 1 1 2 0 1 0 0
B、0 4 1 1 2 0 1 0 0 0
C、2 3 5 5 2 7 0 2 2 4
D、4 2 2 O 7 2 5 5 3 2
答案
A
解析
InputBox函数将会返回用户在输入对话框中输入的文本,以字符串的形式返回:在第一个For循环中从前到后依次取出字符串中的每一位数字,然后令对应的数组元素自加1,其中数组的第一位放的是0的个数,所以循环结束后数组中存放的是各个数字出现的个数。
转载请注明原文地址:https://kaotiyun.com/show/oZFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1Click() Dima&,s&,k& s=1 a=2 Fork=2To10
设a=2,b=3,c=4,d=5,下列表达式的值是( )。a>bAndc<=dOr2*a>c
下列关于栈的叙述中,正确的是
以下关于过程及过程参数的叙述中,错误的是
以下关于图片框、图像框的叙述中,正确的是
VB中,若没有显式声明变量的数据类型,则默认的类型是
为了返回或设置磁盘驱动器的名称,应使用的驱动器列表框的属性是
在For的二重循环中,内外循环的循环控制变量名
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文
(1)在名称为Form1的窗体上添加一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图所示。要求:程序中不得使用变量,每个事件过程
随机试题
计算定积分
主要化学成分为苦参碱和氧化苦参碱的中药是
缝焊时,根据焊件厚度不同,要控制间隙,一般低碳钢间隙为()mm。
A.后跟、解溪B.肩井、肩外髑C.肘俞、曲池D.环跳E.膝上、膝下治疗犬前肢神经麻痹、肘部疼痛宜选
当环境温度低于皮肤温度时,人体散热的主要方式是
某水利水电枢纽工程由拦河坝、电站等建筑物组成。拦河坝为碾压土石坝、最大坝高60m,坝前设护砌工程,坝后排水工程中采用软式排水管。工程共划分为拦河坝、电站等六个单位工程。施工单位在工程开工前根据《水利工程建设重大质量与安全事故应急预案》(水建管[2006]2
甲、乙、丙、丁四人出资设立A有限合伙企业,其中甲、乙为普通合伙人,丙、丁为有限合伙人。合伙企业存续期间,发生以下事项:(1)6月,合伙人丙同A合伙企业进行了120万元的交易,合伙人甲认为,合伙协议对此没有约定,因此,有限合伙人丙不得同本合伙企业进行交易。
运用企业平衡计分卡的前提条件不包括()。
下列不属于有色金属的是()。
CarsaccountforhalftheoilconsumedintheU.S.,abouthalftheurbanpollutionandonefourththegreenhouse(温室)gases.T
最新回复
(
0
)