elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Trabajando con las ramas de git (tercera parte)


  Mostrar Temas
Páginas: 1 2 3 4 [5] 6 7 8 9 10 11 12 13
41  Programación / .NET (C#, VB.NET, ASP) / Problema mostrar multiples variables en un solo Listbox en: 19 Abril 2015, 18:28 pm
Bueno aca de nuevo con un problema similar al anterior post   :silbar:

Queria mostrar en un solo listbox 60 listbox  y se resolvio :) ahora pense que seria mejor mostrar  las variables que se muestra en esos testbosex  y podria hacer el codigo mas limpio jejej

tengo esto, pero dos cosas si son 60 variables como es que se colocan jejej ya que logro poner una y la muestra pero repiten los resultados :( cuando se supone que deberia :)

de esta manera si hay una sola variable
01 02 03 04 05 06 07 08 09 10

y me muestra : ????

01 02 03 04 05 06 07 08 09 10
01 02 03 04 05 06 07 08 09 10
01 02 03 04 05 06 07 08 09 10
01 02 03 04 05 06 07 08 09 10
01 02 03 04 05 06 07 08 09 10
01 02 03 04 05 06 07 08 09 10


Código
  1. Dim Lnumbers As List(Of Integer) = rsalmlals2
  2.  
  3.        For Each Lnumber As Integer In Lnumbers
  4.  
  5.            ListBox1.Items.Add(String.Join(" "c, Lnumbers.Cast(Of Integer)))
  6.  
  7.        Next Lnumber


Saludos
Luis
42  Programación / .NET (C#, VB.NET, ASP) / Como puedo mostar 60 listbox en uno solo :) en: 18 Abril 2015, 13:18 pm
Hola de nuevo por aca, ya espacio el tiempo en entrar por preguntas tontas jejej gracias a mi amigo elektro que por miedo a sus regaños  :silbar:  no mentira , es gracias a el que me dio la pista como trabajar en este lenguaje pero me falta un monton por aprender jejeje

ahora la temida pregunta :)

tengo 60 listbox y por supuesto las consabidas variables de cada uno de estos listbox donde muestro resultados numericos ahora se me ocurre meter en un solo lisbotx todas estas variables pero separadas por resultados

algo como esto

listbox1
01 02 03 04 05 06 07 08 09 10 <---------variable 1
 
11 12 13 14 15 16 17 18 19 20 <---------variable 2

21 22 23 24 25 26 27 28 29 30 <---------variable 3 ....Etc

