首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim a(3,3)As Integer,b(3,3)As Integer For i=1 To 3 For j=1 To 3 a(i,j)=i+j:b(i,j)=a(i,j)+i*
编写如下程序: Private Sub Command1_Click() Dim a(3,3)As Integer,b(3,3)As Integer For i=1 To 3 For j=1 To 3 a(i,j)=i+j:b(i,j)=a(i,j)+i*
admin
2019-07-30
51
问题
编写如下程序:
Private Sub Command1_Click()
Dim a(3,3)As Integer,b(3,3)As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=i+j:b(i,j)=a(i,j)+i*(j-1)
Next j
Next i
For i=1 To 3
For j=1 To 3
Print b(i,j);
Nex tj
Print
Next i
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、2 3 4 3 4 5 4 5 6
B、2 4 6 3 6 9 4 8 12
C、3 5 7 5 8 11 7 11 15
D、4 6 8 7 10 13 10 14 18
答案
B
解析
本题中有两个二维数组a和b,然后用一个二重循环为两个数组赋值,根据每次循环中i和i的值不难得出B为正确答案。
转载请注明原文地址:https://kaotiyun.com/show/YaUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有2个名称分别为Text1和Text2的文本框。编写如下程序:PrivateSubForm_Load()PrivateSubCommand1_Click()Text1.Text=””
窗体上有一个名称为CD1的通用对话框,一个名称为Text1的文本框,窗体的单击事件过程如下:PrivateSubForm_Click()CD1.DialogTitle="改变颜色":CD1.Color=Form1.BackColor
通用对话框Filter属性的作用是
窗体上有1个名称为CD1的通用对话框,1个名称为Command1的命令按钮。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()CD1.FileName=""CD1.Filter="AllFi
窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序:PrivateSubCommand1click()DimnIfText1.Text"123456"Thenn=n+1:Print”口
以下关于变量作用域的叙述中,错误的是
假定有以下通用过程:FunctionFun(nAsInteger)AsIntegerx=n*n:Fun=x-11EndFunction在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:PrivateSub
已知:x=6y=39则表达式“y\x*Sgn(x)”的值为
窗体上有一个名称为Combo1的组合框,为了引用Combo1中最后一个列表项,应使用的表达式是
在关系代数运算中,有5种基本运算,它们是()。
随机试题
试用教育相关理论分析下列材料所反映出来的问题。家庭教育研究专家赵忠心在接受《中国教育报》采访时曾说过:“有一些家长,孩子上了大学,上了清华、北大、哈佛、牛津,就把功劳都记录在自己的功劳簿上。这不是实事求是的态度。单靠哪一个家长就能把孩子送入大学?
考核车床工作精度时,可以不考虑加工表面粗糙度。()
在Access2010中,不属于逻辑数据模型的有________。
刺激迷走神经可用于治疗
A.清热解毒,凉血消斑B.清热解毒,疏散风热C.清热解毒,利咽开音D.清热解毒,消痈排脓大青叶、青黛功效的共同点是
睾酮主要由哪种细胞分泌
休克早期的临床表现是()。
巴塞尔委员会发布的《有效银行监管核心原则》是国际银行业良好监管实践的最高标准。()
吴先生分配至SM公司工作,2000年3月被借调到SM公司上级公司的交易部(以下简称交易部)工作,2001年3月起,吴先生离开交易部,与好友一起从事商贸话动。2001年4月,SM公司在实行全员劳动合同制时与吴先生签订了无固定期限劳动合同。2002年
Howmanytimedoyouspendwithyourparents?【M1】______Yourparentsareyourdearerpeopleintheworld
最新回复
(
0
)