以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  打开窗口如何把表中的内容如何赋值给窗口的某个控件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133117)

--  作者:ts9277
--  发布时间:2019/4/7 16:49:00
--  打开窗口如何把表中的内容如何赋值给窗口的某个控件

图片点击可在新窗口打开查看此主题相关图片如下:11.jpg
图片点击可在新窗口打开查看

老师请问下,我想实现双击窗口中的一个table 表  打开一个登记窗口,想把双击行的模号写入登记窗口中的模具名称中,这个如何实现
以下是单元格双击事件的代码,只能打开窗口 无法赋值内容
Dim part As String
For Each c As Col In e.Table.Cols
    If c.Name.contains("设计") Then
        
        part=e.Row("模号")
        Forms("任务发布").open
        Dim Endck As WinForm.RadioButton = Forms("任务发布").Controls("endck") \'完成登记
        Dim sbstar As WinForm.ComboBox = Forms("任务发布").Controls("sbstar") \'发布任务
        Dim task As WinForm.ComboBox = Forms("任务发布").Controls("task") \'任务选项
        Dim nm As WinForm.ComboBox = Forms("任务发布").Controls("nm") \'模具名称
        Endck.Checked=True
        task.value="设计"
        nm.value=part
        
        Exit For
        
        
    End If
    
Next

--  作者:ts9277
--  发布时间:2019/4/7 16:52:00
--  
不同窗口之间的数据传递只能使用全局变量吗
--  作者:有点甜
--  发布时间:2019/4/7 16:56:00
--  

如果你打开的是【模式】窗口,那只能在窗口的afterLoad事件写你那段代码。

 

如果是别的窗口类型,独立、停靠等,你写的代码,是有效的。