[Resolvido]Como verificar se item do subformulario foi selecionado ou não?

Como eu faço para saber se um registro de um subformulário foi selecionado ou não?

Estou usando

Código:

Private Sub cmdConfirmar_Click()

Dim intIDPedido As Integer

intIDPedido = Forms!MeuForm!MeuSubForm.Form!IDPedido

End Sub

Mas eu queria que ele verificasse caso eu não tivesse selecionado nenhum registro do subform.

Não entendi bem. Você tem um formulário A que contem um subformulário A1, certo? Você quer clicar em um campo de uma linha no subformulário e quer fique registrado que você clicou nessa linha, é isso? Se for isso, uma ideia pode ser você colocar um label no formulário A e programar o evento "No atual" do subformulário ou o "Ao clicar" ou "Ao receber foco" dos campos para colocar a ID dessa linha no label do formulário:

Parent!NomeDoLabel.Caption = "Registro selecionado: " & Me.Código
ou
Forms!NomeDoFormPrincipal!NomeDoLabel.Caption = "Registro selecionado: " & Me.Código

Perfeito. É isso mesmo.
Mas como eu faço para identificar que nenhum item foi selecionado?

Porque eu vou usar esta informação numa variável dentro do código, e neste caso não pra usar algo como
not isnull ou .listindex <>-1
entendeu?

Quando eu não escolho nada ele retorna o primeiro, mas eu queria que me respondesse algo como, "vc não selecionou nenhum registro"
Se for muito dificil vou trocar tudo isso por uma ListBox.

Fica meio difícil ser mais abrangente sem conhecer a estrutura do aplicativo e o seu real uso. Uma vez que uma linha ainda não tenha sido selecionada, se pressupõe que o label ainda não contenha um registro especificado, a não ser que esteja usando o evento "No atual" do formulário. Como é o uso desse formulário? Você seleciona uma linha e depois fecha ele ou ele continua aberto? Talvez se detalhar todo o processo a que ele se destina, fique mais fácil.

Sabe a ideia de usar uma ListBox? Onde se eu não selecionar nada ele acusa que eu não selecionei?
Eu queria o mesmo para um registro de um subformulário, mas se não der eu vou usar uma ListBox mesmo.

Ainda está complicado entender o real uso pretendido.

No caso da listbox, se você selecionar uma linha, geralmente essa linha fica selecionada mesmo se você clicar fora da listbox. Já no caso de uma linha do subformulário isso não acontece.

Ainda não entendi porque a dica inicial não funciona do jeito que espera. Seria só verificar se tem alguma referência de linha selecionada no label. Agora sem saber todas as ações a serem tomadas fica difícil ser mais específico. Por exemplo, ao abrir o formulário já deverá ter alguma coisa selecionada? Depois que selecionar uma linha, o que deve acontecer? Depois que sair dessa linha selecionada, deverá acontecer alguma coisa? Depois que acontecer essa coisa, o que deverá acontecer com a referência dessa linha selecionada? Outra linha será selecionada? O formulário será fechado?

Em termos gerais a dica foi dada. À partir daí, só mesmo adaptando de acordo a necessidade.

Tudo bem. Obrigado pela ajuda.

Grato pelo retorno. O fórum agradece. Caso ainda não consiga resolver, detalhe mais os pormenores conforme exemplifiquei na mensagem anterior.

Amigo, tenta esse código:

'verifica se foi selecionada alguma linha
If LstSuaLista.ItemsSelected.Count <= 0 Then
MsgBox "Nenhuma linha selecionada.", vbExclamation,"Aviso"
Exit Sub
End If

Espero ter contribuído!