Simple: either create two separate SqlCommand objects and connect them to the same SqlCommand object (provided you don't use SqlDataReaders it'll be fine) or send them both as a single SqlCommand but separating the two commands with a semicolon:
Dim cmd As SqlCommand = New SqlCommand("INSERT INTO MyTable (MyColumn) VALUES ('Hello'); SELECT * FROM MyTable", con)