Codigo del Boton
Código:
Dim conn As New SqlConnection("Cadena de conexion") Dim consulta As String = "" Select Case ddlTipo.SelectedIndex Case 0 consulta = "Query" Case 1 consulta = "Query" Case 2 consulta = "Query" End Select Dim da As New SqlDataAdapter(consulta, conn) Dim ds As New DataSet da.Fill(ds, "Cliente") gvwBusqueda.DataSource = ds.Tables("Cliente") gvwBusqueda.DataBind()