我知道:
dim strdata as string
dim l() as string
strdata = text1.text
l = split(strdata,"/")
这样
l(0) = abc
l(1) = efg
l(2) = 123
dim strdata as string
dim l() as string
strdata = text1.text
l = split(strdata,"/")
这样
l(0) = abc
l(1) = efg
l(2) = 123
解决方案 »
- sql数据库数据导到EXCEL中后发现前三个字段的数据被隐藏了,怎样修改代码能正常导出。急!急!急!
- 如何在水晶报表中显示已经在access数据库中存好的长二进制数据(图像信息)
- 一个急待解决的VB Menu的问题??在线等!
- 我点击treeview的一个节点,该节点得到焦点
- 闲来无事
- 生成应用程序后的安装问题
- “Label3 = rst”有错误,提示“type mismatch”,请问如何解决?
- 请问各位 如何 能除去字段中的 回车符 帮帮忙!!!!
- 寻找vbfor 数据库的资料
- 如何实现自己的程序在任务栏中看不到呢,我只能锁住ctrl+del+shift,很笨方法
- //问题很简单,但我很急//
- treeview的节点问题
获得数组a,a(0)="abc",a(1)="efg",a(2)="123"
在表中的字段的数据都是这样的。
全都是aaa/bbb/123这样的。要把数据分别取出来。
aaa
bbb
123
dim b()
dim i as integersql="select xxx from tablename"
rs.open sql,conn,3,1
redim a(rs.recordcount-1)
redim b(rs.recordcount-1,2)
i=0
while rs.eof
a(i)=rs(0)
i=i+1
rs.movenext
wendfor i=0 to ubound(a)
b=split(a(i),"/")
next
for i=0 to ubound(a)
for j=0 to 2
debug.print b(i,j),
next j
next i
如果你的字符串长度固定并且样式都相同。可以用的。
如果不同多加几个吧,反正不会报错的
请详细点回答!谢谢!(下面几个贴子是同一个问题,为了多给分才开多个的)
http://www.csdn.net/expert/topic/410/410427.shtm
http://www.csdn.net/expert/topic/410/410433.shtm
http://www.csdn.net/expert/topic/410/410493.shtm