Pagina 2 di 2 primaprima 1 2
Visualizzazione dei risultati da 11 a 17 su 17
  1. #11
    Gent.mo Oregon,
    perfetto va bene ed approfitto della cortesia per migliorare se è possibile.
    La frecceta allo scorrimento in giù si ferma all'ultima riga vuota del Datagrid, si potrebbe far si che si ferma sull'ultima voce inserita?
    Considerando che le voci inserite sono 70, si potrebbe inserire un MSGBOX che avvisa "Prima Voce e Ultima voce?".
    Ringrazio della disponibilità, auguro buona giornata e saluto.
    Domenico.

  2. #12
    Gent.mo Oregon,
    faccio seguito alla precedente che ho risolto il problema della freccetta in giù modificando il codice da -1 a -2
    Rimane solo i MSGBOX se è fattibile.
    Grazie
    Domenico.

  3. #13
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,343
    Dovresti riuscirci da solo se ti impegni un po'
    No MP tecnici (non rispondo nemmeno!), usa il forum.

  4. #14
    Gent.mo Oregon,

    ringrazio ho risolto anche questo problema.
    Alla prossima.
    Buon pomeriggio, saluto anche a Patel

    Domenico.

  5. #15
    Pacifico, posta il codice così potresti aiutare qualche altro forumista che dovesse avere lo stesso problema

  6. #16
    Gent.mo Oregon,

    riporto i codici completi compreso anche la colorazione dei button

    per sù:
    codice:
    Dim msg = "Primo nominativo"
    Dim titolo = "          Nominativo"
    Dim ni As Integer = DataGridView1.CurrentRow.Index
            Button2.BackColor = Color.Aquamarine
            If ni > 1 Then
                DataGridView1.CurrentCell = DataGridView1.Rows(ni - 1).Cells(0)
            End If
            If ni = 1 Then
                DataGridView1.CurrentCell = DataGridView1.Rows(ni - 1).Cells(0)
                MsgBox(msg, MsgBoxStyle.Information, (titolo))
                Button1.BackColor = Color.Red
            End If
    per giù:
    codice:
    Dim msg = "Ultimo nominativo"
    Dim titolo = "               Nominativo"
    Dim ni As Integer = DataGridView1.CurrentRow.Index
            Button1.BackColor = Color.Aquamarine
            If ni < DataGridView1.Rows.Count - 2 Then
                DataGridView1.CurrentCell = DataGridView1.Rows(ni + 1).Cells(0)
            End If
            If ni = DataGridView1.Rows.Count - 3 Then
                DataGridView1.CurrentCell = DataGridView1.Rows(ni + 1).Cells(0)
                MsgBox(msg, MsgBoxStyle.Information, (titolo))
                Button2.BackColor = Color.Red
            End If
    Grazie
    Domenico
    Ultima modifica di alka; 23-10-2019 a 20:53 Motivo: Formattato il codice sorgente

  7. #17
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,343
    Quote Originariamente inviata da Pacifico437 Visualizza il messaggio
    Gent.mo Oregon,
    Te lo ha chiesto optime...

    Comunque non hai messo bene i codici CODE
    No MP tecnici (non rispondo nemmeno!), usa il forum.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2020 vBulletin Solutions, Inc. All rights reserved.