在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n As Integer)As Integer Do While m＜＞n Do While m＞n m=m-n Loop Do While m＜n n=n-m Loop Loop f=m End Function 窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。

A．2

B．4

C．6

D．8

基因的自由组合定律揭示出（）

A、等位基因之间的关系

B、同源染色体上不同基因之间的关系

C、位于非同源染色体上的非等位基因之间的关系

D、表现型之间的数量比接近于9∶3∶3∶1