大家帮忙，vb的组件开发问题

Question

不能把EMPTY给TEXTBOX，判断一下TEXT1。TEXT=IIF（REGOBJ。REGPROCUCT（“AA”） IS EMPTY，“”，REGOBJ。REGPROCUCT（“AA”））调用声明变量为NEW的CLS模块名字
DIM REGOBJ AS NEW REGPRODUCT

Answer 1

是不是text1.text不支持 regObj.RegProduct("aa") 的返回值。你引用过regProduct.dll。

Answer 2

如果跟程序功能无关，直接把regObj.RegProduct的返回类型定义为String即可（估计你原先没有定义！）

Answer 3

RegProduct方法返回值是什么类型？如果是字符串，用subzero(赘姆烂壳)的方法

Answer 4

解决方法
1、dim straa as string
   straa="aa"
   Dim regObj as new RegisterProduct.RegProduct
   text1.text = regObj.RegProduct(straa)
2、直接创建class
   dim clsregobj as new regproduct
　　就可以了
问题解决的话，记得给分！

Answer 5

估计你在regObj（即RegisterProduct.RegProduct类）中定义RegProduct方法的形式如下：
Public Function(str as string)
   ……
end sub只需将第一行改成Public Function(str as string) as string即可，如果你不需要返回变体型！另外，如果对你有帮助，请回答我一个帖子：http://www.csdn.net/expert/topic/654/654811.xml?temp=.8152735
（主题：  我自认VB水平不错，请大家给我估估价！ ）

Answer 6

首先感谢各位热心朋友，不过你们所说的这些其实我都注意到了，后来经过调试，发现是dll文件里面有运行期错误（类型匹配问题），编译的时候查不出来，当别的程序引用这个dll时就会出错。
呵呵，你们的分我会给的，就是不知道能不能给自己给分阿？