填空题: 以下程序的功能是:从键盘上输入若干个学生的考试分数,当输入负数时结束输入,然后输出其中的最高分数和最低分数。请在空白处填入适当的内容,将程序补充完整。 Pr

  • 题目分类:计算机考试
  • 题目类型:填空题
  • 查看权限:VIP
题目内容:

以下程序的功能是:从键盘上输入若干个学生的考试分数,当输入负数时结束输入,然后输出其中的最高分数和最低分数。请在空白处填入适当的内容,将程序补充完整。

Private Sub Form_Click()

Dim x As Single, amax As Single, amin As Single

x=InputBox("Enter a score")

amax=x

amin=x

Do, While______

If x>amax Then

aman=X

End If

If______Then

amin=x

End If

x=InputBox("Enter a Score")

Loop

Pnnt"Max="; amax, "Min=";amin

End Sub

参考答案:

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()n=5f=1s=0For i

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()n=5f=1s=0For i=1 To n f= 【12】 s=s+f

查看答案

流体在管内受迫流动换热时 要考虑入口段的影响是在:() (A)L/d>60时 (B)L/d<60时 (C)L/d=60时

流体在管内受迫流动换热时,要考虑入口段的影响是在:()(A)L/d>60时(B)L/d<60时(C)L/d=60时

查看答案

下列哪些园林属于中国四大古典名园?

下列哪些园林属于中国四大古典名园?A、颐和园B、避暑山庄C、拙政园D、狮子林

查看答案

设有以下函数过程 Private Function Fun(a()As Integer,b As String)As Integer End Functi

设有以下函数过程 Private Function Fun(a()As Integer,b As String)As Integer End Function 若已有变量声明: Dim x(5)

查看答案

阅读程序: Option Base 1 Private Sub Form_Click() Dima(3)As Integer Print"输入的数

阅读程序: Option Base 1 Private Sub Form_Click() Dima(3)As Integer Print"输入的数据是:"; Fori=1 To 3a(i

查看答案