【单选题】在窗体上画一个名称为Command1的命令按钮,并编写如下的程序代码: Private Sub Command1_Click() Dim n As Integer n = InputBox("请输入一个整数") Print F1(n) End Sub Private Function F1(x As Integer) y = 0 If x < 10 Then y=x * x Else y=...
【单选题】在窗体上画 1 个命令按钮,并编写如下事件过程: PrivateSub Command1_Click() Dim a(3,3) For m = 1 To 3 For n = 1 To 3 If n = m Or n = 4 - m Then a(m , n) = m + n Else a(m , n) = 0 End If Print a(m , n) ; Next n Print Next m...