以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  想实现如下功能 点按钮后  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=44613)

--  作者:jinzhengbe
--  发布时间:2014/1/5 8:02:00
--  想实现如下功能 点按钮后

实行条件  窗口1    table1 中的 档口名称列

 

要求:   如果table 1 中的 档口名称列为空  则弹出对话框  提示(档口名称为必填) 并将光标移动到相应的 行  

 

 

文本框好像可以这么实现
 
 
If e.Sender.Text="" Then
    MessageBox.Show("不能为空")
End  If
 
我的情况应该怎么做呢?  非常感谢!!


--  作者:y2287958
--  发布时间:2014/1/5 10:23:00
--  
试试这个:
If Tables("aa").Current.IsNull("第一列")
    MessageBox.Show("不能为空")
    Tables("aa").Select(Tables("aa").Current.Index,Tables("aa").Cols("第一列").Index)
    Tables("aa").StartEditing
End  If

“aa”和“第一列”换成相应的内容

--  作者:jinzhengbe
--  发布时间:2014/1/5 14:56:00
--  
图片点击可在新窗口打开查看   非常感谢仁兄 ,测试成功!!!