Recherche…


Syntaxe

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

Paramètres

Nom de la fonction Argument de plage pour l'expression
CBool Toute expression ou chaîne valide ou une expression numérique
CByte 0 à 255 (non signé); les parties fractionnaires sont arrondies.
CChar Toute expression Char ou String valide; seul le premier caractère d'une chaîne est converti; La valeur peut être comprise entre 0 et 65535 (non signé).

Conversion du texte de la zone de texte en un entier

À partir de MSDN

Utilisez la fonction CInt pour fournir des conversions de tout autre type de données à un sous-type entier. Par exemple, CInt force l'arithmétique entière lorsque des opérations arithmétiques en devise, en simple précision ou en double précision ont lieu.

En supposant que vous avez 1 bouton et 2 zone de texte. Si vous tapez sur textbox1.text 5.5 et sur textbox2.text 10 .

Si vous avez ce code:

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

Pour ajouter les valeurs des 2 zones de texte, vous devez convertir leurs valeurs en Int à l'aide de CInt(expression) .

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

Remarque: Lorsque la partie fractionnaire d’une valeur est exactement égale à 0,5, la fonction CInt arrondit au nombre pair le plus proche. Par exemple, 0,5 arrondit à 0 , tandis que 1,5 arrondit à 2 et 3,5 à 4 . L'arrondi au nombre pair le plus proche a pour but de compenser un biais qui pourrait s'accumuler lorsque de nombreux nombres sont additionnés.



Modified text is an extract of the original Stack Overflow Documentation
Sous licence CC BY-SA 3.0
Non affilié à Stack Overflow