Mensajes

pienso que la manera más facil es:

colocar los números ingresados en un array, por cada combinación a crear, haces un for con tantos ciclos como números en la combinación y dentro de el un random de 0 al largo del array, de manera que escoja valores del array, organizas los números obtenidos por el random, te aseguras que no haya repetidos y listo, luego te aseguras que no hagan combinaciones repetidas y listo completo

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

Código (vbnet) [Seleccionar] Expandir

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

[Luis]

Es decir, amigo Luis, además de las diferencias, digamos en horizontal de una línea, quieres las diferencias de una línea con la siguiente. Esto si sale nos forramos y no olvides que voy a un porcentaje en los beneficios de tu Empresa.

Por si no lo he tenido claro te pongo lo que creo que pides.

Si creo que te has metido en mi mente jejejej ni yo hubiera pensado en hacerlo de estas dos formas " FUNCIONA " mejor de lo que esperaba


Y si estamos y estaremos unidos jejejej y gracias por aparecer de nuevo ya sabes

Luis
gracias también a los que respondieron al tema

Hola
este código me calcula o compara números y dice la distancia entre estos pero lo hace de izquierda a derechas o sea en horizontal

ejemplo

1 2 3 5 8 y me calcula que entre el 1 y  2  hay 1 entre 2 y 3 hay 1 entre 3 y 5 hay 2 y entre 5 y 8 hay 3

resultado
1  2  3  5  8 <--- muestra
 1  1  3   3 <----resultado


Bien lo que ahora busco es hacerlo pero en vertical  con los números hacia abajo

Código (c) [Seleccionar] Expandir

#include <stdio.h>
int main()
{
   int i,x1=0, x2=0,x3=0,x4=0,x5=0,x6=0;
   FILE* fichero,*fich;
   fichero = fopen("combiLuis.txt", "r");
   if (fichero == NULL)
       {
       printf("No existe el fichero!\n");
       return 1;
       }
  fich = fopen("CombiDiferanciasLuis.txt", "wt");
   if (fich == NULL)
       {
       printf("No existe el fichero!\n");
       return 1;
       }
  while (! feof(fichero))
           {
               fscanf(fichero,"%d %d %d %d %d %d ", &x1,&x2,&x3,&x4,&x5,&x6);
               fprintf(fich,"%d %d %d %d %d \n",x2- x1,x3-x2,x4-x3,x5-x4,x6-x5);
           }
   fclose(fichero);
   fclose(fich);
   return 0;
}

Luis


se me olvido up
seria hacer lo mismo pero hacia abajo

1 2 3 4 5
2 5 4 7 8
4 2 1 8 9

Hola
tengo un txt que tiene solo números en orden descendente  de cuatro en cuatro

asi
1 2 3 4
5 7 8 6
10 15 88 90
15 25 77 85....etc y para de contar

Como puedo contar numero por numero y me lo muestre en otro txt

Ejemplo
01= 25
02= 45
03=88

Consegui este codigo aca mismo pero cuenta es el total y ademas letras

Código (vbnet) [Seleccionar] Expandir

Imports System.IO
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim palabras As Integer = 0
        Dim letras As Integer = 0
        Dim numeros As Integer = 0

        Dim lineas As String() = File.ReadAllLines("C:\1.txt")
        For Each linea As String In lineas
            For Each palabra As String In linea.Split(" ")
                If (palabra.Length > 0) Then
                    palabras = palabras + 1
                    For Each letra As Char In palabra.ToCharArray()
                        If (Asc(letra.ToString()) > 47 And Asc(letra.ToString()) < 58) Then
                            numeros = numeros + 1
                        ElseIf (Asc(letra.ToString()) > 64 And Asc(letra.ToString()) < 123) Then
                            letras = letras + 1
                        End If
                    Next
                End If
            Next
        Next

        Label1.Text = "Palabras: " & palabras & Microsoft.VisualBasic.vbNewLine & "Letras: " & letras & Microsoft.VisualBasic.vbNewLine & "Numeros: " & numeros

    End Sub
End Class

Gracias
Luis

Difícil ee 

tambien me serviria algunos ejemplos o rutinas de combinaciones para trastear con ellos a ver que tal

luis

A  petición de elektro

Bien este código forma grupos de cuatro en cuatro lo que tiene la variable hasta acabar con todos los números

variable-->  1 2 3 4 5 6 7 8 9 10 11 12 13 estos números pueden llegar asta el 90

el código me muestra ahora esto

1 2 3 4
5 6 7 8
9 10 11 12

Bien la idea es cojer dos numeros 1 2 y combinarlos con 10 y 11 y seguir:

ejemplo

1 2 10 11
3 4 10 11
5 6 10 11
7 8 10 11
9 10 11 12
9 10 11 13

esto se repetiría hasta fin de ciclo

espero se entienda

Luis