Si combina bien pero , pero, ya sabes Elektro  siempre hay un pero, jeje, los numeros guías son para posicionar los numeros que hay que introducir manualmente esos numeros no son los que se van a combinar si no los que se introduzcan mediante unos texbosex.

fíjate como se ordenan los numeros mediante los numeros guías


Números guías  :  01-02-03-04-05-06-07-08-09-10-11-12-13-14-15-16-17-18-19-20-21-22-23-24-25-26-27-28-29-30-31-32-33-34-35-36-37-38-39-40

numeros propios:  10-15-18-19-22-24-36-38-39-40-41-43-44-47-50-54-56-61-63-68-68-70-71-73-75-76-77-78-79-80-81-83-84-86-87-88-59-90-91-92 < estos son los que se introducen a mano


los numeros que yo introduzco se tienen que ordenar según  estos numeros

numeros guías para tomar el orden fíjate que la combinación 01)  se ordena 1, 2 salta al 14 y hace saltos al 16 y así sucesivamente

01) 1 2 12 14 16 37 <---ordenar mis numeros en este orden o posiciones guias
02) 1 3 13 22 25 38

y el resultado seria tomando (acá usamos mis numeros)  y los ordenamos como están ordenados las combinaciones guías
es estos el orden es igual a la combinación 01 pero numeros diferentes, el 10 esta en la posición del 1, el 15 en la del dos el 43 hace el salto a la posición 14 y a si igual como lo hacen las combinaciones guías

01) 10-15-43-47-54-59
02) 10-18-44-70-75-90


Gracias por tu tiempo   y sobre todo Paciencia jejej

Luis

Gracias Elektro

siempre tan amable lo probare y te dire

Luis

Bueno puede ser que no haya sabido explicar el problema ya que no son combinaciones como tal,es solamente acomodar los numeros en las posiciones
que da la rueda, los numeros guias son para que debajo de ellos se pongan los numeros que uno quiere :tomare solo unos cuantos

Números guías  :  01-02-03-04-05-06-07-08-09-10-11-12-13-14-15-16-17-18-19-20-21-22-23-24-25-26-27-28-29-30-31-32-33-34-35-36-37-38-39-40

numeros propios:  10-15-18-19-22-24-36-38-39-40-41-43-44-47-50-54-56-61-63-68-68-70-71-73-75-76-77-78-79-80-81-83-84-86-87-88-59-90-91-92


numeros guías

01) 1 2 12 14 16 37
02) 1 3 13 22 25 38

y el resultado seria tomando nuestros numeros

01) 10-15-43-47-54-59
02) 10-18-44-70-75-90

Como se ve los numeros que uno pongan se ponen en en el orden que se da en los numeros guías,(hasta yo me enredo jejej)

Gracias de nuevo lo que creo es dificil de hacer ya que con 10 horas de curro al dia como mecánico y 54 años se me hace cuesta arriba lo que me gustaría saber es como hacerlo sin tantas pegas ya que esto es una aficcion y no trabajo y de paso me acostumbre a programar a pie ,escribir montón de código jejej

te agradezco tu interés de verdad

Luis

Me he vuelto tarimba buscando que esto no me muestre ceros y signos negativos yo envió desde un texbox un numero y aplico esta formula pero cuando pongo. ejemplo el uno me sale   -9 , 0

codigo

