首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base1 Private Sub Command1_Click() Dim a(4,4)As Integer For i=1To4 For j=1To4 a(i,j)=In
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base1 Private Sub Command1_Click() Dim a(4,4)As Integer For i=1To4 For j=1To4 a(i,j)=In
admin
2016-09-19
25
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:
Option Base1
Private Sub Command1_Click()
Dim a(4,4)As Integer
For i=1To4
For j=1To4
a(i,j)=Int(Rnd*100)
Next
Next
x=a(1,1)y=a(1,1)
For i=1To4
For j=1To4
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
解析
随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数,本题中产生的整数不会大于99;后一个二重循环用于遍历整个二维数组并且进行比较,如果数组元素的值大于x则成为新的最大值,小于y则成为新的最小值,循环结束后x是二维数组各元素中的最大数,y是二维数组各元素中的最小数。s中存放的是二维数组对角线元素之和。
转载请注明原文地址:https://kaotiyun.com/show/0pLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面的程序运行时,为了在窗体上输出“VB6.0”,应在窗体上执行的操作是()。PrivateSubForm_MouseDown(BuRonAsInteger,shiftAsInteger,xAsSingle,YAsSin
新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,Form1窗体消失,显示Form2窗体,程序如下,请填空。PrivateSubCommand1_Click() Form1.Hide F
下面四个选项,不是窗体属性的是()。
下列程序段的执行结果为()。ForX=5To1Step-1 ForY=1To6-X PrintTab(Y+5);"*" NextY PrintNextX
设计两CheckBox,一个显示粗体,一个显示斜体,通过对CheckBox的选择,在一个文本框中显示相应效果的文本,完成下列程序。PrivateSubForm_Load()Check1.Caption="显示粗体"Check2.
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程:PrivateSubCommand1_Click() DiminDataAsString Text1.Text=""
将一个窗体设置为MDI子窗体的方法是
下列程序段的执行结果为m=2n=3Do m=m+n n=n+1LoopWhilem<10Printm;n
下列程序运行时,若输入123,输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入") MsgBox(X1)EndSub
随机试题
形成“脐”状菌落的细菌是()
A.高锰酸钾B.石油醚C.氯化钾D.氰化钾E.氢氧化钠属于易爆的危险品是()。
依据标准的内容,我国现行的安全生产标准可以分为()等。
垂直于水流方向的围堰为()。
甲公司发生的下列交易中,不属于非货币性交易的是( )。
高速行驶的汽车突然刹车,坐在汽车里的人会向前倾。下列与之类似的现象是:
TheAmericans______GeorgeWashingtonasthefatheroftheircountry.
毛泽东在《(共产党人)发刊词》中所说的“伟大的工程”是指()
极限=().
A.Whatexactlyisscience?B.Howdoyoufindanexplanation?C.Whattopicsdoyouneed?D.Howdoyouansweryourchild’squestio
最新回复
(
0
)