如何把1串2进制放入到一个16*16的2维数组中

DukerJava 2007-11-30 02:55:20
例如:

0001000000010000
1000001100000110
1100000000010000
0010110000001100
0011000000110001
1000000100001111
1111111111100011
1000000001010100
0000100100100000
0001000100011100
0110000110000101
0000001000000000
0001000100011100
0001000100011100
0001000100011100
0001000100011100
...全文
64 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
Tiger_Zhao 2007-11-30
  • 打赏
  • 举报
回复
function Transform(byval s as string) as byte()
dim a(15,15) as byte, i as long, j as long
for i=0 to 15
for j=0 to 15
a(i,j) = cbyte(mid$(s,i*16+j+1,1))
next
next
Transform = a
end function

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