大家能不能帮我看看这个函数是什么意思啊？谢谢！

Question

Dim jod(8192)
               dat$ = String$(Numd * Lfmt, 0)
                Get #1, , dat$
                Call strtointarr(dat$, VARSEG(jod(1)), VarPtr(jod(1))) //就是这个。                        Jodc = Sum& \ (j - 1) - nod0
                        Icmp = Icmp + 1: jod(Icmp) = Jodc  //这是用到jod()的地方。
我搞不懂是什么意思，但是就这些语句。请问有谁知道这个strtointarr的意思啊？

Answer 1

自定义的函数吧
把光标移到strtointarr，右键----定义

Answer 2

大概是将一个字符串的内容复制到一个 integer 的数组中，dat$ 是源，VarPtr(jod(1))是目标地址，VARSEG(jod(1)) 可能是元素大小

Answer 3

Icmp = Icmp + 1: jod(Icmp) = Jodc  //这是用到jod()的地方。应该是自定义函数，:冒号是序行符，等价于：
Icmp = Icmp + 1
jod(Icmp) = Jodc  //这是用到jod()的地方。＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
免费的学习交流网站，欢迎大家访问！
http://www.j2soft.cn/
http://j2soft.008.net/

Answer 4

自定义函数，JOD是个INTEGER的数组， VarPtr(jod(1))获得一号元素的地址，VARSEG(jod(1)) 不好理解，偏移量？既然获得了地址偏移量没意义，元素占的字节数？那用LEN不更好理解？
整个函数作用大概就是把字串的内容给复制到INTEGER数组里面吧。

Answer 5

谢谢各位的回答。字串的内容给复制到INTEGER数组里面，字串一般要转格式才能放到INTEGER数组里的吧，一般都转成什么呢？

Answer 6

VARSEG是QB中的语句，用于取得变量的段地址（在DOS下，访问内存的指针是用段地址:偏移量来表示,所有程序共用一个内存空间,由低向高分配内存空间，所以任何程序都可以随便修改），随着windows内存访问机制的改变，在VB中找不出替换的语句

Answer 7

//字串的内容给复制到INTEGER数组里面，字串一般要转格式才能放到INTEGER数组里的吧，一般都转成什么呢？先不要忙着改，你先说说你要实现什么吧