[单项选择题] 在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Function Func(ByVal x As Integer,y As Integer) y=x*y If y>0 ThenFunc=x ElseFunc=y End If End Function Private Sub Command1_Click() Dim a As Integer,b As Integera=3b=4c=Func(a,B)Print "a="; aPrint &qu