Visual Basic.NET - Un llamado

Recuerdan que en VB6 para hacer un llamado era con

Call Ejemplo

y este a s vez ejecutaba

Pribate sun Ejemplo()
(codigo)
end sub

como hago esto en Net

no es igual???????

tengo entendido que se hace de la misma manera

Ya lo comprobe gracias pero ahora tengo otro problema tengo este codigo

Private Sub VerificaAperturaCierreNomina()
'Leer tblNominaInicioCierre
Dim cn As SqlConnection
Dim cmd As SqlCommand
Dim dr As SqlDataReader
cn = New SqlConnection
cn.ConnectionString = "DATABASE=Crm;SERVER=sql4498_3.mysite4now.com;UID=Usuario;PWD=contraseña;"
cn.Open()
cmd = New SqlCommand("select abierto from tblnominainiciocierre", cn)
dr = cmd.ExecuteReader
If dr.Read("abierto") = 1 Then
txtNumeroPlan.Enabled = True
txtRuta.Enabled = True
Label6.Visible = False
btnTraePersonal.Enabled = True
Else
txtNumeroPlan.Enabled = False
txtRuta.Enabled = False
Label6.Visible = True
btnTraePersonal.Enabled = False
End If
End Sub

mi problema es al declarar mi if, lo que necesio es que lea mi tabla que tengo en esa ruta si en ese campo encuentra un 1 que habilite mis campos y mi etiqueta de lo contrario pues que haga lo contrario obiamente pero no se como hacer eso, tengo la idea pero no funciona se que estoy mal pero como resolverlo les agradecere su ayuda