Gambas: Obtener número de días del Mes. Ejemplo Uso de funciones externas.
Revisando el foro de gambas-es.org, encontré este interesante código donde el usuario Vuott, usaba la función externa "g_date_get_days_in_month" de la libreria "libglib-2.0", para obtener el numero de días de una mes y año concreto.
Library "libglib-2.0"
' guint8 g_date_get_days_in_month (GDateMonth month, GDateYear year)
' Returns the number of days in a month, taking leap years into account.
Private Extern g_date_get_days_in_month(GDmonth As Integer, GDyear As Integer) As Byte
Public Sub Main()
Dim num As Byte
Dim mes As String
Dim meses As String[] = [Null, "Enero", "Febrero", "Marzo", "Abril", "Mayo", "Junio","Julio", "Agosto", "Septiembre", "Octubre", "Noviembre", "Diciembre"]
mes = "Febrero"
num = g_date_get_days_in_month(meses.Find(mes), 2016)
Print "El mes de "; mes; " contiene "; num; " dias."
End
Codigo descargable: Alojado en google drive
fuente:
https://www.gambas-es.org/viewtopic.php?f=4&t=6633