Dim bar As Integer
bar = Val(barcodebox.Text)
Dim TestLen As Integer = Len(bar)
MsgBox(TestLen)
barcodebox.Textに一桁(半角数字)だろうが7桁(半角数字)だろうがすべて4が返されてしまうのですが、何故でしょうが?
VB6ではなくて、VB.NETね?!・・・
Len(bar)としているので、barは、Integer宣言しているから
4となるのでしょう〜
VB.NETでのIntegerは、Int32なので、4バイト
TextLen = Len(barcodebox.Text)
なら、文字列の長さ取れますが・・・間違い?
VB.NETなら、
TextLen = barcodebox.Text.Length
でも、文字列長取れます。
以上。
返事送れてすいません。おかげさまで解決しました。ありがとうございました!!
編集 削除