题目

用英文字母A~D对数字字符0~9进行编码，规则如下表所示： 数字字符 0   …… 7 8 9 二进制值 0 0 0 0 0 0 0 1 …… 0 1 1 1 1 0 0 0 1 0 0 1   十进制值 0 0 0 1 …… 1 3 2 0 2 1 对应编码 A A A B …… B D C A C B                                               例如，数字字符串“709”的编码为“BDAACB” 用VB程序实现上述编码，功能如下：在文本框Text1中输入编码的一串数字字符，单击“编码”命令按钮Command1，在文本框Text2中显示编码结果。程序运行界面如图所示。 （1） 下列属于VB窗体文件的是          (单选，填字母)。 A . szbm. vbp B . szbm. frm C . szbm. exe （2） 实现_上述功能的VB程序如下，请在划线处填入合适的代码。 Private Sub Command1_ Click( )     Dim code As String, s As String, ch As String, result As String     Dim i As Integer, numL As Integer, numR As Integer     Dim flag As Boolean     code= "ABCD"     s= Text1. Text     flag= True     result=“”     For i= 1 To Len(s)         ch= Mid(s, i, 1)         If ch<"0" Or ch>"9" Then                          Exit For     '退出循环         Else             numL= Val(ch) \ 4             numR=             result = result +Mid ( code, numL+1, 1)+Mid(code, numR+1, 1)         End If     Next i     If flag Then         Text2. Text= result     Else        Text2. Text="输入错误"     End If End Sub （3） 运行该程序，若在文本框Text1中输入“A5”，单击“编码”命令按钮Command1，在文本框Text2中显示编码结果为 。 答案： B 【1】flag= False【2】Va1(ch) Mod 4 【1】输入错误

查看本题答案和解析