| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 对话框 无法点击 确定 取消按钮 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=58597) |
| -- 作者：tesia255 -- 发布时间：2014/10/20 15:39:00 -- 对话框 无法点击 确定 取消按钮 复选组合框的TextChanged 事件，设置如下： 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 关闭对话框。 是哪里设置错了吗？ |
| -- 作者：Bin -- 发布时间：2014/10/20 15:40:00 -- 代码没问题,做个例子发上来看看. |
| -- 作者：有点甜 -- 发布时间：2014/10/20 15:48:00 -- 不要在这个事件触发，必须写到其它事件，比如valueChanged [此贴子已经被作者于2014-10-20 15:47:59编辑过]
|