Question

我目前正在使用带有=SUMPRODUCT(--(COUNTIF(B2:B16,A2:A23)>0),--(COUNTIF(C2:C19,A2:A23)>0))后端的vb.net窗体。我有一个具有多个Datagridviews的Windows窗体，我需要遍历所有行项目并对每一行运行sql检查。我的代码很长，需要我一遍又一遍地复制和粘贴代码，这个代码已经推送了1.2k行代码，所以我想保持简短。考虑到每个DGV都有一个特定的名称，我想知道我是否可以生成一个字符串列表来循环或以某种方式使用窗格。这是我到目前为止的代码：

SQL

在此示例中，DGV1将在多个DGV名称之间切换，并且根据我的方式，代码变量1也可能会发生变化。问题是如何将DGV改为我需要的不同名称。否则，我将不得不复制并粘贴此代码8次。

Answer 1

因为您知道Datagridviews的名称

Dim DGVNames as string() = {"DGV1", "DGV2", "DGV3","Names of datagridviews"}

For Each DGVN As String In DGVNames
    Dim DGV As DataGridView = CType(Me.Controls(DGVN), DataGridView)
    rest of your code goes here........
Next

循环遍历多个DGVS并在每个vb.net中运行循环

1 个答案: