工资问题：某古老的工作和工资计算方式比较奇特，其工作要求如下：必须从1月1日当天开始工作，且连续工作n（n<=365）天才一次性结算得到工资。某年（假设当年为平年）的工资计算细则是：第1天获得1枚金币，接下来的2天（第2天和第3天）每天获得2枚金币，再接下来的3天（第4、5、6天）每天获得3枚金币，……，依次类推，即当连续n天每天获得n枚金币后，会在之后的连续n+1天里，每天获得n+1枚金币。
小王用VB编写了工资计算程序，当输入连续工作的最后一天的日期后，单击“计算”按钮Command1，程序自动计算工资总额，其运行界面如图所示。

实现上述功能的VB程序如下，请回答下列问题：
（1）下列选项中，属于鼠标“单击”事件的是_______。（单选，填字母：

A．DblClick/

B．Load/

C．Click）

（2）请在划线处填入合适的代码。
①__________
②__________
（3）加框处的代码有错误，请改正。
__________
Private Sub Command1_Click()
Dim i As Integer,j As Integer,k As Integer
Dim m As Integer,d As Integer,n As Integer
Dim md As String,sum As Integer
md = "312831303130313130313031"
n = 0
m = Val(Text1.Text)
d = Val(Text2.Text)
For i = 1 To m - 1
n =  ①  
Next i
n = n + d
i = 0:j = 0
sum = 0:k = 1
Do While i < n
sum =
j = j + 1
If  ②  Then
j = 0
k = k + 1
End If
i = i + 1
Loop
Text3.Text = Str(sum)
End Sub

设计程序要考虑的两个方面：（1） （2）计算的过程。

素数只能被1和它本身整除，不能被其他自然数整除。编写VB程序实现如下功能：单击“产生奇数并判断”按钮Command1，随机产生一个三位正奇数显示在文本框Text1中，并在文本框Text2中显示其是否为素数的判断结果。例如，当随机产生的三位正奇数为953时，程序运行界面如图1所示。
 
图1     图2
（1）在设计程序界面时，应使用图2所示“控件工具箱”中的__________(填写相应编号)添加文本框Text1。
（2）实现上述功能的VB程序如下，请在划线处填写合适的代码。
Private Sub Command1_Click()
Dim n As Integer, i As Integer
Dim flag As Boolean    ‘用于标记是否为素数
Randomize
n = Int( ①____)*2+1   ‘随机生成三位正奇数
Text1.Text = Str(n)
flag = True    ‘标记为素数
i = 3
Do While i <= n - 1 And flag = True
If n Mod i = 0   ②___
i = i + 2
Loop
If flag=true Then
Text2.Text = Str(n) + “是素数”
Else
Text2.Text = Str(n) + “不是素数”
End If
End Sub
（3）以下选项中，与加框处表达式“n Mod i = 0”等价的是___________(单选，填字母）。

A．n \ i = Int(n / i)

B．n \ i = n/ i

C．n Mod i = n \ i

程序修改题，每小题①②③④处有1处错误，找出并改正

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

（2）下列程序的功能是标签Label1中显示1+2+3+…+10值。 Dim s As Integer Dim i As Integer ① s = 0 ② For i =" 1" To 10 ③   s = i Next i ④ Label1.Caption = Str(s) 错误在______处，改为_______________。

 

（    ）不是程序设计中的高级语言。

A．word

B．VB

C．C++

D．Pascal