SoloCodigo

Hola con todos....
por favor necesito una manito en esto
 kiero realizar una busqueda o filtro mediante un text y haciendo enter me asome el resultado de la busqueda

Ahora con mi codigo muestro todos los datos en mi tabla q eso esta muy bien hasta q no coloque ninguna palabra en el text... cuando ya busq entonces se mostrara el registro buscado...

este es mi codigo de consulta

mysql_select_db($database_papeleria, $papeleria);
$query_rs_csul_clie = "SELECT idpersonas, tipo_pers, nom_pers, apel_pers, ruc_pers, dir_pers, email_pers, telf_pers, cel_pers, descr_pers, estad_person FROM personas WHERE tipo_pers = '1' ORDER BY idpersonas ASC, nom_pers LIKE '%$buscar%' OR apel_pers LIKE '%$buscar%' OR ruc_pers LIKE '%$buscar%'";
$rs_csul_clie = mysql_query($query_rs_csul_clie, $papeleria) or die(mysql_error());
$row_rs_csul_clie = mysql_fetch_assoc($rs_csul_clie);
$totalRows_rs_csul_clie = mysql_num_rows($rs_csul_clie);

y este es mi text de busqueda (kier q se filtre por ruc, nombre, apellido y codigo)


       <input type="text" value="" id="buscar" name="buscar" />
        <img src="../IMAGENES/search.png" align="left" width="35"/></th>
      </tr>
     
Espero haber sido lo suficientemente clara.... y les agradezco x su prontas respuestas...

Hola soy nueva aki y quisiera q por favor me ayudaran.
Necesito hacer un programa en vb.net

El cual debe sin pedir numeros, almacenar numeros aleatorios en una matriz cuadratica, pero tiene q permitir ingresar la dimension de la matriz (como es cuadratica es un solo valor) utilizando un (datagridview).
el cual deba llevar las funciones randomize (rnd)
se puden repetir los numeros en la matriz no importa..pero no muchas veces....
en otra matriz ingresar q contenga dos columnas en la primera un numero representante de cada uno q esta en la matriz principal y en la otra columna indicar cuantas veces se repite el cada numero en la matriz principal
ejemplo de como es q quiero el programilla
matriz (nxn)
7 - 5 - 2 - 7
3 - 5 - 3 - 4
7 - 3 - 4 - 8
8 - 4 - 3 - 3

# representantes
7
5
2
3
4
8

# de repeticiones
3
2
1
4
3
3

realmente espero no molestar mucho pero les doy todos esos datos para q me pudean enterder........yo lo intente  y no lo pude hacer completo.....
De ante mano muchas gracias a todos quienes se ofrescan ayudarme........   .
 aki les dejo lo q hice y gracias q kien me pueda ayudar ...solo me falta el conteo de cuantos numeros hay por cada uno
Public Class Form1
    Dim M(100, 100), F, C, P, I, j, a(100, 100) As Integer

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim rnd As New Random
        Dim n As Integer
        n = Val(LIM.Text) * Val(LIM.Text)
        D1.RowCount = Val(LIM.Text)
        D1.ColumnCount = Val(LIM.Text)
        D2.RowCount = Val(LIM.Text)
        For F = 0 To Val(LIM.Text) - 1
            For C = 0 To Val(LIM.Text) - 1

                n = rnd.Next(1, Val(LIM.Text + 1))
                M(F, C) = n
                With D1
                    .Item(C, F).Value = M(F, C)
                    .Columns.Item(C).Width = 30
                End With
            Next
        Next

        For F = 0 To Val(LIM.Text) - 1
            a(F, 1) = 0
            D2.Item(1, F).Value = a(F, 1)

        Next
        For F = 0 To Val(LIM.Text) - 1
            a(F, 0) = I + 1
            I = I + 1
            D2.Item(0, F).Value = a(F, 0)
        Next
        For F = 0 To Val(LIM.Text) - 1
            For C = 0 To Val(LIM.Text) - 1
                For j = 0 To Val(LIM.Text) - 1
                    If Val(a(F, C)) = Val(a(j, 0)) Then
                        a(j, 1) = Val(a(j, 1)) + 1
                        D2.Item(1, j).Value = a(j, 1)

                    End If
                Next
            Next
        Next
    End Sub

    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub
End Class