以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  帮看看代码问题出在哪?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=28060)

--  作者:关键下一秒
--  发布时间:2013/1/17 13:21:00
--  帮看看代码问题出在哪?

dim _Rs as list (of datarow) = nothing

Dim rs As List (of Row) = tbl.GetCheckedRows    

      If rs IsNot Nothing  Then
       For Each r As Row In rs
           If r IsNot Nothing Then
              _Rs.add(r.DataRow)
           End If
       Next
    End If

请问这代码问题出在哪?


--  作者:lin_hailun
--  发布时间:2013/1/17 14:29:00
--  
 要记得,list存储的只是地址。
--  作者:关键下一秒
--  发布时间:2013/1/17 17:10:00
--  
以下是引用muhua在2013-1-17 14:55:00的发言:

Dim _Rs As New List(of DataRow)

 

 

 

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

Muhua,谢谢!能做一个跨窗口调用的例子吗?


--  作者:lin_hailun
--  发布时间:2013/1/17 17:48:00
--  
 很简单,可以直接调用_rs

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


--  作者:关键下一秒
--  发布时间:2013/1/17 18:19:00
--  

林总的例子可以,但用我上面的代码就不行了。可能原因是出在

Dim rs As List (of Row) = tbl.GetCheckedRows    

这一行的rs局部变量上。不能通过局部变量转换后赋值?

不过,问题已经解决了。谢谢两位!

[此贴子已经被作者于2013-1-17 18:19:33编辑过]