Public Class Form1
 
   Private tb As TextBox = Nothing
 
   Private Sub DataGridView1_EditingControlShowing(ByVal sender As _
     System.Object, ByVal e As _
     System.Windows.Forms.DataGridViewEditingControlShowingEventArgs) Handles _
     DataGridView1.EditingControlShowing
      tb = DirectCast(e.Control, TextBox)
      AddHandler tb.KeyUp, AddressOf TBKeyUp
   End Sub
 
   Private Sub TBKeyUp(ByVal sender As Object, ByVal e As _
     System.Windows.Forms.KeyEventArgs)
      Me.DataGridView1.CurrentRow.Cells("Column2").Value = _
      tb.Text.Length.ToString
   End Sub
End Class

Gru?
---------------------------------------------------
Snoopy sagt - vb@rchiv find ich gut...
Schon gesehen? OSMMapViewer V2 Control