On 19.2.2006 15:13, "Lucio Liberi" <lucioing at tin dot it> wrote:
Ciao,
devi rendere la cella editabile con:
Tabella.CellType(i,j)=3 //dove i e j sono le coordinate della cella.
Poi puoi gestire l'evento.
Per esempio:
il seguente codice l'ho messo nell'evento CellKeyDown
dim Tasto as integer
Tasto=asc(key)
if tasto = 13 then
me.editcell(row+1,2)
else
JustKeyDown(tasto, row, column)
end if
In questo modo si sposta di una cella in giù.
Dovrebbe funzionare. Dico dovrebbe perché la tabella mi funziona di sicuro
come quella di excel, però è passato qualche anno e spero di avere riportato
il pezzo di codice giusto.
Ciao.
maurizio
> Salve a tutti.
>
> Se mettete una ListBox in una finestra e la riempite con un po' di
> righe, tipo:
>
>
> Dim i As Integer
>
> for i=0 to 3
> ListBox1.AddRow ""
> ListBox1.ColumnAlignment(i)=2
> next
>
> Quando poi ci fate click sopra, lui vi seleziona l'intera riga.
> Domanda:
>
> Come faccio a fargli selezionare SOLO la cella in cui faccio click
> sopra?
> Tenete presente che se stampo sotto
> CellClick()
>
> IndexText.Text=str(row)+", "+str(column)
>
> lui, mi restituisce i valori giusti.
>
> Pero' gradirei mi 'evidenziasse' SOLO la cella sulla quale faccio click.
>
> Bene, io non ci sono riuscito... E chiedo aiuto a voi.
>
> Grazie
>
>
> Lucio
|