问题描述:
[填空]
下面程序的功能是找出给定的10个数中最大的一个数,最后输出这个数以及它在原来10个数中的位置。请在下划线处填入适当的内容,将程序补充完整。 Option Base 1 Private Sub Form_Click()Dim X x=Array(23,-5,17 ,38,-31,46,11,8,5,-4)Max=1 k=1 10k=k+1 if x(k)>x(Max)then ()End if If k<10 then goto 10 y= ()Print y,Max End Sub
参考答案:查看无
答案解析:无
☆收藏
答案解析:无
☆收藏
上一篇:根据页面布局需要,调整邀请函中“企业年度联欢晚会”和“邀请函”两个段落的间距。
下一篇:下面程序段,运行后的结果是 Private Sub Command1_Click()Dim b%(1 To 4),i%, t# For i = 1 To 4b(i)=i Next t =Tof(b())Print "t ="; t, End Sub Function Tof(a()As Integer)Dim t#, i% t=1 For i =2 To UBound(
- 我要回答: 网友(18.223.206.84)
- 热门题目: 1.在VBScript中,我们用 2.算法的基本特征包括:()() 3.若有定义:int a[4][