Visual Basic

Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint
    If PictureBox1.Image IsNot Nothing Then
        Dim g As Graphics = e.Graphics
        g.DrawImage(PictureBox1.Image, PictureBox1.Width - PictureBox1.Image.Width, 0)
    End If
End Sub

Public Delegate Sub CopyDelegate(ByVal e As CopyEventArgs)

Public Sub UpdateGui(ByVal e As CopyEventArgs)
    If InvokeRequired Then
        Dim dlg As New CopyDelegate(AddressOf UpdateGui)
        BeginInvoke(dlg, New Object() {e.arg1, e.arg2})
    Else
        ' put everything to happen on the GUI here
        DataGridView.DataSource = MyGUIThreadDataSet
    End If
End Sub

BeginInvoke(dlg, New Object() {e.arg1, e.arg2})

BeginInvoke(dlg, New Object() {e})

If DataGridView1.InvokeRequired Then
...
'And instead of BeginInvoke
DataGridView1.BeginInvoke(...)

daveauld wrote:

Anyway, you MUPPET!

If e.KeyChar = Keys.Enter Then
  If Me.C1grid.Col = 5 Then
      Me.C1grid.Columns("IsOut").Value = CInt(Not CBool(Me.C1grid.Columns("IsOut").Value)) * -1
      Me.C1grid.Columns("IsIn").Value = CInt(Not CBool(Me.C1grid.Columns("IsIn").Value)) * -1
  End If
End If

C1grid.Item("IsOut", row_num).Value = Not C1grid.Item("IsOut", row_num).Value