Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

flaviojef

ComboBox nao assumir outros valores[RESOLVIDO]

Mensagens Recomendadas

flaviojef

boas pessoal tou aqui com um problemazinho num programa que estou a desenvolver em VB.NET entao é o seguinte:

tenho uma ComboBox num respectivo form em que vai buscar informação a outro form diferente que por sua vez essa informaçao está numa ListBox, mas o problema nao está em ir buscar essa informação até porque eu ja consegui ir busca-la, agora o problema é que eu por exemplo tenhu na listbox: maria, manel e joao

na ComboBox aparece a maria, manel e joao mas quando selecciono outro por exemplo o joao ele nao assume:s

isto até pode ser a coisa mais facil de resolver mas nao estou mesmo a ver como fazer isso:s

alguma sugestao?.....agradecia imenso

Cumpz

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
bioshock

Mostra a parte do código em que ele vai buscar os valores à listbox.

Tu estás a querer dizer que não consegues seleccionar o "joão" ?

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
flaviojef

sim, eu consegui colocar os valores que estao noutro form dentro duma listbox para a ComboBox do form que estou a criar agora, mas o problema eh selecionar e ficar esse valor que selecionei eu seleciono mas nao fica, fica sempre o primeiro... o codigo que tenho para visualizar a informação na comboBox eh este:

Private Sub F_marcacoes_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim myCommand As New MySqlCommand
        Dim myAdapter As New MySqlDataAdapter
        Dim myData As New DataTable
        Dim mySQL As String = "SELECT * FROM servicos"
        Dim conn As MySqlConnection
        conn = New MySqlConnection
        conn.ConnectionString = "server=it.integrale.com.pt; user id=jef; password=jef; database=megastand"

        Try
            conn.Open()
            Try
                myCommand.Connection = conn
                myCommand.CommandText = mySQL
                myAdapter.SelectCommand = myCommand
                myAdapter.Fill(myData)
                DataGridView_marcacoes.DataSource = myData

                With CB_servico
                    .DataSource = myData
                    .DisplayMember = "descricao"
                    .ValueMember = "descricao"
                    .SelectedIndex = 0
                End With

            Catch myerro As MySqlException
                MsgBox("Erro de leitura na Base de dados : " & myerro.Message)
            End Try
            conn.Close()
        Catch myerro As MySqlException
            MessageBox.Show("Erro ao conectar com a Base de dados : " & myerro.Message)
        Finally
            conn.Dispose()
        End Try
    End Sub

e depois dentro da ComboBox tenho isto:

CB_servico.Text = DataGridView_marcacoes.CurrentRow.Cells(1).Value.ToString
        txt_preco_servico.Text = DataGridView_marcacoes.CurrentRow.Cells(2).Value.ToString

criei uma datagrid para poder ir buscar os valores

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
ByMySlf

Então acho que esta linha...

CB_servico.Text = DataGridView_marcacoes.CurrentRow.Cells(1).Value.ToString

...não faz muito sentido nesse evento.

Desculpa lá se estou a interpretar mal o teu problema.

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.