填空题
下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及经在原来12
option Base 1
Private Sub Form_Click()
Dim x
x = Array(57,-9, 17,42, -31,46, 11, 8, 6, -4, 3,90)
Max=1
For k=2 To 10 Step 1
If x(k) > x(Max) Then
______
End If
Next k
y=______
Print Max, y
End Sub
【参考答案】
Max=k x(Max)
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。请填空。 Private Sub Form_Load0 Picture1.Picture=LoadPicture( c: My Docunents 图片 Qian1_Icon02.ico ) ______ End Sub Private Sub Timer1_Timer() Static x, y As Integer x=x+300 y=y+300 Picture1.Move x, y End Sub
点击查看答案&解析
填空题
表达式 12345 <> 12345 & ABC 的值是______。
点击查看答案&解析
相关试题
下列描述不正确的是( )。
对于长度为n的线性表,在最坏情况下,下列...
按文件的内容划分有( )。
下列选项中,不是一个算法的基本特征的是(...
某人在窗体上画了一个名称为Timer 1的计...