Dialogresult.yes not running properly

See more:

VB

Hello,
I have a if statement to check if the button pressed on the messagebox is either "Yes" or no. But it seems to even when I click "No" it executes the "Yes" clause.

Any ideias?

What I have tried:

My code:

MsgBox("Pretende mesmo encerrar a sessão?", vbYesNo, MessageBoxIcon.Information)
       If (DialogResult.Yes) Then
           Dim janela As New frmVerificarColab
           Close()
           janela.Show()

       Else
           MsgBox("Foi escolhido o primeiro carro da lista, se pretender escolher, clique no butão referente á gestão de carros", vbOK, MessageBoxIcon.Information)
       End If