数据查找有错误，希望老师帮忙修改


附件这个数据查找程序运行在vbnet2010上，总是有错误出现，希望老师帮忙修改一下，谢谢！

[此贴子已经被作者于2023-3-16 13:07编辑过]

附件呢

版主你好，附件程序在vb6.0上运行正常，放在net上时，因我对net下数组的下标掌握不了导致程序总有问题，希版主能修改一下，谢谢！

for 循环的时候数组下标 -1 就可以 for i as Integer =0 to    UBound（数组）-1