题目

编写VB程序，实现如下功能：在文本框Text1中输入二进制数，单击“转换”命令按钮Command1，在文本框Text2中输出对应的十六进制数。程序运行界面如图所示，请回答下列问题： （1） 如果输入的二进制数为“1101010”，则得到的结果为。 （2） 实现上述功能的VB程序如下，请在划线处填入合适代码。 '函数bw功能：若二进制位数不足，通过在前面添"0"使得位数为4的倍数 Private Function bw (x As Integer， y As String) As String     Dim r As Integer, i As Integer     r=x Mod 4     If r<>0 Then         For i=1 To 4-r             y="0"+y         Next i         x= Len(y)     End If     bw= End Function Private Sub Command1_Click()     Dim m As String, n As Integer, i As Integer, a As Integer     Dim s As Integer, s1 As String, j As Integer     m= Text1. Text     n=Len(m)     Text2. Text= ""     m=     '调整m的位数为4的倍数     For i=1 To n-3 Step 4         s=0         For j=I To i+ 3             a= Val(Mid(m, j, 1))             s=         Next j         If s>= 10 Then             s1=Chr(Asc("A")+s-10)         Else             s1= CStr(s)     '函数CStr类似于Str，但无前导空格         End If         Text2. Text= Text2. Text+s1     Next i End Sub 答案： 【1】6A 【1】y【2】bw(n, m)【3】s *2+a

查看本题答案和解析