清远凯逸慢摇:急呀!vb截取文本中的字符串

来源:百度文库 编辑:中科新闻网 时间:2024/05/03 19:15:30
我想定义五个数组,先让它能打开一个文本显示在text1上(比如让txt文件内容显示在text1上),然后分五段截取,每段600字节,然后利用五个数组分五次发送 多谢了

open txt.txt for output binary as #1
dim i,j as integer
dim data as byte
j=0,i=0
for j=0 to 4
for i=0 to 599
get#1,,data
data(j)=data(j)+cstr(data)
next
next
clise #1