已知程序如下：Private Sub s(x As Single, y As Single) Dim m As Single m = x x = m / y y = t Mod yEnd SubPrivate Sub Command1_Click() Dim a As Single, b As Single a = 8 b = 5 Call s(a, b) Print a, bEnd Sub试问：当单击命令按钮后，输出为[______]。
一个窗体单击事件过程如下： Private Sub Form_Click() x = Int(Rnd) + 10 If x * x > 10 Then y = x + 1 If x * x = 8 Then y = x * x If x * x < 10 Then y = x * x + 5 Print yEnd Sub试问：当单击窗体后，输出为___________。
下列程序段的执行结果为___________。Private Sub Form_Click()Dim x(3,5) For i=1 to 3 For j=1 to 5x(i,j)=x(i-1,j-1)+i+jnext j,iPrint x(3,4)End Sub
单击窗体时，下列程序代码的执行结果为___________。Private Sub Form_Click() x = Int(Rnd) + 5 If x * x > 8 Then y = x * x + 1 If x * x = 9 Then y = x * x * x If x * x < 8 Then y = x * x - 3 Print yEnd Sub
一个窗体单击事件过程如下： Private Sub Form_Click() X = Val(Text1.Text):Y = Val(Text2.Text) If X = 0 Or Y = 0 Then Print "不在任何象限内": Exit Sub If X > 0 And Y > 0 Then Print "IN A" If X > 0 And Y < 0 Then Print "IN D" If X < 0 And Y > 0 Then Print "IN B" If X < 0 And Y < 0 Then Print "IN C"End Sub
