Szukaj…


Składnia

  • CBool (wyrażenie)
  • CByte (wyrażenie)
  • CChar (wyrażenie)
  • CDate (wyrażenie)
  • CDbl (wyrażenie)
  • CDec (wyrażenie)
  • CInt (wyrażenie)
  • CLng (wyrażenie)
  • CObj (wyrażenie)
  • CSByte (wyrażenie)
  • CShort (wyrażenie)
  • CSng (wyrażenie)
  • CStr (wyrażenie)
  • CUInt (wyrażenie)
  • CULng (wyrażenie)
  • CUShort (wyrażenie)

Parametry

Nazwa funkcji Argument zakresu wyrażenia
CBool Dowolny prawidłowy znak lub ciąg znaków lub wyrażenie liczbowe
CByte Od 0 do 255 (niepodpisany); części ułamkowe są zaokrąglone.
CChar Wszelkie prawidłowe wyrażenie Char lub String; konwertowany jest tylko pierwszy znak ciągu; wartość może wynosić od 0 do 65535 (bez znaku).

Konwertowanie tekstu pola tekstowego na liczbę całkowitą

Z MSDN

Użyj funkcji CInt, aby zapewnić konwersje z dowolnego innego typu danych na podtyp liczby całkowitej. Na przykład CInt wymusza arytmetykę liczb całkowitych, gdy normalnie wystąpiłaby arytmetyka waluty, pojedynczej precyzji lub podwójnej precyzji.

Zakładając, że masz 1 przycisk i 2 pola tekstowe. Jeśli wpiszesz na textbox1.text 5.5 i na textbox2.text 10 .

Jeśli masz ten kod:

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

Aby dodać wartości 2 pól tekstowych, musisz przekonwertować ich wartości na Int za pomocą CInt(expression) .

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

Uwaga: Gdy ułamkowa część wartości wynosi dokładnie 0,5, funkcja CInt zaokrągla do najbliższej liczby parzystej. Na przykład 0,5 zaokrągla do 0 , natomiast 1,5 zaokrągla do 2, a 3,5 zaokrągla do 4 . Celem zaokrąglenia do najbliższej liczby parzystej jest zrekompensowanie odchylenia, które może się kumulować, gdy zsumuje się wiele liczb.



Modified text is an extract of the original Stack Overflow Documentation
Licencjonowany na podstawie CC BY-SA 3.0
Nie związany z Stack Overflow