vb.net - 循环遍历 vb.net 中的通用列表

Question

在我的 VB.net 应用程序中，我正在填充我的客户对象并循环遍历它，如下所示。

由于有成千上万的客户，我想一次做 500 个客户。

无论如何，我是否可以再使用一个 For 循环来在 vB.net 中一次性处理 500 个客户

我没有使用 LinQ，因为数据库是 Oracle。

有什么像

谢谢

Dim customerList as new List(of customer)
Dim Customer as new Customer

Try
CustomerList=dataAccess.GetAllCustomers()

if not CustomerList is nothing then

   For each Customer in CustomerList
       BuildXML(custmer.Name,Customer.age,Customer.city)
   next
       ProcessXMLWS(strxml)
end if

Catch ex as exception
   LogError(ex.message)
End try

Answer 1

您可以循环遍历 500 个 Customer 的块像这样的对象:

For i As Integer = 0 To CustomerList.Count Step 500
    'Do things
Next

然而，这对你没有任何好处。
您的代码正在使用每个 Customer单独的对象，因此您无法一次处理 500 个。

编辑 :

如果您的意思是只想处理前 500 个 Customer对象，试试这个:

For i As Integer = 0 To Math.Min(500, CustomerList.Count)
    Set Customer = CustomerList(i)

    BuildXML(custmer.Name, Customer.age, Customer.city)
Next

顺便说一句，你不应该写 Dim Customer As New Customer - 通过添加 New关键字，您创建一个额外的 Customer你从不使用的实例。相反，写 Dim Customer As Customer声明变量而不创建新 Customer实例。

此外，您可以使用 VB 的 IsNot If 语句中的关键字，如下所示:

If CustomerList IsNot Nothing Then