创建一个窗体，在该窗体中建立两个按钮，分别命名为Command1和Command2。下列程序代码用于实现以下

视程序的【 】。

以每2秒钟一次的速度向窗体的右下角移动，每次向下、向右移动100twip。请填空。

Private Sub Form_Load()

Prcture1_Picture=LoadPicture("c\pic\mouth.ico")

______.Interva=2000

End Sub

Prinvate Sub Timer1_Timer()

Static x,y As Integer

x=x+100

y=y+100

Pictuer1.Move[x，y]

End Sub

成该程序。

OptionBase 1

Private Sub Command1_Click(Index As Integer)

Dima(1 To 20,1 To 10)

Dim b()

ReDimb(1 To 200)

For i=1 To 20

For j=1 To 10

A(i,j)=i*j

Next j

Next i

Tran a,20,10b

End Sub

Sub Tran(a()an,n,b())

Dim i As Integer

For i=1 To m

For j=1 To n

______=a(i,j)

Next j

Next i

End Sub

执行下面的程序段后，b的值为______。

a=800

b=30

a=a+b

b=a-b

a=a-b

制一个文本框(名称为Text1，MulfiLine属性设置为Tree， ScrollBars属性设置”2)，如下图所示。

程序运行后，如果执行“读数”命令，则读入in12.txt文件中的100个整数，放入一个数组中，数组的下界为1：如果执行“计算”命令，则把该数组中大于等于30的元素在文本框中显示出来，求出它们的和并把所求得的和在窗体上显示出来；如果执行“存盘”命令，则把所求得的和存入考生文件夹下的out12.txt文件中。

在考生文件夹下有一个工程文件execise12.vbp(相应的窗体文件为execise12.frm)，考生可以装入该文件。窗体文件中的ReadData过程可以把in12.txt文件中的100个整数读入Arr数组中；而WriteData过程可以把指定的整数值写到考生文件夹指定的文件中(整数值通过计算求得，文件名为out12.txt)。

注意：

考生不得修改窗体文件中已经存在的程序。存盘时，工程文件名仍为execise12.vbp，窗体文件名仍为execise12.frm。

上有2个文本框，名称分别为Text1和Text2还有3个命令按钮，名称分别为Cmd1、Cmd2和Cmd3，标题分别为“读取”、“计算”和“保存”，如下图所示。

有一个函数过程isprime可以在程序中直接调用，其功能是判断参数a是否为素数，如果是素数，则返回True，否则返回False。编写适当的事件过程，使得在运行时，单击“读取”按钮，就把文件in23.txt中的整数放入Text1中；单击“计算”按钮，则找出大于Text1中的整数的第1个素数，并显示在Text2中；单击“保存”按钮，则把Text2中的计算结果存入out23.txt文件中。

注意：

考生不得修改isprime函数过程和控件的属性，必须把计算结果通过“保存”按钮存入 out23.txt文件中。

件和不完整的程序，请去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容。

本程序的功能是：如果单击“读取”按钮，则把考生目录下的in39.txt文件中的15个姓名读到数组a中，并在窗体上显示这些姓名：当在Text1中输入一个姓名，或一个姓氏后，如果单击“查找”按钮，则进行查找，若找到，就把所有与Text1中相同的姓名或所有具有Text1中姓氏的姓名显示在Text2中(如下图所示)：若未找到，则在Text2中显示“不存在!”：若Text1中没有查找内容，则在Text2中显示“未输入查找内容!”。

注意：

考生不得修改程序的其他部分和控件的属性，最后把修改后的文件按原文件名存盘。

41.txt的文本文件，其内容如下：32 43 76 58 28 12 98 57 3l 42 53 64 75 86 97 13 24 35 46 57 6879 80 59 37。程序运行后，单击窗体，将把文件in.txt中的数据输入到二维数组Mat中，在窗体上按5行、5列的矩阵形式显示出来，并输出矩阵左上一右下对角线上的数据，如下图所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。

注意：

去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘，

文件”菜单下有3个菜单项，分别为“新建”、“打开”和“保存” (其名称分别为vbNew、vbOpen和vbSave)。

要求程序运行后，如果选中“文件”下的某个菜单项，则将该菜单项的标题通过MsgBox对话框显示出来，如下图所示。

注意：

文件必须存放在考生文件夹中，窗体文件名为execise47.frm，工程文件名为 execise47.vbp。

在名为Form1的窗体上绘制一个垂直滚动条(名称为VS1)和一个水平滚动条(名称

为HS1)。在属性窗口中对两个滚动条设置如下属性：

Min 2000

Max 8000

LargeChange 500

SmallChange 50

编写适当的事件过程，使程序运行后，若移动滚动条上的滚动框，则可扩大或缩小窗体。运行后的窗体如下图所示。

注意：

程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise22.vbp，窗体文件名为exeeise22.frm。