Menú

Mostrar Mensajes

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ú

Mensajes - cobein

#261
Muy buen programa sonic, la verdad es admirable la atencion que le das a los detalles, la interfaz esta impecable. Felicitaciones.
#263
Option Explicit

Private Sub Form_Load()
    Dim i As Long
    Dim svData() As String
   
    ReDim svData(25)
    For i = 0 To UBound(svData)
        svData(i) = i
    Next
   
    MixUp svData
   
    For i = 0 To UBound(svData)
        Debug.Print svData(i)
    Next
End Sub

Private Sub MixUp(svData() As String)
    Dim sTemp As String
    Dim lIndex As Long
    Dim lIndex1 As Long
    Dim i As Long
   
    Randomize Timer
    For i = 0 To UBound(svData) * 5
        lIndex = Rnd * UBound(svData)
        lIndex1 = Rnd * UBound(svData)
        sTemp = svData(lIndex): svData(lIndex) = svData(lIndex1): svData(lIndex1) = sTemp
    Next
End Sub

#264
Bueno acadejo dos modulos uno para cambiar el icono de un exe y el otro para realinear el PE, ambos corregidos y con ejemplo.

http://www.uploadsourcecode.com.ar/d/I84aLcziZJLcN5aL6y6gWEwoMQRYd0mo
#265
Las credenciales las sacas con api
#266
I just check the code and is basic stuff, I like to see ppl posting stuff since it teach stuff to noobs but some 'new' content will be nice imo.
#267
Y si seteas el current dir ?
#268
Cambia la propiedad del tabindex o ponelo por defecto.
#269
Tareas Programadas?
#270
Hay muuuucho material y codigo sobre esto, bastante de el en asm pero la mayoria en ingles.

En mi pagina hay 2 ejemplos uno usando int 2d y otro que mide el tiempo.