Quantcast
Channel: Visual Basic Tips and Tricks
Viewing all articles
Browse latest Browse all 2212

DataGridView e SuppressKeyPres

$
0
0

Buonasera

Sto cercando di utilizzare il controllo datagridview  come segue:

Grid2 viene caricata da database (lista di articoli)

 

 

rriga = Grid1.RowCount
        Grid1.Rows.Add()
        '    riga = Grid1.RowCountdim
        '  riga +=
        FlagRientro = "1"
        Grid1.Rows(riga - 1).Cells(0).Value = Grid2.Rows(riga_selezionata).Cells(0).Value
        Grid1.Rows(riga - 1).Cells(1).Value = Grid2.Rows(riga_selezionata).Cells(1).Value
        Grid1.Rows(riga - 1).Cells(4).Value = Grid2.Rows(riga_selezionata).Cells(2).Value
        Grid1.Rows(riga - 1).Cells(2).Value = Grid2.Rows(riga_selezionata).Cells(3).Value
        Grid1.Rows(riga - 1).Cells(7).Value = Grid2.Rows(riga_selezionata).Cells(6).Value
        Grid1.Rows(riga - 1).Cells(10).Value = Grid2.Rows(riga_selezionata).Cells(9).Value
        Grid1.CurrentCell = Grid1.Item(3, riga - 1)
        Grid1.Select()
        riga += 1

Tramite grid2 devo inserire qta , iva , sconti, prezzo   perciò devo spostarmi a livello cell .

Il problema che riscontro é che il cursore si posiziona sulla riga successiva.

Utilizzando SuppressKeyPres   dovrei risolvere i problema :

SuppressKeyPres  l'ho messo in keydown  pero non funziona il cursore sul tasto invio

si posiziona sulla riga successiva  al secondo invio esegue keydown 

 Private Sub Grid1_KeyDown(sender As Object, e As KeyEventArgs) Handles Grid1.KeyDown

        If e.KeyCode = Keys.[Return] Then
            If Grid1.CurrentCell.ColumnIndex = Grid1.ColumnCount - 1 Then
                Grid1.CurrentCell = Grid1(0, Grid1.CurrentCell.RowIndex + 1)
            Else
                Grid1.CurrentCell = Grid1(Grid1.CurrentCell.ColumnIndex + 1, Grid1.CurrentCell.RowIndex)
                ' Rriga = Grid1(0, Grid1.CurrentCell.RowIndex)
                ' e.CurrentRow

            End If
            e.SuppressKeyPress = True
           
        End If

Questa soluzione non e corretta perché solo dopo il secondo invio il  suppresskeypress e attivo   

come posso risolvere 

Grazie 

 


Viewing all articles
Browse latest Browse all 2212