下面是求最大公约数的函数gcd的首部 Function gcd(ByVal x As Integer, ByVal y As Integer) As Integer 若要输出8、12、16这3个数的最大公约数，下列语句中正确的是

单项选择题设有如下通用过程： Public Function Fun(xStr As String) As String Dim tStr As String, strL As Integer tStr= strL=Len(xStr) i=1 Do While i＜=strL 2 tStr=tStr & Mid(xStr,i,1) & Mid(xStr,strL-i+1,1) i=i+1 Loop Fun=tStr End Function 在窗体上画一个名为Text1的文本框和一个名为Command1的命令按钮，并编写如下事件过程： Private Sub Command1_Click() Dim S1 As String S1= abcdef Text1.Text=UCase(Fun(S1)) End Sub 程序运行后，单击命令按钮，则Text1中显示的是

单项选择题假定有如下的Sub过程： Sub Func(x As Single， y As Single) t=x x=t y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=6 b=5 Func(a, b) Print a, b End Sub 程序运行后，单击命令按钮，输出结果为 ______。