Vb程序运行时出现"找不到工程或库"

 getstr = Mid(str, 1, endnum - 1)，调用Mid函数时候出现"找不到工程或库"错误，解决办法：

因为“工程-引用”列表中有失效的引用就会这样，所以将相应乱码的失效引用前面的对勾去掉即可。