![](https://cos-cdn.shuashuati.com/pipixue-wap/2020-1230-1107-56/ti_inject-812ce.png)
任务要求 一、根据所学知识,将以下运行界面完成的功能程序补充完整。 设计一个窗体,其上有一个标签、一个文本框、一个命令按钮,每个控件上显示的值为下图显示。 要求: 1 、如果输入大于 0 的数,则弹出“输入的数:是正数”,如果输入等于 0 的数,则弹出“输入的数:是零”,如果输入小于 0 的数,则弹出“输入的数:是正数”。 输入数值,然后单击“判断”就会弹出如下图对话框。 程序如下: Private Sub Command1_Click() Dim n As Integer n = Text1.Text If Then MsgBox "输入的数是:" & n & "是正数", vbOKCancel, "判断" n = 0 Then MsgBox "输入的数是:" & n & "是0", vbOKOnly, "判断" MsgBox "输入的数是:" & n & "是负数", vbOKOnly, "判断" End If End Sub