下列VB 程序用于求2个正整数(均小于10000)的最大公约数:
Private Sub Command1_Click()
Dim x As Integer,y As Integer,z As Integer
x=Val(Text1.Text) ‘第1 个正整数
y=Val(Text2.Text) ‘第2 个正整数
‘调用函数gcd
Text3.Text=Str(z)
End Sub
Function gcd(a As Integer,b As Integer) As Integer
Do While a <> b
If a>b Then a=a-b Else b=b-a
Loop
gcd=b
End Function
方框中的正确语句是(  )

A．z=gcd

B．z=gcd(a,b)

C．z=gcd(x,y)

D．z=gcd x,y

产生a,b(a,b 都是整数且a<b)范围内某一随机整数的VB 表达式是(  )

A．Int(Rnd ∗ a)+b	B．Int(Rnd ∗ b)+a
C．Int(Rnd ∗(b-a+1))+a	D．Int(Rnd ∗(b-a))+a

某两段VB程序分别如图1和图2所示：
 
图1  图2
当n的值为10时，关于该两段程序，下列说法不正确的是(  )

A．两段程序中i的初值相同

B．两段程序都采用了循环结构

C．两段程序的运算结果不相同

D．图1程序实现了“1＋3＋5＋7＋9”之和的运算

产生不重复的两个随机数

随机生成15个100以内1,100的正整数并显示在一个文本框中，再点击交换按钮将所有对称位置的两个数据对调后显示在另一个文本框中（第1个数与第15个数对调，第2个数与第14个数对调……）。小叶设计的运行界面和程序代码如下：

Dim a(1 To 15) As Integer
Private Sub Form_Load()
Dim i As Integer, t As Integer
Dim s1 As String, s2 As String
Randomize
s1 = ""
For i = 1 To 15
a(i) =___________
s1 = s1 + Str(a(i))
Next i
Text1.Text = s1
End Sub
Private Sub Com1_Click()
s2 = ""
For i = 1 To 15
s2 =_____________
Next i
Text2.Text = s2
End Sub
（1）要使窗体的标题显示文字“数字交换”，应该更改Form1的_________________ 属性（A. Name /B. Caption /C. Font /D. Forecolor）。从程序代码可知，此命令按钮的对象名是________________________。
（2）请在划线处填入合适代码。
（3）程序测试运行后生成如下文件：（A. jiaohuan.frm /B. jiaohuan.vbp /C. jiaohuan.vbw /D. jiaohuan.exe）。其中属于windows系统可执行文件是：（单选，填字母_________________）。