Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - convalida
Forum - Visual Basic 6 - convalida

Avatar
mash_mash (Normal User)
Expert


Messaggi: 230
Iscritto: 25/07/2007

Segnala al moderatore
Postato alle 16:26
Venerdì, 05/10/2007
ciao ragazzi , rieccomi.
questa volta ho seguito i consigli precedentemente e giustamente fattomi osservare , quindi vi espongo il mio problema :
ho 3 text box che chiamero 1 ,2 ed 1 commanbutton.
sub commandbutton1_click()
print textbox1.text
print textbox2.text
etxtbox1.text = ""
textbox2.text=""
end sub
'
'codice iniziale :
if isnumeric(textbox1.text) then
textbox2.enabled = true  'inizialmente e' false
endif
'
'
a questo punto sorge il problema :
quando mi viene attivata la textbox2 la textbox1 e' ancora soggetta a modifiche , qundi prima che dgt il cmd1 posso andare a variare la textbox1 , ed e' proprio quello che non voglio venga fatto.
beh , tanto che ci siamo poi dovrebbe valere lo stesso discorso per la textbox2.
ho provato con la funzione afterupdate, exit, ma mi fanno scomparire il testo.

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 16:46
Venerdì, 05/10/2007
Non ho capito bene il tuo problema ma proverò a risolverlo.
Adesso vado un pò di fretta quindi ti posto velcemente questo codice di esempio che poi devi modificare e sfruttare x raggiungere il tuo scopo.
Ti avviso che non so se è quello che intendi tu:
allora prima di tutto inserisci 2 timer con un intervallo di 3 secondi ciascuno quindi dovrai scrivere 3000.
poi inserisci queso nel codice:
Codice sorgente - presumibilmente VB.NET

  1. Private Sub Command1_Click()
  2. Text1.Text = ""
  3. Text2.Text = ""
  4. End Sub
  5.  
  6. Private Sub Form_Load()
  7. Text2.Enabled = False
  8. End Sub
  9.  
  10. Private Sub Timer1_Timer()
  11. If Text1.Text <> "" Then
  12. Text2.Enabled = True
  13. Text1.Enabled = False
  14. End If
  15. End Sub
  16.  
  17. Private Sub Timer2_Timer()
  18. If Text2.Text <> "" Then
  19. Text1.Enabled = True
  20. Text2.Enabled = False
  21. End If
  22. End Sub



Spero di esserti stato utile anche se credo che non sia questo il tuo problema, quindi se non è questo cerca di spiegarti meglio.
Ciao!

PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 14:53
Sabato, 06/10/2007
metti di partenza text2.enabled = false
poi nel text1.change metti
if not text1.text = "" then
text2.enabled = true
else
text2.enabled = false
text2.text = ""
endif

PM Quote
Avatar
mash_mash (Normal User)
Expert


Messaggi: 230
Iscritto: 25/07/2007

Segnala al moderatore
Postato alle 12:52
Lunedì, 08/10/2007
grazie ragazi per le risposte (mi sono state utilissime) , ma penso di essermi spiegato male , e a tal proposito vi faccio un altro esempio :
in una textbox imserendo un valore numerico (isNumeric) , la textbox2 diventa enabled = true (e fino a qua ci siamo).
A questo punto , quando cioe' la textbox2 e' attiva , vorrei che la textbox1 diventasse : enabled = false , ma che il testo numerico inseriro precedentemente non mi venga cancellato.
-
Ho provato anche con textbox1.locked = true nell'evento change della textbox2 , ma il testo della textbox1 mi viene cancellato .
Perche' ?

PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 14:16
Lunedì, 08/10/2007
if not text1.text = "" then
text2.enabled = true
else
text2.enabled = false
endif

PM Quote