1. (2018·浙江选考) 某种编码以4位二进制码为一组，每组前两位表示方向，后两位表示距离。编写一个程序，将编码翻译成方向和距离，距离值为每组编码后两位二进制码转换为十进制数的值。具体功能如下：在文本框Text1中输入连续多组编码，单击“翻译”按钮Command1，结果显示在列表框List1中。程序运行界面如图所示。

1. （1） 要使程序运行时，文本框Text1的Width属性值为2018，可在Form_Load事件过程中添加语句(单选，填字母：A，Width=2018／B，Text1．Width=2018／C，width．Text1=2018)。

3. （2） 实现上述功能的VB程序如下，请在画线处填入合适的代码。

       Private Sub Command1_Click()

           Dim s As String，c As String，d As String

           Dim n As Integer，b1 As Integer，b2 As Integer，v As Integer，i As Integer

           s=Text1．Text：n=Len(s)：i=1

         Do While i<=n

         c=Mid(s，i，2)

         If c=“00”Then

           d=“东”

         Elself c=“01”Then

           d=“南”

         EiseIf c=“10”Then

            d=“西”

         Else

            d=“北”

         End If

         b1=Val(Mid(s，i+2，1))

         b2=Val(Mid(s，i+3，1))

         v=   ①   

         List1.AddItem d+”  ”+Str(v)

             ②  

          Loop

       End Sub

   ① ② 

5. （3） 若文本框Text中输入的内容为“1111”，单击“翻译”按钮后，列表框List1中显示的内容是。