读书人

帮忙写段代码!该怎么解决

发布时间: 2012-01-26 19:40:46 作者: rapoo

帮忙写段代码!
要求利用TEXTBOX控件在里面输入(“-”表示一个空格space)
55-66-44
反映在
Dim sendBytes() As Byte
一个数组中
第一个元素里面是&H55
第二个元素里面是&H66
第三个元素里面是&H44
意思就是数组里均表示为16进制!

[解决办法]

VB.NET code
        Dim S As String        Dim B() As Byte        S = TextBox1.Text        Dim SS() As String        SS = S.Split("-")        Dim i As Long        For i = 0 To SS.Length - 1            ReDim Preserve B(i)            B(i) = CInt("&h" & SS(i))        Next        'B() 就是你要的东西 

读书人网 >VB Dotnet

热点推荐