PRB: .NET Windows Service - "Sub Main was not found."

Include this following lines into:

Region " Component Designer generated code "

' The main entry point for the process
_
Shared Sub Main()
Dim ServicesToRun() As System.ServiceProcess.ServiceBase

ServicesToRun = New System.ServiceProcess.ServiceBase() {New SendSMS}

System.ServiceProcess.ServiceBase.Run(ServicesToRun)
End Sub

Now just need to compile again