none
como unir entre arrays RRS feed

  • Pregunta

  • dígito todo el problema para que me ayuden: Desarrollar un proyecto que permita procesar las ventas de tarjetas de credito vendidas por conjunto de 20 empleados de un banco los mismos q tienen un codigo (1 al 20)

    por cada venta se incrementa en uno el numero de tarjetas vendidas y se acumula monto limite asignad a la tarjeta Resultado

    Codigo  de vendedor, numero de tarjetas vendidas, mont acumulado de tarjetas y monto de comision por vendedor, considerando q a cada uno se le paga un 2% adicional.

    codigo fuente :

    Public Class ejercicio_9

        Private Sub ejercicio_9_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim ve(3) As Integer
            Dim i As Integer
            Dim rpta As DialogResult

            Dim codVen As Integer
            Dim venta As Integer
            Dim monto As Integer


            Do
                'ingreso codigo vendedor
                codVen = InputBox("codigo vendedor", "vendedor (" & i & ")=")
                If codVen < 1 Or codVen > 20 Then
                    MsgBox("error")
                Else
                    ListBox1.Items.Add(codVen)
                End If

                venta = InputBox("cantidad a vender")
                ListBox2.Items.Add(venta)

                rpta = MessageBox.Show("Desea continuar?", "Opcion", MessageBoxButtons.YesNo, MessageBoxIcon.Information)

            Loop Until rpta = vbNo

            TxtMax.Text = ("El día " & ListBox1.Items(Array.IndexOf(ve, ve.Max)) & " se obtuvo " & ve.Max)


            'venta(i) = InputBox("cantidad")
            'ListBox2.Items.Add((venta(i)))


        End Sub

    lo que quisiera acer es como resolver me explico (la cantidad vendida con el vendedor) como uno pa que de resultado me diga : El vendedor X vendio tanto:

    Uso visual basic 2008 aplicacion windows for

    lunes, 23 de julio de 2012 4:24

Todas las respuestas

  • lo que quisiera acer es como resolver me explico (la cantidad vendida con el vendedor) como uno pa que de resultado me diga : El vendedor X vendio tanto:

    con vectores de datos simple no puede lograrlo, porque no relaciona la informacion, ahora si haces

    Public Class Vendedor
    	Public Property Id() As Integer
    		Get
    			Return m_Id
    		End Get
    		Set
    			m_Id = Value
    		End Set
    	End Property
    	Private m_Id As Integer
    	Public Property CantidadVendida() As Integer
    		Get
    			Return m_CantidadVendida
    		End Get
    		Set
    			m_CantidadVendida = Value
    		End Set
    	End Property
    	Private m_CantidadVendida As Integer
    End Class

    y luego defines

    Dim ve() As Vendedor

    alli defines un array de vendedores que podrias suar para poner en su propiedad el id y la cantidad que vendio, de esa forma si esta relacionada el dato y podrias obtener la cantidad dendida por cada uno

    saludos


    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina

    lunes, 23 de julio de 2012 5:33