VB 6.0 遍历字符串 - VB / 基础类
我现在有一个字符串为 101010 的字符串，现在我要求把他遍历出来！！结果为
1
0
1
0
1
0
现在我的思路是将这个字符串转换成数组，然后在将它用循环迭代出来！！
我现在的问题是不知道怎么样能将它转化成数组！！我看了很多相关函数可是都没有解决
忘各位高手相助
当然我这个思路或许不是唯一的！如果各位高手有别的办法可以帮我实现也非常的感谢！！
我现在很急的用这个了！！
谢谢！！！！
VB code:
dim j() as integer
dim i as integer
dim h as string
i=1
h=101010
for i=1 to len(h)
j=MID(h,i,1)
next i
VB code:
Private Sub Command1_Click()
Dim a As String，i as integer
a = "101010"
For i = 1 To Len(a)
Print Mid(a, i, 1)
Next
End Sub
VB code:
Private Sub Command1_Click()
Dim str As String
str = "101010"
Dim b() As Byte
b = StrConv(str, vbfromUnicode)
Dim i As Long
For i = 0 To UBound(b)
Debug.Print b(i), Chr(b(i))
Next
End Sub
相关问答：
为什么我用form.show和form.hide多次连接了两个窗口只能互换链接两次啊？
代码看看
照道理form.show 没次数限定的吧
我也快疯了。
楼主知道怎么发贴么？
引用
我也快疯了。
楼主知道怎么发贴么？
楼主也 ......
DIM ds as new DataSet
我这样声明 怎老是报 用户定义类型未定义？ 这个需要引用什么吗？？
前提是DataSet对象要存在,就是对象浏览器中有它.没有就要引用.
dataset是ADO.NET对象
如果你用的是vb.net，那么在� ......
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
我的要求是：通过抓取别的程序上的表格的句柄，然后读取这个表格的内容。
表格句柄（类名：MSFlexGridWndClass）我已抓到，接下来如何读取表格的内容就不会了？求助。
能把代码发来学习下不？
244326867@qq.com ......
