异步更新

  Sub InsertGridViewRow(ByVal picIndex As String, ByVal tableName As String, ByVal status As String)

        If InvokeRequired Then
            Me.Invoke(New InsertGridViewRowDelegate(AddressOf InsertGridViewRow), picIndex, tableName, status)
            Return
        End If

        If picIndex = "1" Then
            tjdrDgvStatus.Rows.Add(ECMis.My.Resources.zt_1, tableName, status)
        ElseIf picIndex = "2" Then
            tjdrDgvStatus.Rows.Add(ECMis.My.Resources.zt_2, tableName, status)
        ElseIf picIndex = "3" Then
            tjdrDgvStatus.Rows.Add(ECMis.My.Resources.zt_3, tableName, status)
        End If

        If tjdrPrb.Value + 1 <= tjdrPrb.Maximum Then
            tjdrPrb.Value = tjdrPrb.Value + 1
        End If

    End Sub

原文地址:https://www.cnblogs.com/twilight/p/1313169.html