Ultimi Howto Abbonati ai Feed Rss degli howto più recenti.

Costanti e gestione stringhe in visual basic 6 lezione 3
Posted by k8 - Articolo di spud---. February 8, 2009, 10:36 am
IProgrammatori.it

Argomenti trattati:
- Le costanti
- La gestione delle stringhe (parte 1)


In vb, oltre alle variabili esise anche un altro tipo di dato, la costante...
Una costante, a differenza della variabile non può cabiare il suo valore all'interno del progetto.

per dichiarare una costante si usa la seguente sintassi
"CONST nome as TIPO = valore"
Quindi se vogliamo dichiarare la costante "num" di tipo "integer" e con valore "3" procederemo così:

Codice:
Const num As Integer = 3


Ricordatevi che non potrete più attribuire a "num" nessun'altro valore.

Passiamo ora alla gestione delle stringhe.

dichiariamo la variabile "nome" di tipo string:

Codice:
Dim nome As String



Da notare che è possibile limitare la grandezza di una variabile stringa
per esempio se facciamo:

Codice:
Dim nome As String * 10


la variabile nome può contenere al massimo 10 caratteri, cosa molto utile per risparmiare
spazio nella RAM

Ora, per assegnere un valore ad una variabile basta fare così:

Codice:
nome="spud---"


In questo caso abbiamo dato a "nome" il valore "spud---"

Per dare a "nome" un valore preso da un textbox, il procedimento è lo stesso:

Codice:
nome=txtnome.text


Ora vediamo come unire più stringhe:
mettiamo che abbiamo due nomi (mome1 e nome2) e vogliamo creare una stringa con scritto: i due nomi
sono (nome1) e (nome2)
Prima di fare questo dobbiamo sapere che il simbolo per unire le stringhe è questo: "&"
Procediamo:

Codice:
stringa="I due nomi sono" & nome1 & "e" & nome2


Da notare che è possibile unire anche stringhe e numeri:
mettiamo il caso che vogliamo scrivere in una stringa un messaggio che ci dica la mia età che è contenuta
in una variabile (età):

Codice:
stringa= "Io ho " & str(età) & " anni"


Ricordiamoci sempre di usare la funzione str() che converte i numeri in stringhe.


Ora mettiamo il caso che abbiamo un programmino che chieda in input il nome di 3 persone ed il relativo
punteggio ad una gara, e ci deve restituire in output un messaggio che ci dica le persone che hanno fatto
più di 100 punti:

Codice:
Private Sub cmdcalcola_Click()
'dichiarazione variabili
Dim nome1 As String
Dim nome2 As String
Dim nome3 As String
Dim messaggio As String
Dim p1 As Integer
Dim p2 As Integer
Dim p3 As Integer

'assegnazione valori alle variabili
nome1 = txtnome1.Text
nome2 = txtnome2.Text
nome3 = txtnome3.Text
p1 = Val(txtp1.Text)
p2 = Val(txtp2.Text)
p3 = Val(txtp3.Text)
mess = "I concorrenti con più di 100 punti sono "

'verifica i concorrenti con + di 100 punti e li aggiunge alla variabile mess
If p1 < 100 And p2 < 100 And p3 < 100 Then
    MsgBox "Nessun concorrente ha totalizzato più di 100 punti", , "MESSAGGIO"
Else
    If p1 >= 100 Then
        mess = mess & nome1 & " "
    End If
    If p2 >= 100 Then
        mess = mess & nome2 & " "
    End If
    If p3 >= 100 Then
        mess = mess & nome3
    End If
    MsgBox mess, , "messaggio"
End If
   
End Sub



Credo che in questo programma non ci sia molto da spiegare...
nella prima parte ho dichiarato le variabili
nella seconda ho assegnato i valori alle variabili
e nella terza parte ho controllato i punteggi maggiori di cento ed ho aggiunto i rispettivi nomi alla
variabile "mess", che alla fine ho messo in un msgbox.


Condividi
Stats
Voti 0
Voto medio 0
Visite 1118
Visite uniche 939
Num.Download 0
DownloadNon disponibile.
Spazio Visitatori
Prima di inviare il tuo commento assicurati che:
  • sia in tema con l'articolo e contribuisca alla discussione in corso
  • non abbia contenuti offensivi nei confronti di chicchessia
  • non abbia contenuti che violini le leggi italiane
  • non contenga indirizzi e-mail
Vota Pessimo 1 / 5 Migliorabile 2 / 5 Buono 3 / 5 Interessante 4 / 5 Speciale 5 / 5
Non ci sono commenti.
Tag Cloudstringhe × gestione × vb6 × Costanti ×

Advertisement

Iprogrammatori.it
| I contenuti di questo sito sono rilasciati sotto Licenza Creative Commons |