Vb.net 双精度和整数类型的问题

我在检查卡号的长度时遇到了一个问题，但由于我是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条件。

使用字符串怎么样

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

Len返回变量C使用的字节数

Double使用64位，实际上：LenC=8

---

在将InputBox返回的字符串转换为Double之前，请检查其长度。不能将其转换为Double，只需检查字符串长度即可。