Private Sub Sumar(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
 
 
        Result1 = {Num1 - 1, Num1 - 2, Num1 + 3, Num1 + 6, Num1 + 8} _
                  .Distinct().ToArray
        Array.Sort(Result1)
 
 
       End Sub

Hola

Gracias por tu respuesta tan pronto me dejas enredado yo pensaba en hacer coincidir los textbos uno por uno ya que los numeros quías cambian eso del 1 al 50 es para el ejemplo ya que pueden empezar con cualquier numero.pero tienen que quedar en el orden que da el ejemplo
esto es lo que llevo hasta el momento

Public Class Form1
    Dim maximum As Short = 99
    Dim Número As Double
    Private TextBoxes As TextBox() = {Nothing}
    Private Result1 As Int32(), Result2 As Int32(), Result3 As Int32(), Result4 As Int32(), Result5 As Int32(), Result6 As Int32(), Result7 As Int32(), Result8 As Int32(), Result9 As Int32(), Result10 As Int32(), Result11 As Int32(), Result12 As Int32(), Result13 As Int32(), Result14 As Int32(), Result15 As Int32(), Result16 As Int32(), Result17 As Int32(), Result18 As Int32(), Result19 As Int32(), Result20 As Int32()
    Private _textBox As Object
    Private Property ListBox1Count As Integer
    ReadOnly MAX As Integer = 99
 
 
     l
 
 
Public Sub solonumeros(ByRef e As System.Windows.Forms.KeyPressEventArgs)
        ' evitar letras
        If Char.IsDigit(e.KeyChar) Then
            e.Handled = False
        ElseIf Char.IsControl(e.KeyChar) Then
            e.Handled = False
        ElseIf Char.IsSeparator(e.KeyChar) Then
            e.Handled = False
        Else
            e.Handled = True
        End If
 
    End Sub
 
 
' Elimino duplicados al mismo tiempo que selecciono los números inferiores a MAX.
        Dim Resultss As IEnumerable(Of Integer) =
            (
                From Value As Integer
                In (Result1.Concat(Result2).Concat(Result3).Concat(Result4).Concat(Result5).Concat(Result6).Concat(Result7).Concat(Result8).Concat(Result9).Concat(Result10).Concat(Result11).Concat(Result12).Concat(Result13).Concat(Result14).Concat(Result15).Concat(Result16).Concat(Result17).Concat(Result18).Concat(Result19).Concat(Result20)).Distinct
                Where Value <= MAX
            )
 
 
' concateno todos y muestro en un listbox
 
Dim Rand288 As New Random
 
        Dim Result288 As IEnumerable(Of Integer) =
            (Result1.Concat(Result2).Concat(Result3).Concat(Result4).Concat(Result5).Concat(Result6).Concat(Result7).Concat(Result8).Concat(Result9).Concat(Result10).Concat(Result11).Concat(Result12).Concat(Result13).Concat(Result14).Concat(Result15).Concat(Result16).Concat(Result17).Concat(Result18).Concat(Result19).Concat(Result20).
        Distinct.
        Select(Function(Value As Integer)
                   Return If(Value < MAX, Value, Rand.Next(0, MAX))
               End Function))
        ListBox12.Items.AddRange(Result288.Cast(Of Object).ToArray)
 
 
 
  End Sub
End Class
 

Hola a todos hace tiempo que no entraba debido a motivos de salud pero ya estamos dando querrá de nuevo

Después de estar buscando mucho he encontrado esta forma de combinar numeros, según esto es para la lotería primitiva y se basa en algo llamado la rueda ?

bien la pregunta especifica es la siguiente.

tengo un form donde introduzco estos numeros guías mediante unos textbox (eso esta chupado jejej) lo que por supuesto no tengo idea es que me genere los numeros
como el ejemplo que pongo y me los muestre en un lixtbox.

Para 50 Números En 80 Combinaciones

Números guías: 01-02-03-04-05-06-07-08-09-10-11-12-13-14-15
16-17-18-19-20-21-22-23-24-25-26-27-28-29-30-31-32-33-34-35-36-37-38-39-40-
41-42-43-44-45-46-47-48-49-50


01) 1 2 12 14 16 37
02) 1 3 13 22 25 38
03) 1 4 15 29 39 49
04) 1 5 19 39 41 46
05) 1 6 14 19 23 41
06) 1 6 17 26 40 47
07) 1 7 18 19 27 41
08) 1 8 10 11 23 43
09) 1 28 30 33 34 35
10) 2 4 6 7 44 50
11) 2 8 13 15 33 42
12) 2 8 31 35 47 48
13) 2 9 20 21 25 46
14) 2 10 18 24 38 47
15) 2 11 13 27 28 46
16) 2 14 17 22 29 33
17) 2 15 25 31 32 33
18) 2 30 32 36 39 45
19) 3 4 28 40 43 45
20) 3 5 21 29 42 48
21) 3 7 30 31 43 46
22) 3 8 12 17 20 39
23) 3 9 22 28 36 40
24) 3 10 12 28 40 44
25) 3 14 24 35 41 49
26) 3 15 23 34 36 47
27) 4 5 16 20 24 32
28) 4 9 17 34 41 48
29) 4 9 22 43 44 45
30) 4 10 12 22 36 43
31) 4 14 19 25 30 47
32) 4 26 31 38 39 42
33) 5 6 7 14 39 46
34) 5 6 18 23 27 39
35) 5 7 8 25 45 49
36) 5 7 17 35 36 37
37) 5 10 13 14 31 50
38) 5 12 27 33 38 43
39) 6 8 24 26 36 46
40) 6 10 21 33 37 41
41) 6 11 12 15 19 35
42) 6 12 25 28 29 48
43) 6 16 22 31 34 49
44) 7 11 22 26 32 41
45) 7 12 13 21 23 24
46) 7 14 18 23 27 46
47) 7 20 28 42 43 47
48) 8 13 25 31 32 42
49) 8 14 21 27 32 44
50) 8 16 19 28 38 48
51) 9 10 12 36 44 45
52) 9 10 15 16 27 30
53) 9 11 14 39 40 42
54) 9 18 29 32 43 50
55) 9 19 23 26 33 49
56) 10 14 26 34 45 48
57) 10 19 20 36 42 49
58) 11 16 18 33 36 44
59) 11 17 21 30 38 49
60) 11 20 29 30 34 37
61) 11 21 26 30 37 50
62) 13 15 33 35 47 48
63) 13 16 29 41 45 47
64) 13 18 26 35 43 44
65) 13 19 32 34 37 40
66) 15 17 18 21 28 45
67) 15 37 44 46 48 49
68) 16 23 29 35 40 46
69) 16 24 25 34 39 43
70) 17 19 24 29 31 44
71) 17 20 34 38 49 50
72) 17 26 29 37 38 49
73) 18 20 22 30 40 48
74) 20 21 26 29 34 50
75) 20 27 31 35 37 45
76) 22 23 28 37 39 50
77) 22 24 42 45 46 50
78) 23 30 38 41 42 44
79) 25 27 36 40 41 50
80) 25 32 35 42 47 48


