在VB中,语句Tname.Caption=“浙江学考”中的Tname是(　　)

A．对象名

B．属性名

C．属性值

D．事件名

模拟剪刀石头布的游戏,用1~3这3个数分别代表剪刀、石头、布这三种情况,使用Rnd随机函数可以表示为(　　)

A．Int(Rnd(3)+1)

B．Int(Rnd*2+1)

C．Int(Rnd(2)+1)

D．Int(Rnd*3+1)

模拟抛硬币并统计概率,程序运行结果和设计界面如右图,该程序界面上至少有　　　　等控件对象(　　) 

A．一个按钮、二个文本框

B．一个按钮、二个文本框、三个标签

C．一个按钮、二个列表框、二个标签

D．一个按钮、一个文本框、一个列表框、二个标签

VB程序中Label1.caption=＂您好＂，其作用是（   ）。

A．将文本框Label1的名称设置为＂您好＂

B．将文本框Label1显示的文本设置为＂您好＂

C．将标签Label1的名称设置为＂您好＂

D．将标签Label1显示的文本设置为＂您好＂

下列程序的功能是在文本框Text1中显示变量a和b的较大值。
a = 1：b = 2
① If a > b Then
②    c = a
Else
③    c = b
End If
④ Text1.Caption = Str(c)
错误在______处，改为___________。

一个VB工程的部分设计界面如下图所示：

下列选项不正确的是(   )。

A．窗体的Caption属性值是“对象”	B．窗体文件名是“Form1.frm”
C．当前选中对象的名称是“Shape1”	D．工程的名称是“工程1”

某VB程序的一个事件过程如下：
Private Sub Command1_Click()
Dim a As Integer
a = Val(Text1.Text)
Text1.Text = Str(SqrA.)
End Sub
程序运行时，单击命令按钮command1后弹出如图所示的错误信息提示。出现错误的原因是（   ）

A. 变量a类型定义错误

A．界面缺少文本框Text1
B．Command1属性设置错误	C．Sqr函数计算时出错

在Visual Basic的代码窗口中，语句Password.Caption= "a>b"中的Password是（  ）

A．对象名

B．属性值

C．属性名

D．类名

在VB中，代码RGB（0,0,255）表示什么颜色（   ）

A．红色

B．绿色

C．黄色

D．蓝色

有一种数字加密算法如下：将该数位与其位置相加得到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”,则明文是____________________。