下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim max As Integer 　　Randomi

admin2013-04-11 24

问题下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。
Private Sub Form_Click()
Dim an(10)As Integer
Dim max As Integer
　　Randomize
　　For i %=1 To 10
　　　　an(i%)=______
　　Next
　　max=an(1)
　　For i%=2 to 10
　　　　ifan(i%)＞max then
　　　　　　max=an(i%)
　　　　End If
　　Next
　　Print max
End Sub

选项

答案Int(Rnd*1000)

解析

转载请注明原文地址:https://jikaoti.com/ti/8sO0FFFM

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

软件测试是保证软件质量的重要手段，而软件测试的主要和重要的测试方法是通过测试数据和【】的设计来实现。
在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句：______。
下列程序段的执行结果为______。A="abcd"B="bcde"E=Right(A，3)"F=Mid(B，2，3)IfE＜FThenPrintE+FElsePrintF+E
在窗体上面有一个列表，然后编写如下两个事件过程：PrivateSubForm_Click()List1.RemoveItem1：List1.RemoveItem2List1.RemoveItem3En
当对象得到焦点时，会触发GotFocus事件，当对象失去焦点时将触发【】事件。
阅读下面的程序段，执行上面的三重循环后，a的值为______。Fori=1To3Forj=1ToiFork=jTo4a=a+1NextkNe
在软件危机中表现出来的软件成本高的问题，其原因是______。
关系操作的特点是【】操作。
执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量strInput的内容是：______。atrInput=InputBox(“请输入字符串”，“字符串对话框”，“字符串”)

随机试题

来源于历史事件的成语是()
宜睡前服的药是
根据现行增值税的规定，下列说法正确的是()。
甲、乙、丙三人投资设立了一家普通合伙企业。后甲在向丁借款时，以其在合伙企业中的财产份额出质，合伙人乙和丙得知后表示反对。对此，下列各项中正确的有()。
甲企业为增值税一般纳税人，适用的增值税税率为13％。发出商品成本按月末一次加权平均法计算确定，原材料采用计划成本法核算。2019年12月该企业发生如下经济业务：(1)1日，库存商品结存数量为1000件，单位生产成本为21元；本月生产完工验收入库
根据增值税和消费税法律制度的规定，下列环节既征消费税又征增值税的有()。
9x一4．3x+3=0的解为()．
利用图片、图表、模型、幻灯片、电影、电视等手段进行教学的直观类型是()。
看待社会公正问题．应防止落入平均主义这种无论在历史上还是在现实中都颇具诱惑力的窠臼中。虽然平均主义在某些领域是适用的，但若将其推广到所有领域尤其是分配领域，否认人的差别而要求平均分享一切，最终只会扼制人的积极性，扼杀社会发展的活力，不利于社会公正的实现。这
ThethousandsofvolcanicislandsandcoralatollsoftheSouthSeashaveatotalpopulationofaboutfourmillion,butthepauc

最新回复(0)

下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim max As Integer Randomi

二级VB

NCRE全国计算机二级

软件测试是保证软件质量的重要手段，而软件测试的主要和重要的测试方法是通过测试数据和【】的设计来实现。

在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句：______。

下列程序段的执行结果为______。A="abcd"B="bcde"E=Right(A，3)"F=Mid(B，2，3)IfE＜FThenPrintE+FElsePrintF+E

在窗体上面有一个列表，然后编写如下两个事件过程：PrivateSubForm_Click()List1.RemoveItem1：List1.RemoveItem2List1.RemoveItem3En

当对象得到焦点时，会触发GotFocus事件，当对象失去焦点时将触发【】事件。

阅读下面的程序段，执行上面的三重循环后，a的值为______。Fori=1To3Forj=1ToiFork=jTo4a=a+1NextkNe

在软件危机中表现出来的软件成本高的问题，其原因是______。

关系操作的特点是【】操作。

执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量strInput的内容是：______。atrInput=InputBox(“请输入字符串”，“字符串对话框”，“字符串”)

来源于历史事件的成语是()

宜睡前服的药是

根据现行增值税的规定，下列说法正确的是()。

甲、乙、丙三人投资设立了一家普通合伙企业。后甲在向丁借款时，以其在合伙企业中的财产份额出质，合伙人乙和丙得知后表示反对。对此，下列各项中正确的有()。

根据增值税和消费税法律制度的规定，下列环节既征消费税又征增值税的有()。

9x一4．3x+3=0的解为()．

利用图片、图表、模型、幻灯片、电影、电视等手段进行教学的直观类型是()。

ThethousandsofvolcanicislandsandcoralatollsoftheSouthSeashaveatotalpopulationofaboutfourmillion,butthepauc

下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim max As Integer 　　Randomi