NO CHECKLISTBOX,UM E FACIL.MAS.....
Prezados colegas,
Eu até sei usar o Checklistbox do VB.NET.
Mas, agora surgiu uma situação,na qual preciso exibir o conteúdo de uma
tabela com vários campos no CheckListbox.Ou seja,tenho de preencher o
Checklistbox com várias colunas.Ccom o código abaixo ,eu consigo exibir
somente uma coluna. Mas....como exibir os outros campos da tabela no
Checklistbox?????
Meu Código é o seguinte:
[ô]Declara variável
Dim FD As New ClFontedeDados
Dim Dt1 As DataTable
Dim x As Integer
Try
[ô]Estabelece conexão com Fonte de Dados
FD.Conectar()
[ô]Pesquisa
Dt1 = FD.PesquisarDataTable([Ô]Select * From Tb_Dialogo[Ô])
x = 0
CKLst1.Items.Clear()
Do Until x > Dt1.Rows.Count - 1
[ô]Exibe
CKLst1.Items.Add(Dt1.Rows(x).Item(1).ToString)
x = x + 1
Loop
[ô]Desconecta Fonte de Dados
FD.Desconectar()
[ô]Retorna valor
Return True
Catch ex As Exception
[ô]Retorna valor
Return False
End Try
Eu até sei usar o Checklistbox do VB.NET.
Mas, agora surgiu uma situação,na qual preciso exibir o conteúdo de uma
tabela com vários campos no CheckListbox.Ou seja,tenho de preencher o
Checklistbox com várias colunas.Ccom o código abaixo ,eu consigo exibir
somente uma coluna. Mas....como exibir os outros campos da tabela no
Checklistbox?????
Meu Código é o seguinte:
[ô]Declara variável
Dim FD As New ClFontedeDados
Dim Dt1 As DataTable
Dim x As Integer
Try
[ô]Estabelece conexão com Fonte de Dados
FD.Conectar()
[ô]Pesquisa
Dt1 = FD.PesquisarDataTable([Ô]Select * From Tb_Dialogo[Ô])
x = 0
CKLst1.Items.Clear()
Do Until x > Dt1.Rows.Count - 1
[ô]Exibe
CKLst1.Items.Add(Dt1.Rows(x).Item(1).ToString)
x = x + 1
Loop
[ô]Desconecta Fonte de Dados
FD.Desconectar()
[ô]Retorna valor
Return True
Catch ex As Exception
[ô]Retorna valor
Return False
End Try
Cara, o ListView também tem como colocar CheckBoxes.
Não seria mas fácil trabalhar com ele do que com o CheckListBox?
é só colocar a propiedade CheckBox = True
Não seria mas fácil trabalhar com ele do que com o CheckListBox?
é só colocar a propiedade CheckBox = True
Tópico encerrado , respostas não são mais permitidas