若输入c的值为3，输出结果是__________。

读流程图写结果

已知数组a中依次存放了6个数：-1，4，12，10，-3，8，运行结果是_______________。

   编写一个VB程序，功能如下：在文本框Text1中输入十六进制数（取值范围21至7E）, 单击按钮Command1进行转换，并将其对应的ASCII字符显示在文本框Text2中。程序运行界面如图所示。

（1）在设计程序界面时，要使按钮Command1上显示的文本为“转换”，应修改该按钮的______________属性。
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Command1_Click()
Dim i As Integer, n As Integer, d As Integer
   
Dim ch As String, h As String
d = 0
___________
For i = 1 To Len(h)
ch = Mid(h, i, 1)
If ch >= "A" And ch <= "F" Then
n = Asc(ch) - Asc("A") + 10
Else
n = ____________
End If
d = d + n * 16 ^ (Len(h) - i)
Next i
Text2.Text = Chr(d)
End Sub
（3）运行该程序，在文本框Text1中输入3F，单击“转换”按钮，则变量d的值是_______。

有如下通用过程和事件过程，运行程序后，单击窗体，程序的运行结果是（ ）
public  function  ss(x  as  integer,y  as  integer)  as  integer
if   x>y   then   ss=x-y   else  ss=y-x
END  FUNCTION
PRIVATE  SUB  FORM CLICK(   )
DIM  A  AS  INTEGER ,B  AS  INTEGER
A=8: B=6
PRINT   SS(A,B)
END  SUB

A．2

B．-2

C．8   8

D．6 6

在text1文本框内输入字符串，单击去重按钮，将字符串后面相同的字符删除，并在text2中输出经过删除的字符串。程序界面如图所示。请在下面划线处填入合适的代码。

Private Sub Command1_Click()
Dim s As String, s1 As String, c As String
s = Text1.Text
For i = 1 To Len(s)
c = Mid(s, i, 1)
s1 = （1）  
For  j =  （2）       
If c <> Mid(s, j, 1) Then
s1 = s1 + Mid(s, j, 1)
End If
Next j
（3）
Next i
Text2.Text = s
End Sub

A．（1）s1 = Mid(s, 1, 1)    （2）i + 1 To Len(s)   （3）s1 = s

B．（1）s1 = Mid(s, 1, 1)   （2）i To Len(s)    （3）s1 = s

C．（1）s1 = Mid(s, 1, i) （2）i To Len(s) （3）s = s1

D．（1）s1 = Mid(s, 1, i) （2）i + 1 To Len(s)  （3）s = s1