等效的vb.net代码

Imports System

Module Module1

    Sub Main()
        Dim x As Integer = 10
        Dim y As Integer = 20
        Dim result As Integer = x + y
        Console.WriteLine("The sum of {0} and {1} is {2}", x, y, result)
    End Sub

End Module

Imports System.Data.SqlClient

Module Module1

    Sub Main()
        Dim connectionString As String = "Data Source=myServerAddress;Initial Catalog=myDataBase;User Id=myUsername;Password=myPassword;"
        Dim queryString As String = "SELECT * FROM myTable"
        Dim connection As New SqlConnection(connectionString)
        Dim command As New SqlCommand(queryString, connection)
        connection.Open()
        Dim reader As SqlDataReader = command.ExecuteReader()
        While reader.Read()
            Console.WriteLine(reader("columnName"))
        End While
        reader.Close()
        connection.Close()
    End Sub

End Module