回 帖 发 新 帖 刷新版面

主题:急切求助:为何不能被识别?


在form2的代码程序中有以下程序段
 Private Sub Label43_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label43.Click
        Dim f As Form1
        If CStr(ComboBox1.Text) <> "" & CStr(ComboBox2.Text) <> " " & CStr(ComboBox3.Text) <> " " & CStr(ComboBox4.Text) <> " " & CStr(ComboBox5.Text) <> " " & CStr(ComboBox6.Text) <> " " & CStr(ComboBox19.Text) <> " " Then
            f.Show()
            f.Timer1.Enabled = True
        Else
            MsgBox("您输入的参数不完全", MsgBoxStyle.Exclamation, "参数设置")
        End If
    End Sub
如果个组合框的内容非空,则显示form1,但运行中,出现错误。语法错在哪?谢谢!!

回复列表 (共1个回复)

沙发

Dim f As Form1=new Form1

我来回复

您尚未登录,请登录后再回复。点此登录或注册