有一种数字加密算法如下：将该数位与其位置相加得到X，X除以10的余数即为编号，若余数为0，编号取10，再从密码表中找出与编号对应的加密字符，其密码表如下：

编号	1	2	3	4	5	6	7	8	9	10
加密字符	H	o	w	A	r	e	Y	O	U	?

 
例如：数字2018加密过程：

数字	2	0	1	8
位置	1	2	3	4
编号	3	2	4	12 mod 10=2
加密字符	w	o	A	o

 
按照上述方法，设计一个字符加密的VB程序，运行程序时，在文本框Text1中输入明文数字，单击加密按钮Command1，程序将明文加密，并将加密后的密文显示在文本框Text2中。程序运行效果如图所示。

（1）将命令按钮上显示的文本Command1”改为“加密”，可在其属性窗口中将____属性的属性值修改为“加密”。
（2）为实现上述功能，请在划线处填入合适代码或选项。
Private Sub Command1_Click()
Dim jm As String, s1 As String, s2 As String, x As Integer
jm = "HowAreYOU?"
s1 = ____________________
For i = 1 To Len(s1)
x = Val(Mid(s1, i, 1)) + i
x = ____________________
If x = 0 Then x = 10
s2 = ____________________
Next i
Text2.Text = s2
End Sub
（3）若密文是“YwUH”,则明文是____________________。

在Visual Basic中,若x表示能被5整除的正整数,则下列逻辑表达式的值一定为真的是(　　)

A．x / 5=0

B．x Mod 5=0

C．Int(x\5)=0

D．5 Mod x=0

下列说法不正确的是( )

A．MSGBOX当语句使用时,参数不用括号

B．MSGBOX当函数使用时,函数值是数值型的.

C．MSGBOX只能输出数据.

D．MSGBOX只能输入数据.

VB表达式val(mid(str(3.5),2,1))的值是：

A．1

B．2

C．3

D．5

声明一个长度为10个字符的字符串变量mstr，应使用_____________语句。