Public Sub checkInjectionWithNoKeyword()
目前累計(jì)服務(wù)客戶近1000家,積累了豐富的產(chǎn)品開發(fā)及服務(wù)經(jīng)驗(yàn)。以網(wǎng)站設(shè)計(jì)水平和技術(shù)實(shí)力,樹立企業(yè)形象,為客戶提供網(wǎng)站設(shè)計(jì)制作、成都網(wǎng)站建設(shè)、網(wǎng)站策劃、網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)絡(luò)營(yíng)銷、VI設(shè)計(jì)、網(wǎng)站改版、漏洞修補(bǔ)等服務(wù)。成都創(chuàng)新互聯(lián)始終以務(wù)實(shí)、誠(chéng)信為根本,不斷創(chuàng)新和提高建站品質(zhì),通過(guò)對(duì)領(lǐng)先技術(shù)的掌握、對(duì)創(chuàng)意設(shè)計(jì)的研究、對(duì)客戶形象的視覺傳遞、對(duì)應(yīng)用系統(tǒng)的結(jié)合,為客戶提供更好的一站式互聯(lián)網(wǎng)解決方案,攜手廣大客戶,共同發(fā)展進(jìn)步。
Dim injection_Type As String = My.Forms.SqlInjection.ComboBox_Type.Text.Trim()
Dim my_checkUrl As String = My.Forms.SqlInjection.ComboBox_Url.Text.Trim()
end sub
這個(gè)改成放在窗體內(nèi)就行了,我也有遇到同樣的問(wèn)題,最后只好放窗體里才能實(shí)現(xiàn)。
網(wǎng)上找的什么委托都是不行的。
通過(guò)Database吧!不然得通過(guò)消息處理API比如
Declare Function SendMessage Lib "user32" Alias "SendMessageA" ( _
ByVal hwnd As IntPtr, _
ByVal wMsg As Integer, _
ByVal wParam As Integer, _
ByVal lParam As Integer) _
As Boolean
但必須得事先知道另外一個(gè)項(xiàng)目的text1的句柄
用form的ShowDialog這個(gè)功能,這個(gè)是可以進(jìn)行窗體間的傳值的。
比如在父窗體上需要傳的值是textbox1的內(nèi)容,子窗體是childform.
那么在父窗體上的點(diǎn)擊事件中可以這樣寫
dim frm as childform = New childform
'要在子窗體上的textbox1里顯示父窗體中的textbox1中的內(nèi)容,這樣寫
frm.textbox1.text = me.textbox1.text
'最后
frm.showdialog()
這樣就可以了。
如果說(shuō)你三個(gè)窗體完全一樣,那你也不用寫三個(gè)一樣的窗體只要寫一個(gè)就行了,在不同的按鈕事件中做不同的賦值即可。
不過(guò)這樣打開的子窗體是模態(tài)窗體,也就是說(shuō)在子窗體顯示之后,要對(duì)父窗體進(jìn)行操作必需關(guān)閉子窗體才行。
文章標(biāo)題:vb.net窗體傳值 vbs窗體
本文URL:http://muchs.cn/article18/dohspgp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站導(dǎo)航、App開發(fā)、微信小程序、Google、小程序開發(fā)、軟件開發(fā)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)