VB里怎么截取255个字节?

Question

VB里怎么截取255个字节?

Answer 1

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (pDst As Any, pSrc As Any, ByVal ByteLen As Long)
        
Private Sub Command1_Click()
Dim s As String
Dim b(255) As Byte
  s = "abcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefgabcdefg"
  CopyMemory b(0), ByVal StrPtr(s), 255
End Sub

Answer 2

a.text=b(0)       '字符型 第一个看法
a.text=asc(b(0))  '任意值 第一个的Ascii看法a.text  文本控件

Answer 3

dim i as integer
.................
For i = LBound(sb) To UBound(sb)
    Debug.Print sb(i)
Next

Answer 4

dim i as integer
.................
For i = LBound(b) To UBound(b)
Debug.Print b(i)
Next

Answer 5

copymemory   不是就可以直接截取吗?  然后再进行自己需要的有效转化

Answer 6

不管从哪里截,总会给出一个起点从这个点开始向后截取255...?一般来说,就是用CopyMemory吧...至于会不会向前截取255....等楼主来说吧,我估计这可能性还是有的.....