我真的是vb和linq的新手,所以很抱歉我所拥有的完全错误。.我有一个页面,它是项目的详细视图。在其中,我想显示所有链接项目的列表。这就是我所拥有的..(我猜这是非常错误的)
Private Sub divLinks_OnLoad(sender As Object, e As EventArgs) Handles lbLinks.DataBinding
Dim Link1 = (From a In ods.groups
Where (a.PID = PID_Number)
Select a).ToList
dvLinks = Link1.Text
End Sub
我什至不确定是否应该将代码放在div或lisbox之类的东西后面。我敢肯定,这很简单,我想我现在脑子已经死了。
编辑
我尝试了这个,没有错误,但仍然没有返回任何内容
Private Sub dvLinks_Load(sender As Object, e As EventArgs) Handles dvLinks.Load
Call LoadLinks()
End Sub
Public Function LoadLinks()
Dim Link1 = (From a In ods.groups
Where (a.PID = PID_Number)
Select a).ToList
Return Link1.Count
End Function
您可以循环浏览列表(实际上,因此,您不需要通过“ ToList”导出)。
例如:
Private Sub dvLinks_Load(sender As Object, e As EventArgs) Handles dvLinks.Load
Dim Link1 = From a In ods.groups
Where (a.PID = PID_Number)
Select a
For Each group In Link1
dvLinks.InnerText += group
End For
End Sub
我假设将Group转换为字符串(实际上是通过ToString方法)会返回“有趣”的东西。如果没有,则可以像下面这样访问属性:group.Name
这是为了简单起见,但是就性能而言,不建议一遍又一遍地连接字符串(每次在内存中的不同位置重新创建一个字符串)。最好用LINQ这样写:
Dim Link1 = From a In ods.groups
Where (a.PID = PID_Number)
Select a.ToString()
dvLinks.InnerText = String.Join("<br/>", Link1.ToArray())
(需要一点时间来弄清楚,但不要太费力)。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句