Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Gustavo_Germ

[Resolvido] Simples... combo box

Recommended Posts

Galera a dúvida é simples... mas eu não estou conseguindo sanar...

 

ó:

 

eu tenho um CMB, que quando eu clico em NOVO, ADDITEM nesse CMB... porém, como eu sei que o usuário vai selecionar o último item... queria saber...

 

Qual comando utilizo para selecionar o ultimo listindex no caso quando eu adicionar um item???

 

VLW!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Assim você tem o ultimo indice.

Combo1.ListCount - 1

Não entendi sua duvida.

 

Combo1.NewIndex

Compartilhar este post


Link para o post
Compartilhar em outros sites

Assim ó....

 

Eu tenho um botao de "novo", que quando eu clico, gero um novo "controle" que eu controle selecionando por um COMBO.

 

então quando eu crio um novo "controle", eu sei que a pessoa vai selecionar o último lisindex possivel do meu combo.

 

ou seja:

 

If MsgBox("AVISO" & Chr(13) & Chr(13) & "Deseja realmente criar um NOVO CONTROLE da ficha financeira do aluno?", vbYesNo, "ATENÇÃO") = vbNo Then
	Exit Sub
	
Else

	If CmdEdi.Visible = False Then
		LIMPA_DADOS_FINANCEIRO
		TxtMenSer.Text = CmbSer.Text
		TxtMenPer.Text = CmbPer.Text
	End If

	CmbControle.Enabled = True
	CmbControle.AddItem month(date) & "/" & year(date)

*** SELECIONA O ÚLTIMO [month(date) & "/" & year(date)] QUE EU CRIEI ***


End If

 

Fui mais específico???

 

 

 

vlw

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tente utilizar o .NewIndex do Combobox.

Retorna o ultimo indice que foi inserido.

 

 

Abraços!

Compartilhar este post


Link para o post
Compartilhar em outros sites

OPa... tipo... como assim...

 

eu dou um CmbControle.NewIndex?

 

Mas ta dando propriedade inválida..

 

seria CmbControle.NewIndex = Refresh???

 

tambem não dá... ahhaha minha criatividade é demais!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Dim LastIndex as Integer

LastIndex = Combo1.NewIndex

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.