- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 怎么才可以连续输入 同样的字符？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=18149)
-- 发布时间：2012/4/4 9:52:00
-- 怎么才可以连续输入 同样的字符？
如图所示， 如果我选择连续， 则新添加的客户名自动 为文本框内的字符， 并且不能更改，
如果我不选择连续的话，则客户名称就可以更改。（因为我设定的是客户名按照当前用户自动输入。所以有的时候需要换用户连续输入数据的时候需要用）请各位高手指点。！！！
此主题相关图片如下：11.png
-- 发布时间：2012/4/4 10:24:00
--
Dim q As WinForm.CheckBox = e.Form.Controls("CheckBox1")
Dim d As WinForm.TextBox = e.Form.Controls("TextBox1")
If q.Checked = True and d.Value <> "" Then
Dim w As Table =Tables("取货记录").AddNew()
W("客户") = d.Value
Else
当前用户自动输入代码
End If
[此贴子已经被作者于2012-4-4 10:27:58编辑过]
-- 发布时间：2012/4/4 10:27:00
--
[此贴子已经被作者于2012-4-4 10:29:26编辑过]
-- 发布时间：2012/4/5 3:32:00
-- 要加到什么事件里面
要加到什么事件里面？ 窗口，表，还是项目的？
-- 发布时间：2012/4/5 4:06:00
--
放在添加按钮的Click事件里
-- 发布时间：2012/4/5 16:55:00
--
提示这个画面
此主题相关图片如下：222.png
-- 发布时间：2012/4/5 17:06:00
--
Dim q As WinForm.CheckBox = e.Form.Controls("CheckBox1")
Dim d As WinForm.TextBox = e.Form.Controls("TextBox1")
If q.Checked = True And d.Value IsNot Nothing Then
Dim r As Row = Tables("取货记录").AddNew()
r("客户") = d.Value
End If
-- 发布时间：2012/4/5 17:42:00
--
因为我设定的是客户名是自动输入当前用户名。
所以现在 当我选择CheckBox1时候，当前行的用户名可以改，到下一行的用户名又变成当前登录的用户名了。
我需要的是选择CheckBox1后，换行后也是TextBox1的内容。
小弟嘴拙，没说清楚，鉴谅！！
-- 发布时间：2012/4/5 17:57:00
--
嘴拙不怕，提问时把文件附上，这样可以少说话、更快更准地解决实际问题！
-- 发布时间：2012/4/5 19:35:00
--
ｚｈｅｎｇｂｅ是开放者密码
各位前辈请多指点
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:唐人街取货管理_0405.zip |