在模塊中引用到窗體中的控件,必須在該控件名之前由相應(yīng)的窗體名作為前導(dǎo),例如:
成都創(chuàng)新互聯(lián)服務(wù)項目包括三沙網(wǎng)站建設(shè)、三沙網(wǎng)站制作、三沙網(wǎng)頁制作以及三沙網(wǎng)絡(luò)營銷策劃等。多年來,我們專注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術(shù)優(yōu)勢、行業(yè)經(jīng)驗、深度合作伙伴關(guān)系等,向廣大中小型企業(yè)、政府機構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案,三沙網(wǎng)站推廣取得了明顯的社會效益與經(jīng)濟效益。目前,我們服務(wù)的客戶以成都為中心已經(jīng)輻射到三沙省份的部分城市,未來相信會繼續(xù)擴大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任!
1,要引用窗體Form1中的控件TextBox1
MsgBox(Form1.TextBox1.Text)
2,要引用窗體Form2中的控件TextBox1
MsgBox(Form2.TextBox1.Text)
點擊重新生成,應(yīng)該會在工具欄頂部出現(xiàn)的,也可以用代碼定義,但運行前不會在界面出現(xiàn)
public withevent a as new rowmergeview
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)
''想要的結(jié)果就是在這里使用a的值是"bian"
MsgBox(a)
End Sub
===================
以上就可以,不知道你“ByRef a As b”的b是什么東西