Hola a todos! soy nuevo en el foro (me acabo de registrar ), y quiero pedirles ayuda con un programa que estoy haciendo sobre simular un juego de loteria o bingo. Ya casi lo estoy terminando, pero como hace poco tiempo que estoy aprendiendo a programar en visualbasic.Net tengo problemas con algunos "detalles". Bueno les explico lo que hice:

En un NumericUpDown ingreso un numero, el rango es de 0 a 99, al dar click en un botón, si esta en cartón (que lo hice con 15 textbox) lo marca (aqui esta mi problema no se como hacer que el numero cambie de color :S), y lo almaceno en un listbox, esta también almacena los numero que no están en el cartón, es decir, guarda los que salieron.

Lo que tampoco se como hacer es, que mediante un mensaje si el número ya salio, no lo deje volver a salir.

Bueno, no se si me explique bien , espero que pueden ayudarme. Desde ya les doy las gracias!

Saludos:

Para cambiar de color el textbox, usas la propiedad Forecolor, asi:

Código:

TextBox1.ForeColor = Color.Blue

Para eliminar items del Listbox, te dejo un link que te explica mejor:

ListBox (Clase) (System.Windows.Forms)

Espero ayude.


JOSE LUIS

Gracias JOSE LUIS! Me fue de mucha ayuda la info que me brindaste , ya solucione ese problema .
Les hago otra consulta:
Cómo puedo ordenar de menor a mayor los números que me genere aleatoreamente (randon) la función rnd()?
cada uno de los números que me genera se guardan en un textbox (son 15).

Aparte de eso quería preguntarles como hago para obtener todas las posiciones de un caracter que se encuentra en una cadena. Use la función InStr() ... pero esta solo devuelve la primera posición. Hay alguna forma de aplicarla para que me devuelva todas las posiciones?
Les muestro lo que estoy haciendo:

Código:

Private Sub BotonAceptar_Click(...)
        Dim cad As String, car As String, pos As Integer, i As Integer = 0
        cad = ingf.Text 'en esta textbox ingreso la cadena
        car = caracter.Text én esta ingreso el caracter que quiero encontar
        For i = 1 To Len(ingf.Text) Step 1
            pos = InStr(cad, car)
        Next
        cantidad.Text = " Pos " & pos & " - " 'y en esta textbox muestro las posiciones
    End Sub

Espero su ayuda

Saludos:

Mirate este link:

_ A String manipulation example in VB.NET, EQUIVALENTS: Len, Mid, Replace, InStr, UCase, Split etc _ by Jon Barker

Creo que te ayudara buscar el texto, y otras muchas cosas.


JOSE LUIS

Iniciado por josel.vi

Saludos:

Mirate este link:

_ A String manipulation example in VB.NET, EQUIVALENTS: Len, Mid, Replace, InStr, UCase, Split etc _ by Jon Barker

Creo que te ayudara buscar el texto, y otras muchas cosas.


JOSE LUIS

Gracias por la información amigo, pero no me sirvió :S porque es lo mismo que tenia, no me muestra como aplicar la función InStr para lo que necesito (encontrar TODAS las posiciones de un caracter en x cadena). Ojala alguien me pueda ayudar, ya intente diferentes formas de hacerlo, pero nada me da resultado :S