Gracias Cvilla90, lo intente por otra forma, en el primer form solicito el servidor, una ves obtenido el servidor paso esa variable al segundo Form, y la cadena de conexion quedaria:
Código vb:
Ver originalDim servidora As String = My.Forms.Server.TextBox1.Text
Public Sub conectar()
conexion = New SqlClient.SqlConnection
conexion.ConnectionString = ("server=" & servidora & ";database=Tiendas;Integrated Security=True")
conexion.Open()
End Sub
y leí que tenia que crear un modulo, fue lo que hice y dice la variable publica!
Gracias igual por tu respuesta compañero!!