Differenze tra le versioni di "Convertire in stringa senza funzioni il contenuto di una variabile non di tipo Stringa"

Da Gambas-it.org - Wikipedia.
Riga 12: Riga 12:
 
   i = 4
 
   i = 4
 
   
 
   
  <FONT color=#006400>' ''La funzione "Asc()" vuole una stringa. La variabile "i",''
+
  <FONT color=gray>' ''La funzione "Asc()" vuole una stringa. La variabile "i",''
 
  ' ''essendo di tipo Integer, sarebbe rifiutata. Ponendola fra due coppie di virgolette e''
 
  ' ''essendo di tipo Integer, sarebbe rifiutata. Ponendola fra due coppie di virgolette e''
 
  ' ''due caratteri "&", essa viene accettata, ed il suo contenuto viene elaborato:</font>
 
  ' ''due caratteri "&", essa viene accettata, ed il suo contenuto viene elaborato:</font>
Riga 27: Riga 27:
 
   i = 4
 
   i = 4
 
   
 
   
  <FONT color=#006400>' ''Anche in questo caso la funzione "IsInteger()" vuole una stringa;
+
  <FONT color=gray>' ''Anche in questo caso la funzione "IsInteger()" vuole una stringa;
 
  ' ''e, posta la variabile nel modo descritto, il valore contenuto viene accettato:</font>
 
  ' ''e, posta la variabile nel modo descritto, il valore contenuto viene accettato:</font>
 
   Print IsInteger("" & i & "")
 
   Print IsInteger("" & i & "")
 
   
 
   
 
  '''End'''
 
  '''End'''

Versione delle 18:29, 14 lug 2015

Come è noto, la conversione in Stringa di un valore non di tipo Stringa può essere effettuata con le funzioni CStr() e Str().

E' possibile - senza utilizzare le predette funzioni - convertire in stringa il valore contenuto all'interno di una variabile non di tipo Stringa mediante il posizionamento di tale variabile tra due coppie di virgolette e due caratteri &:

stringa = "" & variabile_non_Stringa & ""


Esempio:

Public Sub Main()

 Dim i as Integer

  i = 4

' La funzione "Asc()" vuole una stringa. La variabile "i",
' essendo di tipo Integer, sarebbe rifiutata. Ponendola fra due coppie di virgolette e
' due caratteri "&", essa viene accettata, ed il suo contenuto viene elaborato:
  Print Asc("" & i & "")

End


Altro esempio:

Public Sub Main()

 Dim i as Integer

  i = 4

' Anche in questo caso la funzione "IsInteger()" vuole una stringa;
' e, posta la variabile nel modo descritto, il valore contenuto viene accettato:
  Print IsInteger("" & i & "")

End