Excelente truco que te permitirá crear gráficos en tus formularios .... no es la mejor forma pero funciona muy bien.
_Screen.Cls
_Screen.CurrentX=100
_Screen.CurrentY=100
_Screen.FontName='Courier New'
_Screen.Print( 'Grafica '+Chr(13)+ ;
'Object Turnover Budget '+Chr(13)+ ;
'hulgi 123456 100000'+Chr(13)+ ;
'ekspo 1234 1000'+Chr(13)+ ;
'pood 123 100' )
For i=0 To 15
_Screen.FillColor=Rgb(255*Rand(),255*Rand(),255*Rand())
_Screen.FillStyle=i%8
_Screen.Box(300+20*i,300,300+20*(i+1),300-300*Rand())
Endfor
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com