首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base1 Private Sub Command1_Click() Dim a(4,4)As Integer For i=1 To 4 For j=1 To 4 a(i,j
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base1 Private Sub Command1_Click() Dim a(4,4)As Integer For i=1 To 4 For j=1 To 4 a(i,j
admin
2019-07-30
31
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:
Option Base1
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
解析
随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数,本题中产生的整数不会大于99;后一个二重循环用于遍历整个二维数组并且进行比较,如果数组元素的值大于x则成为新的最大值,小于y则成为新的最小值,循环结束后x是二维数组各元素中的最大数,y是二维数组各元素中的最小数。s中存放的是二维数组对角线元素之和。
转载请注明原文地址:https://kaotiyun.com/show/OeUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
滚动条可以响应的事件是
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text="程序设计"Text1.SetFocusEndSubPriv
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c=1234c1=Trim(Str(c))Fori=1To4Print
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString.strLAsIntegertStr=""strL=Len(xStr)i=1
以下表达式与Int(3.5)的值相同的是
鼠标拖放控件要触发两个事件,这两个事件是
在设计阶段,假定在图片框Picturel中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
表达式Sgn(0.25)的值是
下面不属于需求分析阶段任务的是
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序:PrivateSubCommandl_Click()Dimst
随机试题
肠出血性坏死可发生于
下列哪项不是中风中经络的主症()
国内第一只上市的开放式基金为()。
在进行培训需求分析时,排他分析是指排除由于()影响绩效而申报的培训意向。
求下列函数的导数.
根据下列材料回答问题。2012年1--4月,该市平均每天观看电影的观众超过10万人次的月份有几个?()
要将VisualFoxPro系统菜单恢复成标准配置,可以先执行【】命令,再执行SETSYSMENUTODEFAULT命令。
有以下程序:#include<string.h>main(intargc,char*argv[]){inti,len-0;for(i=l;i<argc;i+=2)len+=strlen(argv
England’sbinge-drinkinghabitisoneofthemostentrenchedinEurope—evenRomaninvaderswroteaboutitwithhorror.Manyfear
TheChamberofCommerceforthecityofMillwoodhasreceivedpreliminarystudiesontheleasecostforcommercialproperties.S
最新回复
(
0
)