在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Command1的Click事件代码: Private Function fun(x As Long)As Boolean If x Mod 2=0 Then fun=True Else fun=False End If End Function Private Sub Command1_Click() Di
单选题
在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Command1的Click事件代码: Private Function fun(x As Long)As Boolean If x Mod 2=0 Then fun=True Else fun=False End If End Function Private Sub Command1_Click() Di