首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 T0 5 a(i)=Chr(Asc("A"
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 T0 5 a(i)=Chr(Asc("A"
admin
2013-01-23
33
问题
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 T0 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是______。
选项
A、ABCDE
B、1 2 3 4 5
C、abode
D、出错信息
答案
A
解析
本程序段首先定义了一维数组a,然后用For循环为其赋值,Asc()函数的作用是返回字符的ASCII码,字符“A”的ASCII码为65,Chr()函数的作用是将ASCII码值变为相应的字符,而“a(i)=Chr(Asc("A")+(i-1))”的作用是将每次比原来大1的ASCII码值变为字符赋给a,所以a的元素是A、B、C、D、E。For Each-In用于输出a中元素的值。
转载请注明原文地址:https://jikaoti.com/ti/nwO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行以下Command1的Click事件过程,在窗体上显示OptionBase0PrivateSubCommand1_Click()Dimaa=Arr
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsInteger,yAsInteger
在以下事件中,Private表示PrivateSubsub1(xAsInteger,yAsInteger)...EndSub
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()Fori=1To4Ifi=1Thenx=iIfi<
在窗体上画一个命令按钮和一个文本框,并将窗体的KeyPreview属性设置为True,然后编写如下代码:DimSaveAllAsStringPrivateSubForm_Load()ShowText1.
为了使窗体的大小可以改变,必须将它的BorderStyle属性设置为
设有如下程序:PrivateSubForm_Click()a=325456PrintFormat(Int((a*10+0.5))/10,"000,000.00")EndSub程序运行后,单击窗体,
软件开发环境是全面支持软件开发全过程的【】集合。
随机试题
中外合作经营企业的外国合作者在合作期限内先行回收投资的法定条件是:()
产后随子宫蜕膜脱落,含有血液、坏死蜕膜等组织及黏液经阴道排出,称为________
小组规模通常以多少位学员最合适【】
A.α受体阻滞药B.β受体阻滞药C.钙拮抗药D.利尿药E.血管紧张素转换酶抑制药治疗高血压伴心率过快,应首选
建设项目通过()体现国家经济建设的方针政策和建设业主的投资建设目标。
某小汽车生产企业为增值税一般纳税人,2012年度自行核算的相关数据为:全年取得产品销售收入总额68000万元,应扣除的产品销售成本45800万元,应扣除的营业税金及附加9250万元,应扣除的销售费用3600万元、管理费用2900万元、财务费用870万元。另
下列关于票据贴现与转贴现的表述中,不正确的是()。
已知点A(1,2),B(一2,一2),若直线l:y=k(x+1)一1与线段AB相交,则k的取值范围是().
血管对于()相当于()对于城市
NewYear’sEverequirestheultimatepartyoutfit.Butwhatifyourholidayspendinghasburnedholesinyourpockets?Thea
最新回复
(
0
)