Visual Basic - Como saber cuando es fin de mes

Hola a todos, estoy haciendo un procedimiento donde el último día del mes debo cargar los datos a un historico, la pregunta es como saber cuando es el último día del mes sin que el usuario lo diga, manejarlo por código internamente.

Gracias

Aqui esta tu respuesta

http://vbasic.astalaweb.com/Fechas/Primer%20y%20%C3%BAltimo%20d%C3%ADa%20del%20mes.asp

yo uso esto

Sub ultimodiames(mesdeliq As Date, ultdiames As Date)
Dim vmes As Integer
Dim ultdia As String

vmes = Month(mesdeliq)
vano = Year(mesdeliq)
Select Case vmes
Case 11, 4, 6, 9
ultdia = "30 /" & vmes & "/ " & vano
Case 1, 3, 5, 7, 8, 10, 12
ultdia = "31 /" & vmes & "/ " & vano
Case 2
If vano Mod 4 = 0 Or vano Mod 100 = 0 Then
ultdia = "29 /" & vmes & "/ " & vano
Else
ultdia = "28 /" & vmes & "/ " & vano
End If
End Select
ultdiames = CDate(ultdia)

End Sub

suerte!