vb点虐引用引用 vb添加引用

VB点虐，在模块中怎样引用到窗体中的控件

在模块中引用到窗体中的控件，必须在该控件名之前由相应的窗体名作为前导，例如：

专注于为中小企业提供成都网站设计、网站制作服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业鄱阳免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了上千多家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

1，要引用窗体Form1中的控件TextBox1

MsgBox(Form1.TextBox1.Text)

2，要引用窗体Form2中的控件TextBox1

MsgBox(Form2.TextBox1.Text)

Private Function ReadFile(ByRef a As String) As String

a = "bian"

End Function

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim a As String = "yuanlai"

ReadFile(a)

''想要的结果就是在这里使用a的值是"bian"

MsgBox(a)

End Sub

===================

以上就可以，不知道你“ByRef a As b”的b是什么东西

如果DLL不是你写的,且你要调用的函数不是__stdcall声明,VB直接调用是会报错的

如果DLL是你写的,注意调用约定问题,并看以下代码

***************************************************

以下是DLL代码

.cpp里这么写

1extern "C"__declspec(dllexport) void __stdcall HelloWorld()

2{3 MessageBox(NULL,"HelloWorld","HelloWorld",NULL);4}

.def里这么写

LIBRARY "XXXX"

EXPORTS

; 此处以下添加

HelloWorld@1

*************************************************

vb里这么写

1 Public Declare Sub HelloWorld Lib "XXXX.dll" ()

然后调用就可以了,上面是VB的代码,或许VB点虐的也差不多

本文名称：vb点虐引用引用 vb添加引用
网站URL：http://scyanting.com/article/ddeihio.html