Проблема с двойным и целым типом

Question

У меня возникла проблема с проверкой длины номера карты, но не удалось ее депинировать, поскольку я новичок на vb.net. Пожалуйста, помогите мне

dim C as Double 
    C = CDbl(Val(InputBox("Kindly enter the card number", "Card Number"))) 
    if len(C) <> 15 then 
    msgbox("something...") 
    endif 

Даже после ввода 15-значного номера карты он вводит условие if.

Answer 1

Как насчет использования строки?

Dim C As String 
C = InputBox("Kindly enter the card number", "Card Number") 
If Len(C) <> 15 Then 
    MsgBox("something...") 
End If 

Len() возвращает количество байтов, используемых в переменной C.

Дважды используют 64 бита, на самом деле: Len (C) = 8

https://msdn.microsoft.com/en-us/library/f0ycy938(v=vs.110).aspx