奇怪
请教,为什么代码在vb中编译通过,在cad2002中的vba中编译也通过,而在cad 2000中出错. Private Function StringToArray(InString As String) As Byte()----显示出错"编译错误,缺少语句结束"<BR> Dim i As Integer, bytBuffer() As Byte<BR> ReDim bytBuffer(LenB(StrConv(InString, vbFromUnicode)))<BR> bytBuffer = StrConv(InString, vbFromUnicode)<BR> StringToArray = bytBuffer<BR>End Function
页:
[1]