Creating a stored procedure from VB is exactly the same process as from SSMS - it is just a series of SQL commands which creates it.
So you do the usual things: create a SqlConnection object, open it. Create a SqlCommand object on that connection, and give it the SP create commands as the command string:
Using con As New SqlConnection(strConnect)
con.Open()
Dim strCreateSP As String = "CREATE PROC [dbo].Sample
@ID INT
AS
BEGIN
SELECT * FROM myTable WHERE iD=@ID;
END"
Using com As New SqlCommand(strCreateSP, con)
com.ExecuteNonQuery()
End Using
End Using
Creating a table is exactly the same procedure, but with CREATE TABLE commands instead of CREATE PROC.