multiple querys con mysql

[alucard3003]

holas soy nuevo en esto y tengo un problema cada vez que quiero hacer esto:

query = cone.reemplazarQuery("select idprovincia from provincia where nombre='" & Tprovincia.Text & "';")
If Not query.HasRows Then
cone.insertar("INSERT into provincia (nombre) values ('" & Tprovincia.Text & "');")
query.Close()
query = cone.reemplazarQuery("select idprovincia from provincia where nombre='" & Tprovincia.Text & "';")
End If
Dim idprovincia As String
For i = 0 To query.FieldCount - 1
query.Read()
idprovincia = query.GetValue(0).ToString()
Next
Try
Catch ex As MySqlException
End Try
query.Close()

no se si es que se pueda hacer eso o deberia crear un metodo x cada query que quiera hacer
Grax y disculpen la ignorancia pero estoy acostumbrado a usar php y mysql :P