Foro de elhacker.net

Hola
tengo esta función que está tan rápida que hasta a mi me aburre ,por donde tengo que buscar para poner una barra proges (nunca he usado una ) pero que ralentice la función para que parezca que hace mil cálculos  :silbar:

'****************combinaciones FUNCIONA DE p**a MADRE 
    Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
        Dim input As Integer() = (Result1)
 
        Dim output As New List(Of Integer)
 
        For i As Integer = 0 To input.Length - 1
            For j As Integer = 0 To input.Length - 1
                If input(i) <> input(j) AndAlso input(i) < 5 Then
                    Dim result As Integer = (input(i) * 10 + input(j))
                    output.Add(result)
                End If
            Next j
        Next i
 
        Me.ListBox8.Items.AddRange(output.Cast(Of Object).Distinct().ToArray)
 
    End Sub

saludos
Luis

Haber si entendi , quieres una Fake ProgressBar (una que intencionalmente muestra una Progreso totalmente diferente al Proceso que hace.)?
O una barra de Progreso que este sincronizada con el calculo? (una que muestre realmente el Progreso de la funcion)

En Cualquier caso te he puesto un Ejemplo de Ambas. :

Source Code : BarrasdeProgreso.rar (https://anonfile.com/zfFfLfhco9/BarradeProgreso_rar)

(https://i.ibb.co/KsbC8NX/addddd.png)

 Si Aincrad quiero crear el efecto de que esta función hace la ostia de cálculos  :silbar:

gracias probare lo que me dejaste

saludos
luis

No se encontraron archivos  :o :o en el rar ,al  descomprimir me da ese aviso

luis

Lo subi a Github :

https://github.com/DestroyerDarkNess/ProgressBar-Example (https://github.com/DestroyerDarkNess/ProgressBar-Example)

----------------------------------------------

El link q te puse primero sirve normalmente , no se por q te dio error.

Gracias hijo ya lo tengo  ;-)

lo malo es que se me acabo el tiempò jejje tengo que ir a currar a Segovia lo probare este finde y a practicar  ;D

saludos
Luis y de nuevo gracias

Perfecto Aincrad muchas gracias funciona como queria jeje

saludos
Luis