Hola chicos, tengo que hacer para la facu un programita en VB que ingrese codigo de barras y cuente y acumule los repetidos.
y después volcarlos a un datagridview para imprimirlo.
Cargar un vector y buscar el repetido puedo, pero buscar cada uno de los repetidos y contar cuantas veces ser repite no me sale.
Tampoco puedo buscarlos todos sin tener que ingresar que que quiero buscar.
Lo ideal sería que cada vez que entra un valor a Vec(i) revise si existe en el vector, de ser así me acumule tal vez en una matriz el valor y el acumulado.
Se puede hacer esto?
Código:
Dim f As Integer
Dim Vec(f) As String
Dim Acu As Integer = 0
Dim num As String
Sub Main()
Console.WriteLine("ingrese cuantos numeros entran")
f = CInt(Console.ReadLine())
ReDim Vec(f)
For i As Integer = Vec.GetLowerBound(0) To Vec.GetUpperBound(0)
Vec(i) = Console.ReadLine()
Next
Console.WriteLine("ingrese el numero a controlar")
num = Console.ReadLine()
For i As Integer = Vec.GetLowerBound(0) To Vec.GetUpperBound(0)
If Vec(i) = num Then
Acu = Acu + 1
End If
Next
Console.WriteLine(Acu)
Console.ReadLine()