vb运行时错误代码大全

① vb 运行时错误 '62' 输入超过文件尾

1、打开VB6.0，新建一个工程，在窗体中添加一个命令按钮，caption分别改为“调用函数”，将窗体Form1的caption属性改为“VB6.0自定义函数”。

② VB实时错误‘3001’，参数类型不正确或不在可以……怎么解决，具体代码如下

select * from 商品基础信息表
你选择的是所有列。这里面很可能有数值类型的列。当该列被循环到的时候，执行判断：
If rs1.Fields(i) <> "" Then Text1(i).text = rs1.Fields(i)
的时候就会报这种类型错误。你最好做个判断
If Isnumeric(rs1.Fields(i)) Then
Text1(i).text = rs1.Fields(i)
else
If rs1.Fields(i) <> "" Then Text1(i).text = rs1.Fields(i)
end if

③ vb运行时提示错误7 程序代码如下 请大神赐教

Dim c(600, 620, 600, 620)
这是个多么庞大的数组啊！它所占用的字节总数为601*621*601*621*16，你自己算算是多少吧，反正我的计算器算不了这么大的数，大概是2千多GB吧，我不知道几年后的电脑内存有没有这么大的，反正现在肯定是没有，所以发生“内存溢出”的错误就一点也不奇怪了。
从你的程序来看，这个数组其实就这么大：
Dim c(2, 2, 2, 2)
更准确一点的话，还应该把0去掉：
Dim c(1 To 2, 1 To 2, 1 To 2, 1 To 2)
这样的话，实际占用字节数就是2*2*2*2*16=256