以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  文本框绑定  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=5855)
--  作者：blackzhu
--  发布时间：2010/1/25 13:19:00
--  文本框绑定
  比如我在窗口有五个文本框,这五个文本框全部绑定产品列,但是在窗口显示时每一个框对应的值分别是产品列的五行.这个应该怎么做?

  
   
--  作者：mr725
--  发布时间：2010/1/25 13:52:00
--  
用 For......next 指定吧,绑定都是当前行的! 
--  作者：blackzhu
--  发布时间：2010/1/25 14:21:00
--  
以下是引用mr725在2010-1-25 13:52:00的发言：
用 For......next 指定吧,绑定都是当前行的! 

给个提示
--  作者：舜风
--  发布时间：2010/1/25 14:36:00
--  
图片点击可在新窗口打开查看也想偷学一下
--  作者：blackzhu
--  发布时间：2010/1/25 15:11:00
--  

没有人帮忙吗?
--  作者：mr725
--  发布时间：2010/1/25 15:12:00
--  
dim n as integer = tables("表A").position
for i as integer = 0 to 4
    Forms("窗口1").Controls("TextBox" & i).value = tables("表A")( n+i,"第八列")
next
--  作者：blackzhu
--  发布时间：2010/1/25 15:32:00
--  
以下是引用mr725在2010-1-25 15:12:00的发言：
dim n as integer = tables("表A").position
for i as integer = 0 to 4
    Forms("窗口1").Controls("TextBox" & i).value = tables("表A")( n+i,"第八列")
next

   行是行了,有一点看不懂代码
--  作者：yangming
--  发布时间：2010/1/25 15:33:00
--  

For i As Integer = 1 To 4
e.Form.Controls("TextBox"& i+1).Value= CurrentTable(Tables("订单").Position + i,"雇员")

Next
第一个文本框绑定到雇员列，并将此代码放到其

DataFormat  事件中，但是我发现，如果第一个文本框的文本有变化时，下面的会改变，如是没有变化时，下面的不会改变，也许这个问题只能由贺老师解决了
或者将代码放在按钮中？或是定时器中？
[此贴子已经被作者于2010-1-25 15:33:47编辑过]
--  作者：blackzhu
--  发布时间：2010/1/25 15:41:00
--  
二个问题,一个不能编辑,第二个选定行在窗口显示的交叉一行.我想要的是不仅同步还要能编辑.
--  作者：mr725
--  发布时间：2010/1/25 15:47:00
--  
以下是引用blackzhu在2010-1-25 15:32:00的发言：

   行是行了,有一点看不懂代码

不会吧,你可是狐狸大哥啦~   图片点击可在新窗口打开查看

dim n as integer = tables("表A").position   \'确定表A当前的行位置
for i as integer = 0 to 4                      
    Forms("窗口1").Controls("TextBox" & i).value = tables("表A")( n+i,"第八列")    
\'从当前行起连续向下5行的第八列的值分别给5个TextBox (TextBox0、TextBox1、TextBox2、TextBox3、TextBox4）
next

[此贴子已经被作者于2010-1-25 15:55:09编辑过]