首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
命令按钮Command1的单击事件过程如下: Private Sub Command1_Click() Dim a(10,10)AsI nteger x=0 For i=1To3 For j=1To3 a(i,j)=i*2Mod j If x<a(i,j)
命令按钮Command1的单击事件过程如下: Private Sub Command1_Click() Dim a(10,10)AsI nteger x=0 For i=1To3 For j=1To3 a(i,j)=i*2Mod j If x<a(i,j)
admin
2018-06-20
40
问题
命令按钮Command1的单击事件过程如下:
Private Sub Command1_Click()
Dim a(10,10)AsI nteger
x=0
For i=1To3
For j=1To3
a(i,j)=i*2Mod j
If x<a(i,j)Then x=a(i,j)
Next
Next
Print x
End Sub
执行上述事件过程后,窗体上显示的是( )。
选项
A、1
B、2
C、3
D、4
答案
B
解析
题目中定义了一个二维数组,为数组赋初值并找出这些值中最大的值输出。数组中的值为:
a(1,1)=1*2mod1=0a(1,2)=1*2mod2=0a(1,3)=1*2mod3=2
a(2,1)=2*2mod1=0a(2,2)=2*2mod2=0a(2,3)=2*2mod3=1
a(3,1)=3*2mod1=0a(3,2)=3*2mod2=0a(3,3)=3*2mod3=0
显然最大值为2,因此Print x语句将在窗体上显示2。
转载请注明原文地址:https://kaotiyun.com/show/E4Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有一个名称为Listl的列表框和一个名称为Checkl的复选框数组(下标从0开始)。程序运行时,单击某个复选框,如果列表框中没有该复选框的标题,则把该复选框的标题添加到列表框中,否则从列表框中把该复选框标题删除。PrivateSubC
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:PrivateSubCommand1_Click()n%=List1.ListlndexIfn>0Then
为了删除列表框中的一个列表项,应使用的列表框方法是
设有如下程序:OptionBase0PrivateSubForm_Click()DimaDimiAsIntegera=Array(1,2,3,4,5
编写如下事件过程:PrivateSubForm_Activate()Dimscore(1To3)AsIntegerDimiASInteger.tAsVariantFori=3T
在窗体上画1个文本框,名称为Textl,然后编写如下程序:PrivateSubFormLoad()Open”C:\dat.txt”ForOutputAs#1Textl.Text=””
以下合法的VB变量名是()。
设窗体文件中有下面的事件过程:PnvateSubCommandl_Click()DimSa%=100PrintaEndSub其中变量a和s的数据类型分别是()。
下列合法的变量名是
随机试题
试述媒介广告的真实、负责、公正、正派。
在Word2010中,要给相邻的三个页面分别加上不同的页眉,则在设置页眉前应进行的操作是______________。
有关胃的叙述,错误的是
如图所示的机构中,已知:Q=10kN,动摩擦系数f’=0.5,L=2m,r=0.5m,物块C向上作匀速滑动。则在图示位置时,绳索拉力T、力偶矩M为()。
下列关于商业汇票保证的表述,正确的是()。
甲公司向乙银行借款100万元,双方协商一致以甲公司所有的小汽车设定质押,双方尚未签订书面质押合同时,甲公司即将小汽车送至乙银行指定车库,乙银行查验后入库保存;次日,甲公司在书面质押合同上签字盖章后交给乙银行,乙银行依照内部程序进行审批,于1周后在书面质押合
针对请示的内容主要涉及的两个方面,批复也可分为()。
昆西教学法
若已知a=10,b=20,则表达式!a<b的值为【】。
Atsometimeinyourlifeyoumayhaveastrongdesiretodosomethingstrangeorterrible.【C1】______.chancesarethatyoudon
最新回复
(
0
)