Как исправить ошибку при попытке отправить электронное письмо с помощью класса smtpclient

---

Всем Доброе Утро !!!.

Я разрабатываю модуль кода с VB NET 2017, пытаясь отправлять электронные письма с помощью класса SmtpClient, и получаю следующее сообщение об ошибке (более или менее, исходный текст на испанском языке):
- Невозможно подключиться к удаленному серверу. Ошибка была произведена во время попытки подключения из-за того, что подключенная часть не ответила должным образом после периода задержки, или произошла ошибка в установленном соединении, так как подключенный хост не смог ответить".

Это VB код, который я использую:

Dim objMail As New System.Net.Mail.SmtpClient
Dim MailMensaje As New System.Net.Mail.MailMessage()
With objMail
     .UseDefaultCredentials = True
     .Host = "colegio.com.mx"
     .Port = 25
     .EnableSsl = False

     MailMensaje.[To].Add ("someuser@outlook.com")
     MailMensaje.From = New 
  System.Net.Mail.MailAddress("somebody.name@colegio.com.mx", "DataMAC17", System.Text.Encoding.UTF8)
                    MailMensaje.Subject = "Envío de archivos de prueba"
                    MailMensaje.SubjectEncoding = System.Text.Encoding.UTF8
                    MailMensaje.Body = "Les envío los archivos de prueba solicitados"
                    MailMensaje.BodyEncoding = System.Text.Encoding.UTF8
                    MailMensaje.Priority = System.Net.Mail.MailPriority.Normal
                    MailMensaje.IsBodyHtml = False
                    Dim Anexo1 As New System.Net.Mail.Attachment(Ruta1)
                    Dim Anexo2 As New System.Net.Mail.Attachment(Ruta2)
                    MailMensaje.Attachments.Add(Anexo1)
                    MailMensaje.Attachments.Add(Anexo2)
 
                    Try
                        objMail.Send(MailMensaje)
                        MessageBox.Show("Mail enviado correctamente", "Felicidades !!!", MessageBoxButtons.OK)
                    Catch ex As System.Net.Mail.SmtpException
                        MessageBox.Show(ex.ToString, "Error!", MessageBoxButtons.OK)
                    Finally
                        objMail = Nothing
                        objMail.Dispose()
                    End Try
                End With

Я был бы очень признателен за любую помощь или чаевые.

Спасибо заранее

Что я уже пробовал:

Я искал примеры кода и читал всю информацию, которую я нашел о вовлеченных классах, и я собираюсь продолжать искать ответы, чтобы решить свою проблему.

Я пробовал с примерами, которые я нашел, но ни один из них не сработал.

---