2 Pontos após o Else?

Olá de novo colegas.

Analisando meu código percebi que ele possui 2 pontos após um Else, não me lembro qual o motivo de ter que usar
os pontos, o codigo funciona normalmente.

Tenho uma teoria:

Eu acho que pode ser pelo fato desta parte do código estar em um subformulário referenciando um campo no formulário pai.

Pode ser isto?

Obrigado a quem ajudar.

Código:

If Month(Me.Data_pagamento) <> Month(Me.Data_vencimento) Or Year(Me.Data_pagamento) <> Year(Me.Data_vencimento) Then
    If Me.[Data_vencimento] = Me.Parent.CONTRATOS![Data_ultimo_pagamento] Then
        Me.Parent.CONTRATOS![Prox_Pagamento] = Null
    Else: Me.Parent.CONTRATOS![Prox_Pagamento] = Me.Parent.CONTRATOS![Dia_para_Pagamento] & Format((Me.[Data_vencimento] + 31), "/mm/yyyy")
    End If
Else
    If Me.[Data_vencimento] = Me.Parent.CONTRATOS![Data_ultimo_pagamento] Then
        Me.Parent.CONTRATOS![Prox_Pagamento] = Null
    Else: Me.Parent.CONTRATOS![Prox_Pagamento] = Me.Parent.CONTRATOS![Dia_para_Pagamento] & Format((Me.[Data_vencimento] + 31), "/mm/yyyy")
    End If
End If
End Sub

Os dois pontos são usados quando colocamos duas ou mais linhas de código em uma só. Você poderia tirar os dois pontos e passar o que vem depois dele na linha para a linha de baixo. Seria a mesma coisa.

Assim?

Código:

If Month(Me.Data_pagamento) <> Month(Me.Data_vencimento) Or Year(Me.Data_pagamento) <> Year(Me.Data_vencimento) Then
    If Me.[Data_vencimento] = Me.Parent.CONTRATOS![Data_ultimo_pagamento] Then
        Me.Parent.CONTRATOS![Prox_Pagamento] = Null
    Else
        Me.Parent.CONTRATOS![Prox_Pagamento] = Me.Parent.CONTRATOS![Dia_para_Pagamento] & Format((Me.[Data_vencimento] + 31), "/mm/yyyy")
    End If
Else
    If Me.[Data_vencimento] = Me.Parent.CONTRATOS![Data_ultimo_pagamento] Then
        Me.Parent.CONTRATOS![Prox_Pagamento] = Null
    Else
        Me.Parent.CONTRATOS![Prox_Pagamento] = Me.Parent.CONTRATOS![Dia_para_Pagamento] & Format((Me.[Data_vencimento] + 31), "/mm/yyyy")
    End If
End If
End Sub

Sim, isso mesmo. Outo exemplo:

EM UMA LINHA:
Me.txtNome = Null: Me.txtNome.SetFocus

EM DUAS LINHAS:
Me.txtNome = Null
Me.txtNome.SetFocus