Foxtable(狐表)用户栏目专家坐堂 → 关于同时清除TEXTBOX中内容的代码求助


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

主题:关于同时清除TEXTBOX中内容的代码求助

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


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
关于同时清除TEXTBOX中内容的代码求助  发帖心情 Post By:2014/4/22 23:09:00 [只看该作者]

If user.group = "运营管理科文员" Then
    If Tables("文件管理").Current.IsNull("审核") Then
        Tables("文件管理").Current("发布") = Nothing
        Tables("文件管理").Current("发布日期") = Nothing
        Tables("文件管理").Current("发布意见") = Nothing
        Tables("文件管理").Current.Save()
    Else
        MessageBox.Show("此行已被审核,不能取消发布内容!")
    End If
Else
    MessageBox.show("你无取消发布权限!")
End If

 

以上这段代码只是清除了,表中的内容,我想通过清除,内容对应的窗口中TEXTBOX的内容,代码应该如何写??


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


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

如果是绑定的,自然就清空了。

否则:

For Each s As String In "发布|发布日期|发布意见".Split("|") '注意TextBox的名称

     e.Form.Controls(s).Text = ""

Next


 回到顶部