首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下程序: Option Base 1 Private Sub Form Click() Dim a(5)As String,i As Integer For i=1 TO 5 a(i)=Chr(Asc("A")+i)
设有如下程序: Option Base 1 Private Sub Form Click() Dim a(5)As String,i As Integer For i=1 TO 5 a(i)=Chr(Asc("A")+i)
admin
2012-12-21
47
问题
设有如下程序:
Option Base 1
Private Sub Form Click()
Dim a(5)As String,i As Integer
For i=1 TO 5
a(i)=Chr(Asc("A")+i)
Call f(a,i)
Next i
End Sub
Sub f(ta()As String,n AS Integer)
Dim i As Integer
F0r i=1 TO n
PriDt ta(i):
Next i
Print
End Sub
对上述程序,以下叙述中正确的是( )。
选项
A、程序有错,因为在过程f的定义中数组参数格式不正确
B、程序可正常运行,输出内容的第一行是一个字母“A”
C、程序可正常运行,输出内容的第一行是一个字母“B”
D、程序可正常运行,输出内容的第一行是数字65
答案
C
解析
Chr是Ascii码转成字符.Asc-是讲字符转成Asc。fi码。i是1到5的循环,仍然是一个数。a数组就是B、C、D、E、F这5行字符。第一行是B,程序运行后,5行分别是B,BC,13CD,BCDE,BCDEF。
转载请注明原文地址:https://kaotiyun.com/show/MNhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
在窗体上画一个名称为Command1的命按钮,然后编写如下事件过程:PrivateSubCommand1_Click()StaticxAsIntegerCls
以下关于Msg.Box的叙述中,错误的是
数据库模型提供了两层映像功能,内模式到模式间的映像使得数据存储结构改变时,逻辑结构不变,因而相应的应用程序也不必改变,这是数据库的【】独立性。
执行以下程序段 DimxAsInteger,iAsInteger x=0 Fori=20To1Step-2 x=x+i\5 Nexti后,x的值为
在窗体上画一个名称为List1的列表框,一个名称为Label1的标签,列表框中显示若干个项目。当单击列表框中的某个项目时,在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是
下列哪个是面向对象程序设计不同于其他语言的主要特点?
在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮,再画7个标签,其中5个标签组成名称为Label1的控件数组;名称为Label2的标签用于显示计算结果,其Caption属性的初始值为空;标签Label3的标题为“计算结果”。运行程序时会
在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Pfivme Sub Command1_Click( ) score=Iht(Rnd*10)+70 SelectC
下列表达式的值为Tme的是()。
随机试题
不受力时单圈弹簧管式压力表弹簧管横接面为()。
Shedidnotwanttosharetheroomwithherbrotherbecauseshecouldnot______hisbadhabits.
对于24小时以内的开放性眼球损伤,不适当的检查是
患者女性,45岁。术中失血较多,需输入500ml血,以下有关输血前准备及输血中操作不正确的是
肿瘤标志物联合基本原则是选用()个不同性质、互补的、相对敏感的标志物组成标志群。
下列关于佣金的收取时间的表述中,正确的是()。[2008年考试真题]
小王:在这次年终考评中,女员工的绩效都比男员工高。小李:这么说,新入职员工中绩效最好的还不如绩效最差的女员工。以下哪项如果为真,最能支持小李的上述论断?
Itmaybesummertime,butthelivingisn’teasy—notforwearyworkerswhoselastvacationisadistantmemory.Accordingtoone
将考生文件夹下FVP文件夹中的文件ZUO.ARJ复制到同一文件夹下,并命名为BEER2.ARJ。
Thefollowingareallcorrectresponsesto"Whotoldthenewstotheteacher?"EXCEPT
最新回复
(
0
)