以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  内容不能为空再新增  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=110161)

--  作者:有点甜
--  发布时间:2017/11/28 9:26:00
--  

Dim str1 As String = e.form.controls("TextBox1").Text

Dim str2 As String = e.form.controls("TextBox2").Text

Dim str3 As String = e.form.controls("TextBox3").Text

If e.keycode = keys.Enter andalso str1>"" andalso str2>"" andalso str3>"" Then

[此贴子已经被作者于2017/11/28 9:26:15编辑过]