定义改成
Public Function GraphControl_OnConnectionAdd(ByVal sender As System.Object, ByVal e As Netron.GraphLib.ConnectionEventArgs) As Boolean messagebox.show(sender.from)End Function