Gracias de antemano

Luis

Hola a todos de nuevo

Buscando y buscando por el foro no encuentro donde  vi la solución a este problema de configuración si alguien la recuerda se lo agradezco.

Bien es lo siguiente tengo un pc que recibe señal wifi atraves de una tarjeta inalambrica conectada a una antena exterior (señal de la casa de mi madre ) que compartimos y ella paga no mentira a veces la pago yo jeje,bueno necesito conectar un  router xavi 7968 al pc para repartir la señal dentro de casa (ya sabeis moviles tv etc )  ya lo habia echo pero perdi los datos como se hace y lo había tomado de acá,pero realmente no encuentro ese post y era especifico de este router.


Gracias de antemano
Luis

os comento que tenia tiempo que no entraba debido a problemas de salud pero gracias ya estoy mejor

  Ya lo se jejej

En ves de arrancar desde un cd lo hacemos desde un pen booteable donde habremos gravado el diccionario o los diccionarios en el mismo

gracias

Luis

Hola a todos

como todo novato jejej que soy mi  pregunta es ?
cuando se genera un diccionario aparte de que tarda un montón de tiempo como lo puedo guardar en disco c ,cuando estoy en wifiFlax 3.4 que es el que uso y este lo arranco desde un cd. y si creo uno en wind como lo puedo usar desde un pen ya que asumo que no lo puedo poner en el cd.

gracias
Luis