专硕申请国外博士:我在vb里建了个ActiveX dll
来源:百度文库 编辑:神马品牌网 时间:2024/07/06 10:57:22
我在vb里建了个ActiveX dll
然后添加了个窗体 ft1
里面有
text1,text2 两个文本框
cmda 按钮
然后定义了
Public testnn1 As String
Public testnn2 As String
按扭上命令是
testnn1=Me.text1
testnn2=Me.text2
然后我在类模块里添加个
testdll
代码里放
Function showw(cc1,cc2)
Ft1.Show vbModal
cc1 = Ft1.testnn1
cc2= Ft1.testnn2
End Function
我怎么在脚本里读出这个变量cc2??
然后添加了个窗体 ft1
里面有
text1,text2 两个文本框
cmda 按钮
然后定义了
Public testnn1 As String
Public testnn2 As String
按扭上命令是
testnn1=Me.text1
testnn2=Me.text2
然后我在类模块里添加个
testdll
代码里放
Function showw(cc1,cc2)
Ft1.Show vbModal
cc1 = Ft1.testnn1
cc2= Ft1.testnn2
End Function
我怎么在脚本里读出这个变量cc2??
这是以上最后一句话:
“我怎么在脚本里读出这个变量cc2??”
请问您所说的脚本是什么?
方案一:
如果是想在程序里面读出,那么你只要把cc1和cc2传给一个类的公共变量就可以了。比如你设一个public c2
将代码改为
Function showw(cc1,cc2)
Ft1.Show vbModal
cc1 = Ft1.testnn1
cc2= Ft1.testnn2
c2=cc2
End Function
您只要调用
classname.showw a,b
msgbox classname.c2
就可以实现了。
方案二
VB默认的传值方式是byref 即是按引用传值
您的原程序如下
Function showw(cc1,cc2)就等于
Function showw(byref cc1,byref cc2)
End Function
计算完毕后您的cc2已经是修改好的值了,直接读出就可以了;
建议:
建议您在编程时把使用到的变量都预先申明,在代码前加上这个吧
Option Explicit,既然是写函数,就养成声明函数类型和返回值(没有就是vbnull)的习惯,相信对提高您的编程水平是有帮助的。
我在vb里建了个ActiveX dll
vb中的ActiveX DLL工程,让我头痛
用VB编写ActiveX DLL实现ASP编程之问题
在使用优化大师时,有个“沉余DLL清理”和“ActiveX清理”,我想知道DLL和ActiveX分别是什么意思啊?
雅虎助手到底在IExplorer和Explorer进程里加载了多少个DLL。
为什么在联众里老是出现ACTIVEX什么的,问是否,按了一次又一次,老是删不掉。
电脑里安装了VC++(有VB)后起机时,在桌面有一个小框说加载najebote.dll模块出错,请问这是怎么回事?
VB 在WIN98里如何引用WINXP或WIN2K的kernel32.dll
我用VB做了个放大镜,但测试时提示:实时错误'453': 找不到DLL入口点GetDc in user32,请问是怎么回事?
vb里dlg是个什么控件?在哪找到?