Hola,
¿como puedo hacer que mi programa en visual basic lea el contenido de dos textbox,muestre resultado en listbox?
En un ejercicio en Visual Basic 6.0 me pide que al ingresar un número en un TextBox(text1) y una letra en otro TextBox(text2),
me busque en una lista cargada(ListBox) las palabras que contengan esa letra!
Ejemplo:
text1 = 3
text2 = "a"
la lista mostraría "3" palabras con la letra "a"
Ej: Ricardo, Micaela y Verónica (SELECCIONADOS)
XFAVOR AYUDENME PORQUE ME ESTOY PREPARANDO PARA RENDIR EN UNOS DÍAS Y QUIERO PRACTICARLO!..
Espero su ayuda! ya que siempre encuentro excelentes soluciones hechas por ustedes!
Desde ya GRACIAS!
buenas, necesito que me colaboren para hacer un ejercicio aplicativo en VISUAL BASIC 6.0. que se trate de cualquier tema, pero como no tengo el programa instalado, debo de hacerlo en físico, es decir, dibujar el entorno gráfico, colocar los nombres respectivos (tanto para el usuario como para el programador) y la codificación necesaria. gracias les agradezco por su amabilidad...DIOS LOS BENDIGA
#include<stdio.h>
int main(void){
int a;
printf ("escriba el numero a realizar");
scanf("%d",&a);
setbuf ( stdin, NULL );
if ( a%2 == 0){
printf("el numero es par");
}else{
printf("el numero es impar");
getchar();
return 0
El codigo de arriba que escribio el otro compañero en visual basic seria:
Si numero entre 2(un numero es par si se puede dividir por 2) es igual a una variable de tipo int(que guarda un numero entero por ejmplo:1,2,3.. Si no se pudiera dividir por dos seria algo asi:3/2 = 1,5 que no es de tipo entero pero 2/2=1 es del tipo entero)entonces el numero es par,sino ,el numero es impar.
Sub parimpar(ByVal numero As Integer)
If numero Mod 2 = 0 Then
MsgBox("El numero es Par")
Else
MsgBox("El numero es Impar")
End If
End Sub
_________________________________________________________
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a As Integer = TextBox1.Text
parimpar(a)
End Sub
nesesito un programa q m deiga si es inpar o par kmpa pero solo m dise inpar o alreves par pero n detecta si es par o inpar cada numero m dise inpar q l ago kmpa kual seria la declaracion n visual
If Val(Text1.Text) Mod 2 = 0 Then
Label2.Caption = "Numero PAR"
Else: Label2.Caption = "Numero IMPAR"
End If
End Sub