下面函数的功能与Visual Basic提供的Sgn函数的功能类似,即该函数返回参数的符号。请在空白处填入适当的内容,将程序补充完整。 Function getsign(x As Double) If x<0 Then 【1】 Else lf 【2】Then getsign=0 Else getsign=l End If End Function
参考答案:
答案解析:
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:Dim Flag As BooleanPrivate
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:Dim Flag As BooleanPrivate Sub Command1_Click()