estaba concatenando ;( pero ***** desastre jejej


saludos
Luis








43  Programación / .NET (C#, VB.NET, ASP) / rellenar con rand variable ya cargada de datos en: 9 Abril 2015, 14:35 pm
 Otro de mis inventos :)

quiero rellenar con numeros aleatorios cuando la cuenta de la variable este por debajo de 30, el rango de estos numeros es 00 al 99, pero no deberian de repetir en la variable.

tengo esto que rellena pero con ceros

Código
  1. If Resultados.Count < 30 Then
  2.  
  3.           Resultados = Resultados.Concat(Enumerable.Repeat(Of Integer)(0, (30 - Resultados.Count)))
  4.  
  5.          End If

entonces se me ocurrio esto pero nunca me da la seguridad de tener como minimo 30 datos en la variable :( a veces el programa entero no llega a esa cantidad y FALLO

Código
  1. If Resultados.Count < 30 Then
  2.  
  3.           Resultados = numerosFaltantesdelRango
  4.  
  5.        End If




Luis
44  Seguridad Informática / Análisis y Diseño de Malware / Explotar a los correos spam denegacion de servico en: 8 Abril 2015, 20:05 pm
Hola no tengo Npi de como hacerlo pero alguien me puede decir como se puede evitar o que se reenvien sus mensajes spam ? y saturarlos de tal manera que se les quite las ideas de enviar basura ?

luis
45  Programación / .NET (C#, VB.NET, ASP) / Pregunta Re tonta :( no mostra ceros en listbox en: 1 Abril 2015, 18:56 pm
En serio :)  o yo no se buscar o esto no existe

envio a un listbox una serie de datos numericos y los muestro en un listbox y a al principio y segun los calculos estos muestran algunos ceros ( bueno yo diria que bastantes jejej )  :silbar:  y lo que quiero no es eliminar los ceros, pero si que no se vean  y que solo el listbox muestre numeros pero no el cero ( cuestion de estetica )

Código
  1. Dim se As IEnumerable(Of Integer) = Resultss
  2.        Dim li As List(Of Integer) = se
  3.        li.Sort()
  4.        Me.ListBox7.Items.AddRange(li.Cast(Of Object).ToArray)
46  Programación / .NET (C#, VB.NET, ASP) / Otra mision con variables en: 31 Marzo 2015, 15:43 pm
Hola a todos aca traigo otra e las mias

tengo tres variables dos con arreglos y una tercera que trabajaria con los registros de la variable que cumpla con la condicion en ese momento pero no se si se puede hacer algo con esta chapuza que haciendo  :)


Código
  1.    Dim values1 As    integer  
  2.        Dim values2 As   integer
  3.       [color=red] Dim compuesto As Integer <-- a esta variable llegaria los datos de cualquiera de las dos anteriores[/color]
  4.  
  5.  
  6.  
  7.  
  8.        Dim Re As IEnumerable(Of Integer) =
  9.           (values).
  10.           Distinct.
  11.           Select(Function(values As Integer)
  12.                      If values <= 35 Then
  13.  
  14.                          Return values
  15.                      Else
  16.  
  17.                          Return values2
  18.  
  19.                      End If
  20.  
  21.                  End Function)
  22.  


Luis
47  Programación / .NET (C#, VB.NET, ASP) / Rellenar con rand no me funciona en: 29 Marzo 2015, 12:20 pm
Otra de las mias
cuando quiero unir dos rutinas o mas no me funciona lo de rellenar con numeros aleatorios dentro del rango

se supone que este codigo al no haber mas numeros dentro del arreglo tomaria uno al azar dentro del rango establecido pero no se que pasa ahora que no lo hace


Código
  1.   ReadOnly MAX As Integer = 99
  2.  
  3.  
  4.        Dim Rand As New Random
  5.        Dim ReAsult2255e As IEnumerable(Of Integer) =
  6.           (splits(1).Concat(splits(3).Concat(splits(5).
  7.           Distinct.
  8.           Select(Function(Value As Integer)
  9.                      Return If(Value < MAX, Value, Rand.Next(1, MAX))
  10.                  End Function))))
  11.  
  12.        Dim seAlecctedValues231 As IEnumerable(Of Integer) = ReAsult2255e
  13.        Dim liste3 As List(Of Integer) = ReAsult2255e.Take(10).ToList
  14.        liste3.Sort()
  15.        ListBox12.Items.AddRange(liste3.Cast(Of Object).ToArray)
  16.        ' ----------------------------------------------------------------------
  17.  
  18.  
  19.       Dim Rand1 As New Random
  20.        Dim AReAAsult2255e As IEnumerable(Of Integer) =
  21.           (splits(3).Concat(splits(10).Concat(splits(11).Concat(splits(12).
  22.           Distinct.
  23.           Select(Function(Value As Integer)
  24.                      Return If(Value < MAX, Value, Rand1.Next(1, MAX))
  25.                  End Function)))))
  26.  
  27.        Dim seAlecctedValues231A As IEnumerable(Of Integer) = AReAAsult2255e
  28.        Dim listeA3 As List(Of Integer) = AReAAsult2255e.Take(10).ToList
  29.  
  30.        listeA3.Sort()
  31.        ListBox13.Items.AddRange(listeA3.Cast(Of Object).ToArray)


Luis


48  Programación / .NET (C#, VB.NET, ASP) / Eliminar filtrar numeros con terminaciones iguales en: 26 Marzo 2015, 11:53 am
Eliminar numeros con terminaciones iguales

Hola de nuevo aca estoy con mis chapusas en programacion :)

Formo combinaciones de numeros de un arreglo o variables pero donde el resultado no debe tener el mismo numero terminal explico :)

Código
  1. Dim resultss As IEnumerable(Of Integer) =
  2.            {
  3.                01,03,04,06,07,08,09,20,28,35.39,45,48,55,66,68,75,78.90,98........
  4.            }
  5.  
  6.        Dim selectedValues As IEnumerable(Of Integer) = resultss.Take(10)
  7.  
  8.        Me.ListBox1.Items.AddRange(selectedValues.Cast(Of Object).ToArray)
  9.    End Sub

esto me da combinaciones de 10 numeros


salida

01,03,04,06,07,08,09,20,28,35

39,45,48,55,66,68,75,78.90,98

en la primera combinacion esta el 08 y el 28
en la segunda combinacion estan el  45 55 75

la idea es que en ninguna combinacion  tenga repetidos el mismo numero terminal ?

Luis
49  Programación / .NET (C#, VB.NET, ASP) / Limpiar programa en: 20 Marzo 2015, 16:16 pm
Hola de nuevo por estos lares :) se que mi amigo Elecktro se preguntaria por mi jejje

Bueno os cuento a medida que avanzo con mas variables en mi programa me surge un problema  si hago las primeras operaciones me salen las cuentas bien,pero la siguiente ves que vuelvo a calcular me encuentro que las cuentas son otras diferentes yo creo que aunque uso un codigo me quedan todas las variables cargadas con el primer calculo y solo borro son los texboxes, esto se corrige cuando cierro el editor y vuelvo a abrir el programa
no se como limpiar las variables sin tener que cerrar todo y empezar de nuevo ;(


Código
  1.  Private Sub Button2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  2.        For Each obj As Control In Me.Controls
  3.            If (TypeOf obj Is TextBox) Then
  4.                obj.Text = ""
  5.            End If
  6.            If (TypeOf obj Is GroupBox) Then
  7.                For Each caja As Control In obj.Controls
  8.                    If (TypeOf caja Is TextBox) Then
  9.                        caja.Text = ""
  10.                    End If
  11.                Next
  12.            End If
  13.            ListBox1.Items.Clear()
  14.            ListBox2.Items.Clear()
  15.            ListBox3.Items.Clear()
  16.            ListBox7.Items.Clear()
  17.  
  18.        Next
  19.    End Sub


Luis
50  Programación / .NET (C#, VB.NET, ASP) / tomar valores de una cadena numerica y agrupar en variables independientes en: 16 Marzo 2015, 13:02 pm
Estaba trabajando este código pero después de escribir la ostia a medida que alargo los números estos se quedan cortos ;(

yo lo que busco es pasar los números de la cadena por orden de menor a mayor en grupos de cuatro en cada variable pero necesito saber los nombres de las variable

ejemplo
variable a=(valor de 1 2 3 4)
variable b=(valor de 5 6 10 11 )

Código
  1. Dim numbers() As Integer = {1, 2, 3, 4, 5, 6, 10, 11, 14, 15,  54, 57, 58, 60, 63, 64, 65, 67, 68, 69, 70, 71, 75, 76, 77, 79, 80}
  2.  
  3.  
  4.    Dim evensQuery = From num In numbers
  5.                         Where num Mod 2 = 0
  6.                         Select num
  7.  
  8.        Dim selectedValues As IEnumerable(Of Integer) = evensQuery.Take(4)
  9.        ListBox1.Items.AddRange(selectedValues.Cast(Of Object).ToArray)
  10.  
  11.        '----------------------------------------2
  12.        Dim ll = From num In numbers
  13.                Where num Mod 2 = 1
  14.                Select num
  15.  
  16.        Dim selected2Values As IEnumerable(Of Integer) = ll.Take(4)
  17.        ListBox2.Items.AddRange(selected2Values.Cast(Of Object).ToArray)
  18.  
  19.        '---------------------------------------------------------3
  20.        Dim ll1 = From num In numbers
  21.                Where num Mod 3 = 0
  22.                Select num
  23.  
  24.        Dim selected222Values As IEnumerable(Of Integer) = ll1.Take(4)
  25.        ListBox3.Items.AddRange(selected222Values.Cast(Of Object).ToArray)


Luis
Páginas: 1 2 3 4 [5] 6 7 8 9 10 11 12 13
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines