Access - ¿TU ESTADO DE ANIMO ES SIEMPRE EL MISMO ?

¿TU ESTADO DE ANIMO ES SIEMPRE EL MISMO ?

¿ESTAS HARTO DE LOS COLORES DE TU FORMULARIO ?

ESTAS INSTRUCCIONES LAS REALIZE PARA HACER MAS AMENO EL TRABAJO
SON UNA TONTERIA PERO A MI ME ANIMAN Y EVITAN QUE CAIGA EN MONOTONIA

ESTAS FUNCIONES LO QUEHACEN ES QUE CAMBIAN EL COLOR DE LOS FORMULARIOS, CUANDO ACCEDES A ÉL O BIEN CUANDO HACES CLICK SOBRE EL PROPIO FORMULARIO

EN EL EVENTO DE --- DETALLE DE FORMULARIO --- AL HACER CLIC ---ESCRIBIR LA FUNCION PRIMERA , O BIEN COPIAR Y PEGAR

EN EL EVENTO DE --- DETALLE DE FORMULARIO --- AL CARGAR "form_Load()" escribir LA FUNCION segunda , O BIEN COPIAR Y PEGAR



PRIMERA .--------------

Private Sub Detalle_Click()

Static a As Integer
Static b As Integer
Static c As Integer

Randomize 2

a = Rnd * 255 + 1
b = Rnd * 255 + 1
c = Rnd * 255 + 1
Me.Detalle.BackColor = RGB(a, b, c)

End Sub

SEGUNDA -------------
Private Sub Form_Load()

Static a As Integer
Static b As Integer
Static c As Integer

Randomize 2

a = Rnd * 255 + 1
b = Rnd * 255 + 1
c = Rnd * 255 + 1
Me.Detalle.BackColor = RGB(a, b, c)

End Sub


espero quem le sirva a alguien

saludos :

jose manuel lanza