189 8069 5689
题主这个FunctionFindWindow(一堆参数)AsLong，返回值是个Long，而下面wd=FindWindow()，wd却是个Integer类型的，当然会溢出。楼上说都改成Long确实可以，不过题主的API声明是从VB里拷贝过来的吧？VB里的Long到.NET中就是Int32了，所以应该把上面FindWindow的返回类型由Long改为Int32（或者Integer）才是正解。
为新宾等地区用户提供了全套网页设计制作服务，及新宾网站建设行业解决方案。主营业务为网站建设、成都网站设计、新宾网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！
我用VB6运行不报错
但在Excel的VBA中运行则报错
值得说明的是，我的VB6是打了SP5补丁的
尽管你可能不愿意听，但这确实是VB语言的一个Bug，只要字符串中含有如下日文字符（并不是全部日文字符），在进行文本比较时就会出错（二进制比较则不会出错）：
ゴガギグゲザジズヅデドポベプビパヴボペブピバヂダゾゼ
这个Bug已经被微软通过补丁更正。
可以用变通的方法实现不区分大小写的字符串查询：
MsgBox InStr(1, LCase("12K新 ペンダント縦约"), LCase("12k"))
也就是说把原始字符串和要查找的字符串都转为小写（或者都转为大写）再来查找即可。
溢出就是说你设置的变量不合适,数据大于你设置的变量范围了.
比如你设置的是int,,,,而数据超过了256,就会
溢出