El problema es que cuando cargo este formulario es muy lento, y tengo que optimizarlo todo lo que pueda, a continuación os pongo el codigo fuente, haber si estoy haciendo algo mal y carga demasiados recursos:
Codigo texbox ultimo registro:
Código:
Codigo de uno de los combobox:Dim SqlCommando As New SqlCommand("SELECT MAX(IdXNProduct) as res FROM tbl2BaseHardware", conection) ultimo = SqlCommando.ExecuteScalar() + 1 txtCodigo.Text = ultimo
Código:
Espero puedan ayudarme o enseñarme un forma de hacer las consultas mas rapidas (antes programa con vb6 e iba mucho mas rapido xD)ds = New Data.DataSet Ssql = "SELECT fldTMaker FROM tbl8Fabricantes" da = New Data.SqlClient.SqlDataAdapter(Ssql, conection) 'Cargamos el DataSet Try da.Fill(ds, "tbl8Fabricantes") Catch ex As Exception MessageBox.Show("Error al cargar:" & vbCrLf & ex.Message) End Try 'Cargo los resultados en el Combobox cmbFabricante.DataSource = ds.Tables(0).DefaultView cmbFabricante.ValueMember = "fldTMaker" cmbFabricante.DisplayMember = "Descripcion"
Gracias
Fredy666