首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
命令按钮Commandl的单击事件过程如下: Private Sub Command1_Click() Dim a(10,10)As Integer x=0 For i=1 To 3 For j=l To 3
命令按钮Commandl的单击事件过程如下: Private Sub Command1_Click() Dim a(10,10)As Integer x=0 For i=1 To 3 For j=l To 3
admin
2019-08-21
63
问题
命令按钮Commandl的单击事件过程如下:
Private Sub Command1_Click()
Dim a(10,10)As Integer
x=0
For i=1 To 3
For j=l To 3
a(i,j)=i*2 Mod j
If x
Next
Next
Print x
End Sub
执行上述事件过程后,窗体上显示的是( )。
选项
A、1
B、2
C、3
D、4
答案
B
解析
题目中定义了一个二维数组,为数组赋初值并找出这些值中最大的值输出。数组中的值为:
a(1,1)=1*2 mod 1=0a(1,2)=1*2 mod 2=0a(1,3)=1*2 mod 3=2
a(2,1)=2*2 mod l=0a(2,2)=2*2 mod 2=0a(2,3)=2*2 mod 3=1
a(3,1)=3*2 rood 1=0a(3,2)=3*2 mod 2=0a(3,3)=3*2 mod 3=0
显然最大值为2,因此Print x语句将在窗体上显示2。
转载请注明原文地址:https://kaotiyun.com/show/XdUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下:PrivateSubCommandlClick()Dimx1AsInteger,x2AsInteger,x3AsInteger
计算下面分段函数的正确语句是
设窗体中有一个文本框Text1,若在程序中执行了Text1.SetFocus,则触发
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:PrivateTypeRecordIDAsInteger:NameAsString*20EndTypePrivateSubCoremandlClick()
下列有关文件的叙述中,正确的是
以下不能输出“Program”的语句是
下列工具中,不属于结构化分析的常用工具的是()。
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,如图所示,对应的事件过程是()。
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
在VisualBasic中,表达式3*2\5Mod3的值是
随机试题
某酒厂生产的“天宝”牌葡萄酒,其包装正面和两侧的图形、字体、色彩均与已经在我国注册的驰名商标“万宝路”牌卷烟盒相近似,其封口上印的标识也与“万宝路”卷烟封口相近似。该厂所在地的:工商行政管理局发现后,责令该厂停止销售这种葡萄酒,收缴其全部外包装,并处以罚款
Thedrunkmanwasrunningfromsidetosideinthecrowdandheknockedinto______.
构成腹外疝疝环的结构是
A.上中切牙B.上侧切牙C.上尖牙D.下中切牙E.下尖牙全口义齿排牙颈部向唇侧突出,且颈部稍向远中,牙尖在平面上的人工牙是
(2008年)在一定温度下,某反应的标准平衡常数Kθ的数值()。
张某有200万元资金,打算在烟台投资设立一家注册资本为300万元左右的餐饮企业。如张某与王某、李某、赵某共同出资设立了一家特殊普通合伙企业。在执业过程中,张某因重大过失给合伙企业造成了17万元的债务,王某与李某二人因轻微过失给合伙企业造成了20万元的债
注册会计师实施的实质性测试,其性质、时间和范围的确定,最终取决于根据固有风险和控制风险的综合水平所确定的可接受的检查风险。如果可接受的检查风险较高,则实质性测试的性质应以余额测试为主,时间应以期末审计和期后审计为主。( )
下列事件的最佳逻辑排列顺序是()。①司机们接受了新型汽油②某种汽油对大气污染严重③用户认为价格太贵,不愿使用④厂家采用新技术降低成本⑤专家研制出某种新型低污染汽油
窗体有命令按钮Commandl和文本框Textl,对应的事件代码如下:PrivateSubCommandl_Click()Fori=1To4x=3Forj=1To3Fork=1To2
Accordingtothetalk,theownerofabikehasto______.
最新回复
(
0
)