首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base 1 Private Sub Command1_Click() Dim a(4, 4) As Integer For i = 1 To 4
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base 1 Private Sub Command1_Click() Dim a(4, 4) As Integer For i = 1 To 4
admin
2020-06-30
36
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:
Option Base 1
Private Sub Command1_Click()
Dim a(4, 4) As Integer
For i = 1 To 4
For j = 1 To 4
a(i, j) = Int(Rnd * 100)
Next
Next
x = a(1, 1)
y = a(1, 1)
For i = 1 To 4
For j = 1 To 4
If x < a(i, j) Then x = a(i, j)
If y > a(i, j) Then y = a(i, j)
Next
s = s + a(i, i)
Next
Print x, y, s
End Sub
关于以上程序,以下叙述中错误的是
选项
A、二维数组元素的值是不大于99的随机整数
B、计算结果x是二维数组各元素中的最大数
C、计算结果y是二维数组各元素中的最小数
D、计算结果 s是二维数组各行第一个元素之和
答案
D
解析
程序首先通过For循环给数组a元素赋值。取随机数函数返回的值介于0和1之间。乘以100后取整介于0和99。故A)正确。接下来对x和y赋初值(a的第一个元素),在循环内部进行数据大小的比较,把当前比x大的存入x,比y小的存入y,循环结束后,x中存储的是最大值,y中存储的是最小值。故B),C)对。s中存储一维和二维下标相同的数组元素的和。选D)。
转载请注明原文地址:https://kaotiyun.com/show/96Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮执行以下程序,则输出结果为()。PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=14:y=48:CallProc(x,y)P
在窗体上画一个名为Commandl的命令按钮,然后编写以下程序:PrivateSubCommandl—Click()DimM(10)AsIntegerFork:lTo10M(k)=12-kNe
在窗体上画一个文本框,其名称为Text1,然后编写以下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSubPrivateSubText1
编写如下程序:PrivateSubCommand1_Click() DimxAsInteger,yAsInteger x=InputBox("输入第一个数") y=InputBox("输入第二个数") Callf(x,
以下关于文件的叙述中,错误的是( )。
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Text1.Text=p2(p1(
下列关于类、对象、属性和方法的叙述中,错误的是()。
某二叉树共有845个结点,其中叶子结点有45个,则度为1的结点数为
有三个关系R、S和T如下:其中关系T由关系R和S通过某种操作得到,该操作为()。
一棵二叉树中共有70个叶子结点与80个度为1的结点,则该二叉树中的总结点数为
随机试题
血氧容量(oxygenbindingcapacityinblood)
如何对类风湿关节炎病人进行关节护理?
下列均可导致胎儿先天性畸形的病毒为
女性月经三月一次者称
男,52岁。颈肩痛3个月,并向左上肢放射。左上肢肌力下降,手指动作不灵活。颈椎棘突间有压痛,左手拇指感觉减弱。上肢牵拉试验阳性,压头试验阳性。最可能的颈椎病类型是
已知某理想气体的压强为P,体积为V,温度为T,k为玻耳兹曼常量,R为摩尔气体常量,则该理想气体单位体积内的分子数为()。
计算机技术用于会计工作的初期主要用于会计业务的()。
科目汇总表账务处理程序的优点是()。
新中国成立以来,我国小学教学改革所要解决的核心问题是改革()。
单个用户使用的数据视图的描述称为_________。
最新回复
(
0
)