动态生成的控件:
Private Sub UserControl1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Dim myPicture = New System.Windows.Forms.PictureBox()
Me.Panel3.Controls.Add(myPicture)
myPicture.Size = New System.Drawing.Size(115, 160)
myPicture.TabStop = False
myPicture.Name = "p"
myPicture.Cursor = Cursors.Hand
AddHandler myPicture.Click, AddressOf mypic_Click '添加事件
End Sub
处理事件的过程:
Private Sub mypic_Click() 'ByVal id As String
Dim bookInfo As New BookInfo
bookInfo.Show()
Me.Parent.Enabled = False
呵呵你是做什么啊,如果涉及到在第人家网站或则是对接人家接口,有可能是对方的程序中有限制访问平率过高的监控,我以前调用人家接口时遇到和这类似的问题,对接的接口放在服务器上,但是当我访问平率过高时,接口会自动关闭。。。。
再while循环里加上Thread.sleep(50)试试
你解决了吗,我也遇到了,求解
while内加个大的try catch,看看有没有异常。