請問能動態創建List(of t) select() expression運算式
即：dim result = list(of t).select(function(p) {p.name,p.age,p.sex}).tolist
紅色字體的能使用變數嗎？function(p) p.name是可以使用的，但不會使用陣列的
uj5u.com熱心網友回復：
需要使用反射uj5u.com熱心網友回復：
可以的。雖然我沒玩過vb.net但是東西基本是一致的。
我用C#代碼，展示一下。
重點還是對于 Func委托的運用。
uj5u.com熱心網友回復：
如果很多地方都要用，那可以把Test改成泛型uj5u.com熱心網友回復：
謝謝你的回復，初學看不太明白。
請問這個selector 要怎樣才能得到呢？
我最終的目的是想從一個很多欄位的類中根據需要提取其中的幾列資料在Datatable中顯示出來
uj5u.com熱心網友回復：
這個selector九十你的function(p)
但是需要一個委托來封裝。
具體的vb.net語法我不清楚。但是肯定有。
uj5u.com熱心網友回復：
能否用C#寫個例子出來，我可以轉換成VB.NET語法的
網上找到的：但是出來的所有欄位，不是我想要幾個欄位
Public Function CreateSelecter(Of TSource, TResult)(ByVal fieldNames() As String) As Expression(Of Func(Of TSource, TResult))
Dim param As ParameterExpression = Expression.Parameter(GetType(TSource), "p")
Dim NewTReslut = Expression.[New](GetType(TResult))
Dim bindingList As New List(Of MemberBinding)
For Each fieldName As String In fieldNames
Dim Propertyinfo As PropertyInfo = GetType(TSource).GetProperty(fieldName)
Dim Expr As MemberExpression = Expression.PropertyOrField(param, fieldName)
Dim m As MemberAssignment = Expression.Bind(Propertyinfo, Expr)
bindingList.Add(m)
Next
Dim MemberInit As MemberInitExpression = Expression.MemberInit(NewTReslut, bindingList)
Dim selector As Expression(Of Func(Of TSource, TResult)) = CType(Expression.Lambda(MemberInit, param), Expression(Of Func(Of TSource, TResult)))
Return selector
End Function
uj5u.com熱心網友回復：
http://www.chinaoc.com.cn/p/1303571.htmluj5u.com熱心網友回復：
你要不就等有緣人，幫你翻譯一下我上面的C#代碼吧。
我不太會vb.net。對著寫太吃力。
uj5u.com熱心網友回復：
你最上面的代碼能看懂，其它問題的關鍵在于如何動態構建selector運算式。
我貼出的代碼參考的是C#代碼：http://www.tnblog.net/aojiancc2/article/details/2346
是可以動態生成SELECTOR運算式的。但是需要一個物體類TResult。那么問題來了，如何我在代碼已經創建了物體類TResult我又何必動態創建呢，直接new 一個就行。我想要的是原來的物體類中幾個欄位，不要TResult。
你在https://bbs.csdn.net/topics/392403424這個帖子中回復也是缺少完整的事例，本人愚鈍理解不了，能否以C#代碼寫一個簡單事例出來。謝謝你。
uj5u.com熱心網友回復：
public static void Main(string[] args)
{
var q = Test(x => new User{ID=x.ID,Name = x.Name });
Console.ReadLine();
}
public static IEnumerable<User> Test(Func<User, User> selector)
{
return myList.Select(selector);
}
public class User
{
public int ID { get; set; }
public string Name { get; set; }
public int Age { get; set; }
public bool? IsChild { get; set; }
}
uj5u.com熱心網友回復：
簡單地翻譯了一下版主大人的代碼,但是我覺得完全沒有GET到樓主的意思.
Public Class student
Public name As String
Public sex As String
Public age As Integer
End Class
Public 二年一班 As New List(Of student)
Public Function 學生選擇器(運算式 As Func(Of student, student)) As IEnumerable(Of student)
Return 二年一班.Select(運算式)
End Function
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim p1 = New student With {.name = "張三", .age = 8, .sex = "男"}
Dim p2 = New student With {.name = "李四", .age = 9, .sex = "女"}
Dim p3 = New student With {.name = "王五", .age = 8, .sex = "男"}
Dim p4 = New student With {.name = "趙六", .age = 7, .sex = "女"}
二年一班.Add(p1)
二年一班.Add(p2)
二年一班.Add(p3)
二年一班.Add(p4)
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim selected = 學生選擇器(Function(s)
Return New student With {.name = s.name, .sex = s.sex}
End Function).ToList
End Sub
uj5u.com熱心網友回復：
只是用了簡單的包裝,吧 expression運算式 作為了一個變數,換了個地方參考.
樓主應該是要動態組裝expression運算式,就是不能寫死在程式里.
var q = Test(x => new User{ID=x.ID,Name = x.Name });
樓主應該要表達的意思是這樣的吧:
var q = Test("ID,Name");
uj5u.com熱心網友回復：
你說得太對了。
我就是這個意思。
類似DATATABLE中的選擇其中幾列構成新的DATATABLE
newdt=dt.DefaultView.ToTable(False, {"column1","column2","column3"})
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/52391.html
標籤：VB.NET