在模塊中引用到窗體中的控件,必須在該控件名之前由相應的窗體名作為前導,例如:
專注于為中小企業提供成都網站設計、網站制作服務,電腦端+手機端+微信端的三站合一,更高效的管理,為中小企業鄱陽免費做網站提供優質的服務。我們立足成都,凝聚了一批互聯網行業人才,有力地推動了上千多家企業的穩健成長,幫助中小企業通過網站建設實現規模擴充和轉變。
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添加引用
文章轉載:http://vcdvsql.cn/article0/ddeihio.html
成都網站建設公司_創新互聯,為您提供網站改版、定制開發、網站內鏈、用戶體驗、網站排名、網站導航
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