+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 4 su 4

scrivere sull'ultima riga di flexgrid

  1. #1
    L'avatar di piratabobo
    piratabobo non è in linea Scolaretto
    Post
    215
    Like Inviati  
    0
    Like Ricevuti  
    0
    Salve a tutti

    nel scrivere un mio progettino sto trovando difficolta nell'utilizzo della MSFlexGrid ed in particolar modo nell'inserimento dei dati, o meglio io ho un form che contiene tre textbox un commandbutton e una MSFlexGrid con tre colonne e una riga fissa, compilando le tre textbox e cliccando sul command dovrei compilare la mia MSFlexGrid, in realtà e quello che accade solo che con il codice sotto postato mi rimane sempre una riga vuota all'inizio cosa che non dovrebbe accadere, ma non so come risolvere il problema. Spero di essere stato abbastanza chiaro, questo e il codice che sto utilizzando:

    Dim NR
    
    frm_armatura.grid_tral.AddItem ""
    
    NR = frm_armatura.grid_tral.Rows
    
    frm_armatura.grid_tral.TextMatrix(NR - 1, 0) = txt_X.Text
    frm_armatura.grid_tral.TextMatrix(NR - 1, 1) = txt_Y.Text
    frm_armatura.grid_tral.TextMatrix(NR - 1, 2) = txt_lung.Text
    

  2. #2
    L'avatar di Brontolo
    Brontolo non è in linea Very Important Person
    Post
    3,135
    Like Inviati  
    5
    Like Ricevuti  
    5
    Ciao,
    non specifichi quante righe ha in partenza la flexgrid. Probabilmente 2, cioè una oltre a quella fissa. Se è così, quando esegui il metodo AddItem ne aggiungi un'altra ancora, lasciando vuota la precedente.
    In pratica dovresti impostare Rows=1 all'inizio.


  3. #3
    L'avatar di piratabobo
    piratabobo non è in linea Scolaretto
    Post
    215
    Like Inviati  
    0
    Like Ricevuti  
    0
    si hai perfettamente ragione, infatti in partenza nella flexgrid ho 2 righe, 1 fissa e 1 vuota, me il problema nasce dal fatto che avendo una riga fissa non posso settare Rows = 1 in quando VB mi da il messaggio che "il valore della proprietà FixedRows deve essere inferiore di almeno un'unaità a quello della proprietà Rows, quindi o tolgo la riga fissa "ma mi serve e pertanto non posso toglierla" o non so cosa fare.

  4. #4
    L'avatar di Brontolo
    Brontolo non è in linea Very Important Person
    Post
    3,135
    Like Inviati  
    5
    Like Ricevuti  
    5
    non posso settare Rows = 1 in quando VB mi da il messaggio che "il valore della proprietà FixedRows deve essere inferiore di almeno un'unaità a quello della proprietà Rows
    Questo accade solo se le imposti a run-time, non se le imposti dalla finestra delle proprietà.
    In alternativa puoi fare una piccola modifica al tuo codice eseguendo il metodo AddItem solo se .Rows > 2.



    Edit: Mi correggo: anche a run time si può fare, purché si imposti prima .FixedRows e poi .Rows

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Copia e incolla valori sull’ultima riga vuota
    Da AlexM29 nel forum Microsoft Excel
    Risposte: 2
    Ultimo Post: 29-12-2020, 06:25
  2. Msflexgrid e scroll sull'ultima colonna
    Da BrunoX2 nel forum Visual Basic 6
    Risposte: 9
    Ultimo Post: 29-06-2011, 09:34
  3. Scrivere dati direttamente su FlexGrid
    Da ceklo nel forum Visual Basic 6
    Risposte: 2
    Ultimo Post: 16-04-2009, 16:38
  4. scrivere in una cella flexgrid
    Da giuseppe88 nel forum Visual Basic 6
    Risposte: 11
    Ultimo Post: 01-11-2008, 14:54