Jump to content

Recommended Posts

Posted

If consql.State = ConnectionState.Open Then consql.Close()

Dim ds As New DataSet

Dim dt As New DataTable

Dim clientes As New SqlDataAdapter("Select nome_empresa as Empresa, localidade as Localidade from tb_clientes where bloquear = 0 order by nome_empresa", consql)

clientes.Fill(ds,

"tb_clientes")

dt = ds.Tables(0)

DataGridView1.DataSource = ds.Tables(

"tb_clientes")

Dim column0 As DataGridViewColumn = DataGridView1.Columns(0)

column0.Width = 300

Dim column1 As DataGridViewColumn = DataGridView1.Columns(1)

column1.Width = 300

Posted

Põe em tag code.

imagina ter uma grid com nomes e procurar um nome

Ok, não queres caixas de texto. Como procuras o nome ? Vais deixar uma linha em branco da grid para pesquisa ?

Estranha forma de vida que tem a capacidade de transformar comandos em mensagens de erro.

ndsotware.org

Posted (edited)

Pelo que me parece é só mudar a query.

Exemplo:

"Select nome from trabalhadores where codTrabalhador=" & dg.Item(0, 0).Value()
Edited by NunoDinis

Estranha forma de vida que tem a capacidade de transformar comandos em mensagens de erro.

ndsotware.org

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.