题目内容

设有如下程序 Private Sub Search(a()As Variant,ByVa1 key As Variant,index%) Dim I% For I=LBound(A)To UBound(a) If key=a(1) Then index=I Exit Sub End If Next I index=I End Sub Private Sub Form_Load() Show Dim b() As Variant Dim n As Integer b = Array(1,3,5,7,9,11,13,15) Call Search(b, 11 ,n) Print n End Sub程序动行后,输出结果是【 】。

查看答案
更多问题

装于汽车发电机内部的调节器是()。

A. FT61型
B. JFT106型
C. 集成电路调节器
D. 晶体调节器

以下程序的功能是:从键盘上输入若干个学生的考试分数,当输入负数时结束输入,然后输出其中的最高分数和最低分数。请在【 】和【 】处填入适当的内容,将程序补充完整。 Private Sub Form_Click() Dim x As Single,amax As Single,amin As Single x=Input Box("Enter a score") amax=X amin=x Do While【 】 If x>ama x Then Ama x=x End lf If【 】Then amin=X End lf x=Input Box("Enter a score") Loop Print”Max=";amax,"Min=";amin End Sub

液压制动系统在()之前,一定要排出管道中的空气。

A. 装车
B. 检修
C. 修理后
D. 装配

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1变为可用。请在【 】处填入适当的内容,将程序补充完整。 Private Sub Form_Load() Command1.Enabled=False End Sub Private Sub Text1【 】() Command1.Enabled=True End Sub

答案查题题库