Code:
dim cn as odbcconnection
Try
cn = New odbcconnection("###")
Dim mystring as String = "sp_name"
cn.open() ' connection established successfully
Dim cmd as odbccommand = New odbccommand(mystring,cn)
cmd.commandType = commandType.storedProcedure
Dim dr As odbcdatareader = cmd.executereader()