在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1)，外观如图所示。
编写如下程序
Private Sub Form Load()
Text1.Text=" "
Text2.Text=" "
Text3.Text=" "
End Sub
Private Sub Command1 Click()
x=Val(Text1.Text)
y=Val(Text2.Text)
Text3.Text=f(x,y)
End Sub
Function f(ByVal x As Integer,ByVal y As Integer)
Do While y＜＞0
tmp=x Mod y
x=y
y=tmp
Loop
f=x
EndFunction
运行程序，在Text1文本框中输入36，在Text2文本框中输入24，然后单击命令按钮，则在Text3文本框中显示的内容是（）。
A．4
B．6
C．8
D．12
