public function ary(str)
dim a() 【程序编程相关:《LINUX与UNIX_Shell编程指】 【推荐阅读:《LINUX与UNIX_Shell编程指】 dim b() 【扩展信息:动态转换img.src需要注意的问题】 dim lenstr ´字符串长 dim i, j ´循环变量 dim ouflag lenstr = len(str) if lenstr mod 2 = 1 then ´长度为奇 ouflag = false lenstr = lenstr + 1 redim a(2, lenstr / 2) a(2, lenstr / 2) = chr(20) ´最后一个补空格 else ´长度为偶 redim a(2, lenstr / 2) ouflag = true end if redim b(lenstr / 2, 2) for i = 1 to lenstr if i <= lenstr / 2 then a(1, i) = mid(str, i, 1) else if ouflag = true then ... 下一页