以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于窗口与源表加行问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=128510)

--  作者:bashanren
--  发布时间:2018/12/8 21:11:00
--  [求助]关于窗口与源表加行问题

各位大师晚上好!!

我做了一个窗口,想在窗口的列表框中选定姓名后,就能在源表中找到相应的行,并在窗口表中编辑关联表。主要要求在窗口中(红色字体),请老师帮忙,谢谢老师们了!!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table

 

请各高手帮忙,谢谢了!

[此贴子已经被作者于2018/12/8 23:48:30编辑过]

--  作者:y2287958
--  发布时间:2018/12/9 11:12:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


--  作者:bashanren
--  发布时间:2018/12/9 16:06:00
--  

感谢大师的帮助!!但我换到另一个界面,就提示如下,不知是怎么回事?

 

无法将类型为“System.String”的对象强制转换为类型“Foxtable.DataRow”。


--  作者:有点甜
--  发布时间:2018/12/9 22:05:00
--  
以下是引用bashanren在2018/12/9 16:06:00的发言:

感谢大师的帮助!!但我换到另一个界面,就提示如下,不知是怎么回事?

 

无法将类型为“System.String”的对象强制转换为类型“Foxtable.DataRow”。

 

要设置【取值列】【显示列】那里,才能用datarow这个代码的。不然试试改成

 

Dim str As String = e.Sender.SelectedValue

Dim i As Integer = Tables("员工资料").FindRow("第一列 = \'" & str & "\'")

If i >= 0 Then
   Tables("员工资料").Position = i

Else

    msgbox("没找到")
End If

 

 


--  作者:bashanren
--  发布时间:2018/12/10 0:11:00
--  
目标实现,太谢谢“有点甜”大师了!!