【正确答案】正确答案：步骤1：打开考生文件夹中的本题工程文件sjt5．vbp，在代码编辑窗口，去掉程序中的注释符“'”，将问号“?”改为正确的内容。参考代码： Line Input #1，strl Text1．Text=Strl 步骤2：按指定位置编写“统计”按钮的单击事件过程。参考代码： Private Sub Command2_Click() Dim i As Integer intR=0：intT=0：intD=0 For i=1 To Len(strl) If Mid(strl，i，1)="R" Or Mid(strl， i，1)="r" Then intR=intR+1 End If If Mid(strl，i，1)="T" Or Mid(strl， i，1)="t" Then intT=intT+1 End If If Mid(strl，i，1)="D" Or Mid(strl， i，1)="d" Then intD=intD+1 End If Next Text2．Text=intR & " " & intT & " " & intD End Sub 步骤3：按＜F5＞键运行程序，先单击“显示"按钮，接着单击“统计”按钮，最后单击“保存”按钮。 步骤4：按要求将文件保存至考生文件夹中。

【答案解析】解析：根据题目源程序，要使单击“显示”按钮时，从文件in5．txt中读取文本，并显示在文本框Text1中，需要首先以Input方式打开文件，然后使用Line Input#语句将文件号指明的文件中的内容读入到指定的字符串变量中，然后将该变量赋给文本框的Text属性。 要在单击“统计”按钮时，统计字母“R”、“T”、“D”的出现次数，可在“统计”按钮的单击事件过程中，通过For循环用Mid函数逐一取出strl中的每个字符进行判断，若其为对应字符，则对应的计数器增加1。循环结束时，三个计数器变量中的值就是该字符出现的次数。