【单选题】在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写 如下事件过程和通用过程: Private Sub Command1_Click() n=Val(Text1.Text) If n/2=n/2 Then f=f1(n) Else f=f2(n) End If Print f; n End Sub Public Function f1(ByRef x) x=x*x...
【单选题】在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click() n=Val(Text1.Text) if n/2=n/2 Then f=f1(n) Else f=f2(n) End If Print f;n End Sub Public Function f1(ByRef x) x = x *...
【单选题】在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click( ) n=Val(Text1.Text) If n/2=n/2 Then f=f1(n) Else f=f2(n) End if Print f;n End Sub Public Function f1(ByRef x) x=X*X ...
【单选题】在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click() n=Val(Text1. Text) If n/2=n/2 Then f=f1(n) Else f=f2(n) End If Print f n End Sub Public Function f1(ByRef x) x=x*x ...