窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。设有如下的类型声明：

A.A

B.a

C.C

D.c

窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下： Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String c=UCase(Chr(KeyCode)) Text2.Text=Chr(Asc(C+2) ) End Sub 当向文本框Text1中输入小写字母a时，文本框Text2中显示的是()。

A．A

B．a

C．C

D．c

窗体上有一个名为List1的列表框，其中已经输入了若干个项目(如图所示)；

还有两个文本框，名称分别为Text1、Text2，一个名称为Command1的命令按钮，并有以下程序： Private Sub Command1_Click() Dim str As String,s As String,k As Integer s=Text1 str="" For k=List1.ListCount-1 To 0 Step-1 IfInStr(List1.List(k),s)＞0 Then str=str&List1.List(k)&" " End If Next k If str="" Then Text2="没有匹配项目" Else Text2=str End If End Sub 程序运行时，在Text1中输入“京”，单击命令按钮，则在Text2中显示的内容是______。

A．京

B．北京 南京

C．南京 北京

D．没有匹配的项目

入字符时，输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示，下划线处应填()。

Private Sub Text1_ _________() TextText=Text1.Text End Sub

A．SetFocus

B．Change

C．GetFocus

D．Click

窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Commandl的命令按钮。 运行后的窗体外观如下图所示。设有如下的类型声明： Type Person name As String*8 major As String*20 End Type 当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test290.dat中。设文本框中的数据已正确地赋值给Person类型的变量P。则能够正确地把数据写入文件的程序段是()。

A．Open"c:\Test29.dat"ForRandom As #1 Put#1，1，p Close#1

B．Open"c:\Test29.dat"ForRandomAs#1 Get#1，1，p Close#1

C．Open"c:\Test29.dat"ForRandomAs#1Len=Len(p) Put#1，1，p Close#1

D．Open"c:\Test29.dat"ForRandomAS#1Len=Len(p) Get#1，1，p Close#1

体外观如图所示。设有如下的类型声明

当单击“保存”按钮时．将两个文本框中的内容写入一个随机文件Test29.dat中设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是

A．

B．

C．

D．

本框，名称分别为Text1、Text2和Text3；1个命令按钮名称为Cmd1，标题为“计算”，如下图所示。

要求程序运行后，在Text1和Text2中分别输入两个整数，单击“计算”按钮后，可把两个整数之间的所有整数(含着两个整数)累加起来并在Text3中显示出来。

要求：

在有问号“？”的地方填入正确内容，然后删除“？”及所有注释符…”，但不得修改其他部分。保存时不得改变文件名和文件夹。

个单选按钮及两个命令按钮。文本框的名称为Text1，内空；两个命令按钮的名称分别为Command1与Command2、标题分别为“读取”与“加密”；单选按钮的名称分别为Option1和Option2，标题分别为“3”和“5”。单击“读取”，程序将读入考生文件夹下的文本支件in5．txt，单击“加密”，加密过的文本显示在Text1中。根据单选按钮中的不同的数字，加密的方法不同。例如，选择Option1，则逐一把读入的字符串改为它前面的第3 个字母。程序运行时效果如图5-5所示。注意：请在有“？”号的地方填入正确内容，然后删除“？”及代码前的所有注释符(即“”号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。

在考生文件夹中有一个工程文件execise31.vbp(相应的窗体文件为execise31.frm)。窗体Form1上有两个标签Lab1和Lab2，标题分别为“密码”和“允许次数”；一个命令按钮Cmd1：标题为“确定”；两个文本框名称分别为Text1和Text2。其中Text1用来输入密码(输入时，显示“*”)，无初始内容，Text2的初始内容为3。已给出了Cmd1的事件过程，但不完整，要求去掉程序中的注释符“'”，把程序中的问号“？”改为正确内容，使得在运行时，在Text1中输入密码后，单击“确定”按钮，如果输入的是“abcdef”则在Text1中显示“密码正确”；如果输入其他内容，单击“确定”后，弹出如下图所示的错误提示对话框，并且Text2中的数字减1。最多可输入3次密码，若3次都输入错误，则禁止再次输入。

注意：

不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

是当单击Command1按钮时，将把Text2控件中的文本全部选中，并把焦点设置在该文本框中。程序运行时的界面如图20-4所示，以下两空应填()。

Private Sub Command1_Click() TextSelStart=0 Text________=Len(TextText) Text_______ End Sub

A．SelLength SetFocus

B．SelText SetFocus

C．SelLength GetFocus

D．SelText GetFocus

画两个名称分别为Text1和Text2，初始内容都为空的文本框，再画两个名称分别为Label1、Label2，标题分别是“最大数”和“最大数位置”的标签。

程序功能：单击“运行”按钮，则产生50个不重复的介于0～100之问（含0和100）的随机数，且以每行10个数的形式显示在窗体上；最后将这些随机数中的最大数和最大数所处的位置显示在Text1和Text2中。如图所示为某一次的运行效果。请将“运行”命令按钮的Click事件过程中的注释符去掉，把？改为正确内容，以实现上述程序功能。

注意：考生不得修改窗体文件中已经存在的控件和程序，最后，程序按原文件名存盘。