Buen dia

Actalmente las consultas que ejecuto tardan un tiempo (30 seg aprox) por default y si no se ejectuan porque el servidor esta lento, cacho el error en un label, lo que me gustaria saber es como incrementar ese tiempo de espera a 1 minuto o 2 masomenos... gracias!!

Dim da As SqlDataAdapter
Dim dttable1 As New DataTable

sCnn = "data source =27.0.0.1; initial catalog =base1; user id =administrador; password =pass123"
sSel = "select * from tabla1"

da = New SqlDataAdapter(sSel, sCnn)
da.Fill(dttable1)

Aqui como le indico que necesito que dure más tiempo la consulta?

Agradezco su tiempo buen dia..

__________________
Saludos desde México.... El Borre.