dim data(0-10) as integer
data(0)=text1.text
data(0)=text1.text
解决方案 »
- vb+sql
- winsock求助
- 高分求佳能最新SDK包
- 关于NetMeeting COM API 接口调用的问题,解决后加分100,现金也可以!
- 高手,不能帮忙吗?
- MSflexGrid列中数值保留两位小数
- 如何实现picturebox上图象的局部放大
- 如何通过API获得BMP文件的大小
- 一个内部函数的问题
- 在我制作的安装程序中总是要出现 注册文件 d:\winnt\system32\msado25.tlb时出错,只有手动在系统中装ado才能正确使用,不知哪位大虾能解
- 请问如何取得image控件的hwnd和hdc?
- 请问VB生成的DLL如何能注册成功,我试着用REGSVR32提示我成功了,可没法调用?
然后
dim I as long
Dim Data() As String
Data=split(text1.text,";")
for I=0 to ubound(data)
debug.print data(i)
next i