[Resolvido]função navegação em modulos

É possivel criar uma função de navegação em modulos com o codigo abaixo:

Public Sub VerificarRegistro(frmWindow As Form)
With frmWindow
If .CurrentRecord = 1 Then
.cmdNavegacaoPrimeiro.Enabled = False
.cmdNavegacaoAnterior.Enabled = False
.cmdNavegacaoProximo.Enabled = True
.cmdNavegacaoUltimo.Enabled = True
Else
.cmdNavegacaoPrimeiro.Enabled = True
.cmdNavegacaoAnterior.Enabled = True
.cmdNavegacaoProximo.Enabled = True
.cmdNavegacaoUltimo.Enabled = True
End If

If .CurrentRecord = .RecordsetClone.RecordCount Then
.cmdNavegacaoPrimeiro.Enabled = True
.cmdNavegacaoAnterior.Enabled = True
.cmdNavegacaoProximo.Enabled = False
.cmdNavegacaoUltimo.Enabled = False
End If
End With
End Sub


substituindo os comandos "cmdNavegacaoPrimeiro" e etc por argumentos em uma função?

Tópico movido para a sala adequada. As salas de Exemplos são destinadas apenas à exemplos e não a dúvidas.

concluido.

A Ideia era habilitar ou desabilitar os botões de navegação conforme posição do registro no formulario:
no primeiro registro, desabilita o os botões "Primeiro" e "Anterior", no meio, que não é o primeiro nem o ultimo registro, habilita todos os botões e no ultimo registro desabilita os botões "Ultimo" e "proximo".
https://www.maximoaccess.com/t21253-setar-botoes-de-navegacao