Autore Topic: Sono alle prime armi  (Letto 810 volte)

Offline zerbo3

  • Gamberetto
  • *
  • Post: 1
    • Mostra profilo
Sono alle prime armi
« il: 26 Gennaio 2013, 17:38:38 »
Buon giorno vorrei sapere come faccio a fare in modo che scrivendo su textbox un numero e cliccando su un pulsante gia' fatto mi dia unvalore es 5010
miprovo spiegare meglio,scrivendo 1 sulla stringa textbox e cliccando sul pulsante mi dia 5010..grazie ...scusate Gambas2
« Ultima modifica: 26 Gennaio 2013, 17:45:53 da zerbo3 »

Offline vuott

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 11.724
  • Ne mors quidem nos iunget
    • Mostra profilo
Re: Sono alle prime armi
« Risposta #1 il: 26 Gennaio 2013, 18:42:53 »
Buon giorno vorrei sapere come faccio a fare in modo che scrivendo su textbox un numero e cliccando su un pulsante gia' fatto mi dia unvalore es 5010
miprovo spiegare meglio,scrivendo 1 sulla stringa textbox e cliccando sul pulsante mi dia 5010..grazie ...scusate Gambas2
..facendo la ricerca in questo Forum avresti certamente trovato le necessarie informazioni, già presenti, per risolvere la questione. Ti suggerisco inoltre di scaricare il manuale di base su Gambas (puoi trovare il collegamento sempre facendo la ricerca nel forum).

Ad ogni modo, per risolvere il problema da te sollevato (poniamo che il Button si chiami Button1 e che l'oggetto TextBox si chiami TextBox1, nel quale dopo aver lanciato il programma, inseriremo il valore 1):
Codice: gambas [Seleziona]

Public Sub Button1_Click()

' Quando si clicca sul "Button" il testo presente nella "TextBox"
' sarà uguale a:  se stesso (cioè 1)  + 5009:
  TextBox1.Text = TextBox1.Text + 5009

End

Il risultato è 5010.


Però penso che sia ancor più corretto così:
    
Codice: gambas [Seleziona]

' Converto il carattere numerico di tipo "stringa" in un valore "numerico";
' quindi effettuo l'addizione (appunto fra due valori numerici).
' Infine converto il risultato in un valore di tipo "Stringa",
' dato che la proprietà ".Text" 'prevede' un valore di tipo "String":
   TextBox1.Text = CStr(Val(TextBox1.Text) + 5009)

...ma è una sottigliezza.

     :-X
« Ultima modifica: 28 Gennaio 2013, 16:15:49 da vuott »
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »

Offline Michy9393

  • Gran Maestro dei Gamberi
  • *****
  • Post: 570
  • Ubuntu: Linux for Human Beings
    • Mostra profilo
Re: Sono alle prime armi
« Risposta #2 il: 29 Gennaio 2013, 16:21:27 »
txtbox.text = val(txtbox.text) + 5009

fine  ;)

Offline fsurfing

  • Moderatore
  • Senatore Gambero
  • *****
  • Post: 2.482
    • Mostra profilo
Re: Sono alle prime armi
« Risposta #3 il: 29 Gennaio 2013, 22:18:54 »
Codice: [Seleziona]
textbox1.text +=5009
anche questo è carino....... se non si inseriscono lettere :)

Offline vuott

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 11.724
  • Ne mors quidem nos iunget
    • Mostra profilo
Re: Sono alle prime armi
« Risposta #4 il: 29 Gennaio 2013, 23:10:09 »
Codice: [Seleziona]
textbox1.text +=5009
anche questo è carino....... se non si inseriscono lettere :)

Sì, anche migliore.   :)
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »