● 若在Excel工作表中修改某个数据，与该数据有关的图表 （44） 。（44）

设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（）。

A.30

B.25

C.20

D.15

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

Private Sub Command1_Click()

x＝Val(Text1.Text)

Select Case x

Case 1,3

y＝x*x

Case IS＞＝10,IS＜＝-10

y＝x

Case-10 To 10

y＝-x

End Select

End Sub

程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。

设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（）。

A. 30

B. 25

C. 20

D. 15

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

A．12

B．13

C．14

D．15

下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dimx(10)As Integer,y(5) As Integer ForI=1 to 10 x(i)=10-I+1 NextI ForI=1 to 5 y(i)cx(2*-1)+x(2*I) NextI ForI=1 to 5 Printy(i)； NextI

A．3 7 11 45 19

B．17 13 9 5 1

C．1 3 5 7 9

D．不确定的值

在运行程序的过程中，当执行“复制”(mnuEditCopy)命令时，使“粘贴”(munEditPaste)命令变为可用，则应做如下处理( )。

A．Private Sub nuEditPaste_Click() …… mun EditPaste.Enable=True End Sub

B．Private Sub mnuEditCopy click …… muEditPaste.Enable=True End Sub

C．Privat Sub munEditPaste_Click() …… mnuEditPaste.Visible=Tme End Sub

D．Private Sub munEditCopy_ClicK() …… munEditPaste.Visible=Tme End Sub

下列各项中，不是通用过程特点的是( )。

A．通用过程不与任何特定事件相联系

B．通用过程完成特定任务

C．通用过程由用户创建

D．通用过程可以由鼠标激发

对话框在关闭之前，不能继续执行应用程序的其他部分，这种对话框属于( )。

A．输入对话框

B．输出对话框

C．模式(模态)对话框

D．无模式对话框

下列语句中正确的是( )。

A．txt1．Text+txt2．Text=txtS．Text

B．Commandl.Name=cmdOK

C．12Label．Caption=1234

D．A=InputBox(Hello)

设已经在窗体上添加了一个通用对话框控件CommonDialog1，以下正确的语句是( )。

A．Commondialog1.Filter=All Files|*.*|Pictures(*.Bmp)|*.Bmp

B．Commondialog1.Filter="AllFiles"|*.*|Pictures(*．Bmp)|*.Bmp

C．Commondialog1.Filter=AllFilesP|*.*|Pictures(*Bmp)|*.Bmp|

D．Commondialog1.Filter="AllFiles|*.*|Pictures(*Bmp)|*.Bmp"