WinSockServer和sql server Connection visual basic错误

Question

套接字接收客户信息，并且应该在那时打开与SQL Server的连接 发送visual studio错误： 对象引用未设置为对象的实例。

Public dbconexion As SqlConnection
Dim WithEvents WinSockServer1 As New ServidorTCP.WinSockServer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    With WinSockServer1

        .PuertoDeEscucha = 8050

        .Escuchar()

    End With
    Control.CheckForIllegalCrossThreadCalls = False

Private Sub WinSockServer1_DatosRecibidos(ByVal IDTerminal As System.Net.IPEndPoint) Handles WinSockServer1.DatosRecibidos
    dbconexion.Open()