Cari utenti, avrei un piccolo quesito:
In un programma che sto facendo, ho dei 156 command button, tutte sotto contatore e purtroppo se sbaglio, non posso correggere.
C'è qualche modo per fare in modo di mettere un tasto per annullare l'azione?
Se clicco il tasto e diventa 5, come faccio a farlo tornare a 4?
Per la cronaca, questo è la pagina principale del programma
Le command non sono sotto array di controlli!!
Dovrai semplicemente memorizzare tutti i valori iniziali, per poterli ripristinare quando annuli.
Ma c'è qualche tasto? e soprattutto come faccio a memorizzare?
Potresti farmi qualche esempio?
Scusa, ma non conosco tutte le funzioni di vb6
Crei una variabile a livello di Form (nelle Dichiarazioni) per ogni valore che devi poter annullare:
e così via,codice:Dim s1 As String Dim s2 As String
Poi le inizializzi con i valori che ti iniziali:
quando premi annulla, le riporti al valore iniziale:codice:s1 = command1.caption s2 = command2.Caption
codice:command1.caption = s1 command2.caption = s2
Come è che incrementi il contatore quando clicchi su un Button? Non potresti verificare se al click è premuto il tasto destro invece del sinistro ed in tal caso sottrarre invece che aggiungere?
Se io clicco con il tasto destro sul controllo (nel form) mi fa apparire la tendina per taglia, copia e incolla. Come faccio a generare l'evento "Click col tasto destro"?Originariamente inviato da eziogsv
Come è che incrementi il contatore quando clicchi su un Button? Non potresti verificare se al click è premuto il tasto destro invece del sinistro ed in tal caso sottrarre invece che aggiungere?
Non hai detto come incrementi i valori... ...
Probabilmente in un evento Mouse_Down relativo ai vari Buttons incrementi ogni volta che premi.
Se è così e nell' evento scrivi:
If Button = vbRightButton Then....
decrementi
else
incrementi
End If
dovrebbe fungere. Vado a memoria per il codice, non ho VB6 installato da anni.
Ok. Domani provo e ti farò sapere. Grazie per il tempo che mi hai concessoOriginariamente inviato da eziogsv
Non ha detto come incrementi i valori... ...
Probabilmente in un evento Mouse_Down relativo ai vari Buttons incrementi ogni volta che premi.
Se è così e nell' evento scrivi:
If Button = vbRightButton Then....
decrementi
else
incrementi
End If
dovrebbe fungere. Vado a memoria per il codice, non ho VB6 installato da anni.
Va perfettamente!! Grazie!!Originariamente inviato da tomazek
Ok. Domani provo e ti farò sapere. Grazie per il tempo che mi hai concesso
Prego! Ma... toglimi una curiosità: sei Tomazek1992???
Permessi di invio
Rispondi quotando