Foxtable(狐表)用户栏目专家坐堂 → 代码执行提示错误


  共有4230人关注过本帖树形打印复制链接

主题:代码执行提示错误

帅哥哟,离线,有人找我吗?
wsxdwh
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:645 积分:4583 威望:0 精华:0 注册:2012/11/12 14:27:00
代码执行提示错误  发帖心情 Post By:2013/5/17 14:44:00 [只看该作者]

如题  :

 

If e.Form.Controls("输入密码").value = e.Form.Controls("设密码").value Then
    For Each dr As Row In CurrentTable.Rows
       If dr("审核")  =   False
          dr("审核")  = True
     Else
        dr("审核")  =   False
    End   If
    Next
    e.Form.Controls("输入密码").Visible = False
    e.Form.Controls("输入密码").value = ""

Else
    e.Form.Controls("输入密码").value = ""
    e.Form.Controls("输入密码").Visible = True
    MessageBox.Show ("密码错误,重新输入!")
End   If


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20130517144212.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/17 15:00:00 [只看该作者]

If e.Form.Controls("输入密码").value = e.Form.Controls("设密码").value Then  其中一个文本框有空值的缘故吧

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/5/17 15:01:00 [只看该作者]

e.Form.Controls("输入密码").Visible = False
e.Form.Controls("输入密码").value = ""

 

e.Form.Controls("输入密码").value = ""

e.Form.Controls("输入密码").Visible = False


 回到顶部
帅哥哟,离线,有人找我吗?
wsxdwh
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:645 积分:4583 威望:0 精华:0 注册:2012/11/12 14:27:00
  发帖心情 Post By:2013/5/17 15:28:00 [只看该作者]

两个都不是。

图片中审核列只有部分行的审核为true, 而且是当前行之前的。


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/17 15:29:00 [只看该作者]

例子发出来吧.

 回到顶部