Private Sub dgv_EditingControlShowing(sender As Object, _
        e As System.Windows.Forms.DataGridViewEditingControlShowingEventArgs) _
        Handles dgv.EditingControlShowing
 
        If TypeOf e.Control Is TextBox AndAlso _
            e.CellStyle.WrapMode = DataGridViewTriState.True Then
 
            Dim textBox As TextBox = DirectCast(e.Control, TextBox)
            textBox.ScrollBars = ScrollBars.Both
        End If
 
    End Sub