[Resolvido]Erro de compilação

Olá pessoal!

Encontrei um código para localizar portas COM disponiveis, porém, esta apresentando um erro de compilação:

"Método ou membro de dados não encontrado"

Código:

Private Sub cmdPortas_Click()
Dim i As Integer

cboPortas.Clear
For i = 1 To 16
If DetectaPortaCOM(i) <> 0 Then
cboPortas.AddItem "COM" & i
End If
Next
cboPortas.ListIndex = 0
End Sub

O erro seta para a parte em vermelho.

Alguém sabe porque esta apresentando este erro?

Desde já, obrigado!

Boa noite, lupe

Será
cboPortas.rowsource=""

Boa noite, alexandre!

Infelizmente deu o erro em tempo de execução 6014:

"A propriedade RowSource deve ser definida como Value List para
que este metodo seja utilizado."


Será que o problema pode estar nas definições das propriedades da ComboBox que carrega as portas?

Obrigado!

lupe,
Reveja onde dá o erro. Deveria funcionar

Alexandre,

A propriedade "Tipo de Origem da Linha" estava definida como "Tabela/Consulta", alterei para "Lista de Valores" e desativei a linha:

'cboPortas.ListIndex = 0

Fiz o teste e retornou o valor "COM3".


Obrigado pela ajuda.


Abraço!

Lembre-se de marcar Resolvido. Desta vez marco eu.

Realmente Alexandre, me esqueci de marcar Resolvido.

Me desculpe e obrigado por ter marcado.


Abraço!