Buscar..


Sintaxis

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

Parámetros

Nombre de la función Rango para el argumento de expresión
CBool Cualquier Char o String válido o expresión numérica
CByte 0 a 255 (sin firmar); Las partes fraccionarias son redondeadas.
CChar Cualquier expresión válida de Char o String; solo se convierte el primer carácter de una cadena; el valor puede ser de 0 a 65535 (sin firmar).

Convertir el texto del cuadro de texto en un entero

Desde MSDN

Utilice la función CInt para proporcionar conversiones de cualquier otro tipo de datos a un subtipo de entero. Por ejemplo, CInt fuerza la aritmética de enteros cuando normalmente ocurre una aritmética de moneda, precisión simple o precisión doble.

Suponiendo que tiene 1 botón y 2 cuadros de texto. Si escribe en textbox1.text 5.5 y en textbox2.text 10 .

Si tienes este código:

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

Para agregar los valores de los 2 cuadros de texto, debe convertir sus valores a Int usando el CInt(expression) .

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

Nota: cuando la parte fraccionaria de un valor es exactamente 0.5, la función CInt se redondea al número par más cercano. Por ejemplo, 0.5 redondea a 0 , mientras que 1.5 redondea a 2, y 3.5 redondea a 4 . El propósito de redondear al número par más cercano es compensar un sesgo que podría acumularse cuando se suman muchos números.



Modified text is an extract of the original Stack Overflow Documentation
Licenciado bajo CC BY-SA 3.0
No afiliado a Stack Overflow