Ricerca…


Sintassi

  • CBool ​​(espressione)
  • CByte (espressione)
  • CChar (espressione)
  • CDate (espressione)
  • CDbl (espressione)
  • CDec (espressione)
  • CInt (espressione)
  • CLng (espressione)
  • CObj (espressione)
  • CSByte (espressione)
  • CShort (espressione)
  • CSng (espressione)
  • CStr (espressione)
  • CUInt (espressione)
  • CULng (espressione)
  • CUShort (espressione)

Parametri

Nome della funzione Intervallo per argomento Espressione
CBool Qualsiasi carattere Char o stringa o espressione numerica valida
CByte Da 0 a 255 (senza segno); le parti frazionarie sono arrotondate.
CChar Qualsiasi espressione Char o String valida; viene convertito solo il primo carattere di una stringa; il valore può essere compreso tra 0 e 65535 (senza segno).

Conversione del testo di Textbox in un numero intero

Da MSDN

Utilizzare la funzione CInt per fornire conversioni da qualsiasi altro tipo di dati a un sottotipo Integer. Ad esempio, CInt forza l'aritmetica dei numeri interi quando si verifica normalmente l'aritmetica di valuta, precisione singola o doppia precisione.

Supponendo che tu abbia 1 pulsante e 2 caselle di testo. Se scrivi su textbox1.text 5.5 e su textbox2.text 10 .

Se hai questo codice:

Dim result = textbox1.text + textbox2.text
MsgBox("Result: " & result)
'It will output
5.510

Per aggiungere i valori delle 2 caselle di testo devi convertire i loro valori in Int usando la CInt(expression) .

Dim result = CInt(textbox1.text) + CInt(textbox2.text)
MsgBox("Result: " & result)
'It will output
16

Nota: quando la parte frazionaria di un valore è esattamente 0.5, la funzione CInt arrotonda al numero pari più vicino. Ad esempio, da 0,5 a 0 , da 1,5 a 2 e da 3,5 a 4 . Lo scopo di arrotondare al numero pari più vicino è compensare una distorsione che potrebbe accumularsi quando molti numeri vengono aggiunti insieme.



Modified text is an extract of the original Stack Overflow Documentation
Autorizzato sotto CC BY-SA 3.0
Non affiliato con Stack Overflow