VB dll 中需要声明

Question

首先感谢大家....

我目前正在做VB。我正在使用 Visual Studio 2008。

下面的代码是一个控制台应用程序，构建时没有任何错误。

    Imports System.Net


Module Module1

    Public Sub Main()

        Dim address As IPAddress
        Dim remoteIP As System.Net.IPEndPoint
        Dim socketAddress As System.Net.SocketAddress

        Try
            address = IPAddress.Parse("192.168.0.187")
            remoteIP = New System.Net.IPEndPoint(address, 0)

            socketAddress = remoteIP.Serialize()

            Console.WriteLine("Address Family :" & remoteIP.AddressFamily.ToString())
            Console.WriteLine("IP :" & remoteIP.Address.ToString() & "Port :" & remoteIP.Port.ToString())
            Console.WriteLine("Socket address :" & socketAddress.ToString())


        Catch ex As Exception
            Console.WriteLine(ex.StackTrace.ToString())


        End Try

    End Sub


End Module

在下一个 dll 程序中，同样给出错误“Declaration Expected for addr、remoteIP 和 socketAddr”

Imports System.Net

Public Class Class1


End Class
Public Class ethernet

    Dim addr As IPAddress
    Dim remoteIP As System.Net.IPEndPoint
    Dim socketAddr As System.Net.SocketAddress

    addr = IPAddress.Parse("192.168.0.187")
    remoteIP = New System.Net.IPEndPoint(addr,0)

    socketAddr = remoteIP.Serialize()



End Class

有人能告诉我为什么会发生这种情况吗？

Answer 1

第二个类 ethernet 中的代码不包含在方法中，因此您仅声明 addr、remoteIP 和 socketAddr 变量。

要实现这一点，只需将代码放入方法中，例如：

Public Class ethernet
    Public Function SerializeSocket(address As String) As System.Net.SocketAddress
        Dim addr As IPAddress = IPAddress.Parse("192.168.0.187")
        Dim remoteIP As System.Net.IPEndPoint = New System.Net.IPEndPoint(addr,0)
        Return remoteIP.Serialize()
    End Sub
End Class