未知题型 在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim i As Integer，j As Integer Dim a(10， 10)As Integer For i=1 To 3 For i=1 To 3 a(i，j)=(i-1) *3+j Print a(i，j)； Next i Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的是A.1 2 3 246 3 69B.2 3 4 3 4 5 4 5 6C.1 4 7 2 5 8 3 6 9D.1 2 3 4 5 6 7 8 9

未知题型 在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click() n=Val(Text1.Text) if n/2=n/2 Then f=f1(n) Else f=f2(n) End If Print f；n End Sub Public Function f1(ByRef x) x = x * x f1 =x + x End Function Public Function f2(ByVal x) x = x + x f2=x+x+x End Function 程序运行后，在文本框中输入6，然后单击命令按钮，窗体上显示的是A.72 36B.108 36C.72 6D.108 6

不定项选择 唐太宗时期，修定《姓氏录》，广开制科，大增进士等措施，提高普通地主阶层的社会地位。‌ ‏‌