以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于同时清除TEXTBOX中内容的代码求助  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=49704)

--  作者:wealthwind
--  发布时间:2014/4/22 23:09:00
--  关于同时清除TEXTBOX中内容的代码求助

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
--  发布时间:2014/4/23 7:28:00
--  

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

否则:

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

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

Next