【简答题】下面Visual Basic程序段。窗体中有一命令按钮(名称为Command1),结果为______ Option Base 1 Private Sub Command1_Click() a = Array(23, 24, 17, 8, 11, 15, 16, 13) Dim i As Integer Dim num As Integer Dim k As Integer Dim j As Int...
【单选题】'输出四叶玫瑰花数 Dim a As Integer, b As Integer Dim c As Integer, d As Integer For i = 1000 To 9999 —————— '得到千位上的数,赋给a,请选择正确选项填空 b = Int((i Mod 1000) / 100) c = Int((i Mod 100) / 10) d = i Mod 10 If a ^ 4...
【简答题】下面程序段的功能是:用随机函数产生n个两位整数(范围为[10,99]),用“选择排序法”按从小到大的顺序排序并输出。请填空。 Dim a() As Integer,i%,j%,t% n=Val(InputBox(“请输入n的值”)) ReDim a(n) As Integer For i=1 To n a(i)=Int(Rnd*91+____) Print a(i); Next i Print F...