2. 计算机
  3. 阅读程序： Option Base 1 Private Sub Form Click() Dim a(3)As Integer For i=1 TO 3 a(i)=InputBox(“输入数据”) Print a(i)；

阅读程序： Option Base 1 Private Sub Form Click() Dim a(3)As Integer For i=1 TO 3 a(i)=InputBox(“输入数据”) Print a(i)；

admin2012-12-08  76
问题 阅读程序：
Option Base 1
Private Sub Form Click()
  Dim a(3)As Integer
    For i=1 TO 3
    a(i)=InputBox(“输入数据”)
    Print a(i)；
    Next
    Print
    If a(1)    t=a(1)
    a(1)=a(2)
    a(2)=___________
    End If
    If a(2)>a(3)Then
    m=a(2)
    Else If a(1)>a(3)Then
    m=_______
    Else
    m=__________
    End If
    Print“中间数是：”；m
    End Sub
    程序运行后，单击窗体，在输入对话框中分别
输人3个整数，程序将输出3个数中的中间数，如
图2所示。请填空。
选项
答案．t a(3) a(1)
解析 程序主要作用是在运行后，提示用户输入3个整数，然后对用户输入的3个整数进行打印，并进行大小比较，最后输出中间值。程序的思路为将第一和第二个数进行比较，较大的放到前面，然后比较第二个数与第三个数，若第二个数大于第三个数，则第二个数为中间数。若第二个数小于第三个数则比较第三个数和第一个数，较小的为中间数。主要完成当a(1)
转载请注明原文地址:https://kaotiyun.com/show/Sjhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)