在窗体上画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