Autor
|
Tema: [Ayuda] ComboBox en VB6 [Solucionado] (Leído 4,705 veces)
|
DeSsy
Desconectado
Mensajes: 69
Ni me fijo, ni me copio... Tengo stylo propio (h5)
|
Hola de nuevo, esta vez, como dije anteriormente... estoy creando un "keygen", bien, he estado liada un tiempo, y ahora vuelvo...
Lo que me gustaría crear es un "keygen", pero completo, en el que haya varios en uno solo... me explico.. Lo que quiero es que con una aplicación genere los serials que yo introduzca en el código pero que desde un ComboBox se pueda cambiar a buscar los serials de otro software, (así como una lista de los programas en ComboBox), si alguien me facilita algún pequeño código de base se lo agradecería, y perdonen... pero aún estoy aprendiendo vb, jeje.
Un besiico!
|
|
« Última modificación: 11 Febrero 2011, 16:39 pm por DeSsy »
|
En línea
|
|
|
|
Edu
Desconectado
Mensajes: 1.082
Ex XXX-ZERO-XXX
|
Mirate esto y luego lo haces a tu gusto. Private Sub Command1_Click() MsgBox Combo1.Text End Sub Private Sub Form_Load() Combo1.AddItem "Nod32" Combo1.AddItem "AVG" Combo1.AddItem "Avast" Combo1.Text = "Avast" End Sub
El combo1 le cambias la propiedad Style a 2-
|
|
|
En línea
|
|
|
|
79137913
Desconectado
Mensajes: 1.169
4 Esquinas
|
HOLA!!! Ejem... suponiendo que tenes los programas en un Vector (Array) los agregas asi al combo: For x = 0 to Ubound(Programas) Combo1.Additem Programas(x) Next
Y despues consultas el Combo1.Text para saber que eligio la persona. GRACIAS POR LEER!!!
|
|
|
En línea
|
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!" "La peor de las ignorancias es no saber corregirlas"
79137913 *Shadow Scouts Team*
|
|
|
DeSsy
Desconectado
Mensajes: 69
Ni me fijo, ni me copio... Tengo stylo propio (h5)
|
Muchisimas gracias chicos, solucionado! Un besiico! Una última cosa, y ¿como podría añadir un serial distinto a cada programa? osea, cada vez que elija un programa diferente en el Text1 salga el serial que le corresponde... Gracias
|
|
« Última modificación: 11 Febrero 2011, 16:54 pm por DeSsy »
|
En línea
|
|
|
|
Psyke1
Wiki
Desconectado
Mensajes: 1.089
|
'... Dim strSerial As String Select Case text1.Text Case "CS 1.6" strSerial = "345J -356Ñ - 4444 - WER6" Case "FrogCheat" strSerial = "Google existe..." End Select MsgBox strSerial '...
DoEvents!
|
|
|
En línea
|
|
|
|
DeSsy
Desconectado
Mensajes: 69
Ni me fijo, ni me copio... Tengo stylo propio (h5)
|
Gracias Mr. Frog strSerial = "Google existe..." Se que existe, pero por lo que tengo entendido este foro está creado para el fin de aprender y ayudar ¿no?, en fin, perdona por mis pocos (nada) conocimientos en vb... Lo dicho, muchas gracias, un beso..
|
|
|
En línea
|
|
|
|
|
DeSsy
Desconectado
Mensajes: 69
Ni me fijo, ni me copio... Tengo stylo propio (h5)
|
Pues eso... perdona por mi ignorancia.
saludos
|
|
|
En línea
|
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
ayuda con un combobox
Java
|
kurama12
|
1
|
2,993
|
25 Mayo 2007, 18:00 pm
por Casidiablo
|
|
|
Ayuda con combobox en php
PHP
|
Dannysoft
|
2
|
2,995
|
12 Julio 2008, 23:47 pm
por Hans el Topo
|
|
|
AYUDA CON COMBOBOX
Programación Visual Basic
|
hannah
|
1
|
1,661
|
17 Octubre 2008, 20:57 pm
por cobein
|
|
|
ayuda con un combobox
Programación Visual Basic
|
guidosl
|
1
|
1,760
|
5 Abril 2009, 00:14 am
por xkiz ™
|
|
|
ayuda con combobox y jqgrid
Desarrollo Web
|
landerzx
|
0
|
1,799
|
11 Enero 2013, 22:43 pm
por landerzx
|
|