Public Sub checkInjectionWithNoKeyword()
目前累计服务客户近1000家，积累了丰富的产品开发及服务经验。以网站设计水平和技术实力，树立企业形象，为客户提供网站设计制作、成都网站建设、网站策划、网页设计、网络营销、VI设计、网站改版、漏洞修补等服务。成都创新互联始终以务实、诚信为根本，不断创新和提高建站品质，通过对领先技术的掌握、对创意设计的研究、对客户形象的视觉传递、对应用系统的结合，为客户提供更好的一站式互联网解决方案，携手广大客户，共同发展进步。
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
这个改成放在窗体内就行了，我也有遇到同样的问题，最后只好放窗体里才能实现。
网上找的什么委托都是不行的。
通过Database吧！不然得通过消息处理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
但必须得事先知道另外一个项目的text1的句柄
用form的ShowDialog这个功能,这个是可以进行窗体间的传值的。
比如在父窗体上需要传的值是textbox1的内容，子窗体是childform.
那么在父窗体上的点击事件中可以这样写
dim frm as childform = New childform
'要在子窗体上的textbox1里显示父窗体中的textbox1中的内容，这样写
frm.textbox1.text = me.textbox1.text
'最后
frm.showdialog()
这样就可以了。
如果说你三个窗体完全一样，那你也不用写三个一样的窗体只要写一个就行了，在不同的按钮事件中做不同的赋值即可。
不过这样打开的子窗体是模态窗体，也就是说在子窗体显示之后，要对父窗体进行操作必需关闭子窗体才行。
