http://forum.k0d.cc/showthread.php?s=de9c91a3b1d1c33d545dec71ac771b48&t=4132


Есть много решений данной проблемы но этот наиболее простой

1) Следует добавить компонент "Internet Transfers Control 6.0"
2) Зарегистрироваться на Zymic.com после чего загрузить текстовый файл с текстом, как например здесь: http://datasupport.vndv.com/Version.txt
3)
Код:

Dim Version As String
Dim AppVerzion As String
' Версия приложения
AppVerzion = App.Major & "." & App.Minor & "." & App.Revision
' Проверка новой версии
Version = Inet1.OpenURL("http://datasupport.vndv.com/Version.txt")
' Сравнение версий
If Version <> AppVerzion Then
MsgBox "Вышла новая версия программы"
Else
MsgBox "Новой версии в данный момент нет"
End If

При выходе новой версии программы, обновляем файл и все) А этот код вписываем е примеру в Form1_Onloa