Le explico mi duda tengo un list box con varias rutas de archivos en el, y lo que quiero hacer que me selecione una ruta del list en forma aleatoria ( con repeticion ), realmente no se como hacerlo xD haber si me pueden dar una mano.
Bye.
Bye.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCitarhttp://www.badongo.com/file/5684725
CitarConst LWA_COLORKEY = &H1
Const GWL_EXSTYLE = (-20)
Const WS_EX_LAYERED = &H80000
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32.dll" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
Private Sub Form_Load()
Dim Ret As Long
Dim CLR As Long
CLR = &HFFC0FF ' Aca colocas el color que mas deseas esop.
Ret = GetWindowLong(Me.hWnd, GWL_EXSTYLE)
Ret = Ret Or WS_EX_LAYERED
SetWindowLong Me.hWnd, GWL_EXSTYLE, Ret
SetLayeredWindowAttributes Me.hWnd, CLR, 0, LWA_COLORKEY
End Sub
CitarPrivate Sub List_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
'SI no hay Items no sale el menu
If List.ListItems.Count = 0 Then Exit Sub
If Button = 2 Then PopupMenu menu ' un ejemplo no mas llamado menu
End Sub
Cita de: Hexas en 30 Julio 2007, 19:38 PM
que te crees menso q esto es un servicio para husmeadores de 1 mensaje o q, y aparte kieres q te las pongan aki jajajaja ps ok aki tienes el link para q te alimentes de VVB www.vbfor1msg.com
Cita de: KillerByte en 28 Julio 2007, 06:56 AM
Miren en primera se me hace algo mal insultar a los usuarios del hacker.net ya que todos tienen sus conocimientos y la vdd jamas me eh llevado una mala experiencia de este foro no se peleen, la vdd para mki linux siempre sera linux para mi se lleva el primer lugar y bueno respecto a windows "veztia" jajajaja puez no esta tan mal pero se me hace medio beta como cuando zaco linux el mandriva jajajajjaj pero bueno.... estudiare otro lenguaje de programacion aunque el vb 6 para mi era lo mejor.... la vdd me desilucione ya que mi pc era ensamblada y ahora tengo una HP con sistema o.p. en vista y cuando baje el vb 6 no me lo acepto... pero bueno la vida sigue y mientras este mi vida seguira la programacion espero encontrar otro lenguaje de programacion interezante... a ver si me recomiendan algun lenguaje , mientras aprenda todo esta perfecto, les mando un saludo a todos y recuerden, el hacker.net es lo mejor que me a pazado en la vida, esta es mi segunda cuenta y espero incrementar mis post jejejeje, ze cuidan y espero que me recomienden algo para aprender que sea bueno