comparar horas

[GABRIL]

hola chicos:

veran, estoy programando una aplicacion, y deseo darle la bienvenida al usuario, para ello deseo comparar la hora para saber si decir "Buenos dias" o "Buenas Tardes", bueno, espero y me haya explicado.
Saludos.

Ha, mi formato de HORA es AM Y PM.
BY

[culd]

Ahi te arme una funcion que te devuelve el saludo

Código:

Public Function Saludo() As String
If Hour(Time) >= 7 And Hour(Time) < 12 Then
    Saludo = "Buenos Dias!!!"
    Exit Function
End If

If Hour(Time) >= 12 And Hour(Time) < 8 Then
    Saludo = "Buenas Tardes!!!"
    Exit Function
End If

If Hour(Time) >= 8 And Hour(Time) < 24 Then
    Saludo = "Buenas Noches!!!"
    Exit Function
End If

If Hour(Time) >= 24 And Hour(Time) < 7 Then
    Saludo = "Buenas Madrugadas!!!"
End If
End Function

Es simple, solamente verifica la hora actual y segun la hora devuelve un mensaje

[David]

Esa función habrá que corregirla un poco. Porque la hora no puede ser mayor que 12 y al mismo tiempo ser menor que 8, tal vez la idea era poner 18 . Y tampoco puede ser mayor que 24 y al mismo tiempo menor que 7, lo correcto sería mayor o igual que 0.
Saludos .

[seba123neo]

mas o menos quedaria algo asi:

Código:

Public Function Saludo() As String
If Hour(Time) >= 8 And Hour(Time) <= 12 Then
    Saludo = "Buenos Dias!!!"
    Exit Function
End If
If Hour(Time) >= 13 And Hour(Time) <= 19 Then
    Saludo = "Buenas Tardes!!!"
    Exit Function
End If
If Hour(Time) >= 20 And Hour(Time) <= 24 Then
    Saludo = "Buenas Noches!!!"
    Exit Function
End If
If Hour(Time) >= 0 And Hour(Time) <= 7 Then
    Saludo = "Buenas Madrugadas!!!"
End If
End Function

saludos.