主题：对话框 无法点击 确定 取消按钮

Dim Str1 As String =e.Form.Controls("CheckedComboBox1").text ' Tables("PROJECT").Current("PRO_YEAR")

If  Str1.Contains("其他期限") Then

    Dim Val As String

    Dim Result As DialogResult

    Result =InputValue(Val, "其他期限","请输入其他期限:")    

    If  Result = DialogResult.OK  Then

        e.Form.Controls("CheckedComboBox1").text =e.Form.Controls("CheckedComboBox1").text &","& val

        MessageBox.Show(Val)

    End If 

End If

对话框显示确定和取消按钮，但是两个按钮都点击不了，只能通过Alt+F4 关闭对话框。

是哪里设置错了吗？