小编fra*_*kie的帖子

我有一些工作代码从数据库中检索数据.我有兴趣为我的解决方案获得更好的代码.有没有办法将两个查询组合成一个或类似的东西？

Dim customerTitlesAndIDs = contex.CustomerTable.Select(Function(row) New
                           With {.ID = row.ID, .CustomerTitle = row.Title}).ToList()

Dim cutomerIdPayment = contex.CustomerPayments.Select(Function(table) New 
                       With
                       {
                           .ID = table.CustomerID,
                           .Range = table.PaymentsRange,
                           .Values = table.Values
                       }).ToList()

Dim customerInfos As New List(Of SCustomerInfo)

For Each customer In customerTitlesAndIDs

    Dim cID As Integer = customer.ID
    customerInfo.Add(New SCustomerInfo(CreateCustomerTable(), cID, customer.CustomerTitle))

    For Each cutomerPayments In cutomerIdPayment

        If cutomerPayments.ID = cID Then
            Dim rangeValue(1) As Object
            rangeValue(0) = cutomerPayments.Range
            rangeValue(1) = cutomerPayments.Values
            Dim dtRow As DataRow = customerInfos.Last().PaymentTable.NewRow()
            dtRow.ItemArray = rangeValue …

有这样的情况。有两个列表：list1asList(of Integer)和list2as List(of Integer)。

我需要删除 list1 中与 list2 的项目相同的所有项目。

例如：

list1 = 0, 1, 2, 3, 6, 10
list2 = 3, 6

从 list1 中删除 list2 后list1 = 0, 1, 2, 10：

实际上,我的问题是在标题中.我使用着色器和缓冲区的"现代opengl"方法,我想知道是否存在任何方式在一个四边形的两侧获得不同的颜色.

期望的结果(背面和正面)