clsRuang - cari()

    Public Sub cari()
        db.koneksi()
        query = "SELECT * FROM ruang WHERE nama_ruang LIKE '%" & Form1.UcInventaris1.txtCariRuang.Text & "%'"

        Dim da As New SqlDataAdapter(query, db.konek)
        Dim dt As New DataTable
        da.Fill(dt)

        Form1.UcInventaris1.dgvRuang.DataSource = dt
        Form1.UcInventaris1.dgvRuang.Columns(0).Visible = False
    End Sub