| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] 条件新增行公式 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=54400) |
| -- 作者：wumingrong1 -- 发布时间：2014/7/27 16:58:00 -- [求助] 条件新增行公式 我有一个按钮，想实现当 文本框“用户IP地址”中有内容 、 文本框“资料用户名称”为空（没有内容）时；在“互联网客户数据表”中新增一行并将光标移到到新增行；可是如下命令实现不了，帮我看看错在哪了？谢谢 Dim d1 As String = e.Form.Controls("用户IP地址").Text Dim d2 As String = e.Form.Controls("资料用户名称").Text If d1 > "" And d2 Is Nothing Then Tables("互联网客户数据表").addnew（） End If |
| -- 作者：有点甜 -- 发布时间：2014/7/27 17:01:00 -- 应该是没有问题的，试试这样
Dim d1 As String = e.Form.Controls("用户IP地址").Text If d1 > "" AndAlso d2 = "" Then
如果还有错，你看看是不是你的两个控件绑定了列？
http://www.foxtable.com/help/topics/2436.htm
[此贴子已经被作者于2014-7-27 17:01:52编辑过]
|
| -- 作者：wumingrong1 -- 发布时间：2014/7/27 17:05:00 -- 如果控件是绑定了列啦，那命令该怎么写？ |
| -- 作者：有点甜 -- 发布时间：2014/7/27 17:08:00 -- If Tables("互联网客户数据表").Current.IsNull("用户IP地址") = False AndAlso Tables("互联网客户数据表").Current.IsNull("资料用户名称") Then Tables("互联网客户数据表").addnew() End If
|