社区评估需要的主要方法不包含（)。A．参与性方法B．社会指标方法C．深入访谈法D．服务使用情况法E．

在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text="" Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer, X As Single, Y As Single) Print"程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print"VisualBasic"; End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是______。

A．Visual Basic

B．程序设计

C．A程序设计

D．Visual Basic程序设计

在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show TextText = " " TextSetFocus End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y _ As Single) Print "程序设计" End Sub Private Sub Text1_Ke!tDown(KeyCode As Integer,Shift As Integer) Print "Visual Basic"; End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是 ______。

A．Visual Basic

B．程序设计

C．A程序设计

D．Visual Basic程序设计

在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=" Text1.SetFocus End Sub Phvate Sub Form_MouseUp(Buuon As Integer,Shift As Integer,X As Single，Y As Single) Phnt“程序设计” End Sub Private Sub Textl_KeyDow

A．Visual Basic

B．程序设计

C．A程序设计

D．VisualBasic程序设计

在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Textl.Text="" Textl.Set Focus End Sub Private Sub Form_MouseUp(Button As Inateger,Shift As Integer,X As Single,Y As Single) Frint"程序设计" End Sub Private Sub Textl_KeyDown(KeyCode As InteSer,Shin As Integer) Print"VisualBasic"； End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是______。

A．Visual Bask

B．程序设计

C．A程序设计

D．ViualBasic程序设计

在窗体上画—个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text==" " Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print "VisualBasic"； End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是 ______。

A．Visual Basic

B．程序设计

C．A程序设计

D．Visual Basic程序设计

在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：

Private Sub Commandl_Click()

Dim i As Integer，n As Integer

For i=0 T0 50

i=i+3

n=n+1

If i>10 Then Exit For

Next

Textl．Text=Str(n)

End Sub

程序运行后，单击命令按钮，在文本框中显示的值是

A．2

B．3

C．4

D．5

在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl_C1ick() Dim i As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Textl. Text=Str(n) End sub 程序运行后，单击命令按钮，在文本框中显示的值是 ()

A．2

B．3

C．4

D．5

在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：

Private Sub Commandl_Click()

Dim i As Integer，n As Integer

For i=0 T0 50

i=i+3

n=n+1

If i>10 Then Exit For

Next

Textl．Text=Str(n)

End Sub

程序运行后，单击命令按钮，在文本框中显示的值是

A．2

B．3

C．4

D．5

在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim arrayl(10，10)As Integer Dim i，j As Integer For i=1 To 3 For j=2 To 4 arrayl(i,j)：i＋j Next j Next i Textl．Text=arrayl(2，3)+arrayl(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是()。

A．12

B．13

C．14

D．15

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Load() Text1.Text="计算机" End Sub Private Sub Text1_Change() Picturel.Print"等级考试" End Sub 程序运行后，在文本框中显示的内容是【 】，而在图片框中显示的内容是【 】。