Software para Margen de Ganancia y Margen Porcentual

Software Margen de Ganancia y Margen Porcentual

A continuación de esta maravillosa aplicación sencilla para calcular los márgenes de ganancias y márgenes de ganancias tipo porcentual más utilizadas por los comerciantes.

En Venezuela, el fenómeno de los precios que suben a pesar de la especulación de precios de bienes (mercancías) y servicios debido por la subida del dólar paralelo (una es «la reina» es el MkCambios y «su nené» es el DolarToday, son los que usan los especuladores que los transan los precios a diario), solo atacan a gobiernos que no es del agrado de la derecha (solo a las que les gustan a los bursátiles financieros con tendencia alcistas) y las psiquis del venezolano lo sufren debido por las presiones y sanciones de los EE.UU contra Venezuela (a su vez exigiendo que cambiarán la forma de gobernar a los políticos del alto calado de la oposición que lo querían gobernarlos de nuevo y tal como sucedió en la Argentina como el ex Presidente Mauricio Maccri, así como también sucedió y se debió la corrupción de entre los años 1961 y 1999, y no se hicieron la realidad tal motivo: probablemente se pasaron a la élite gobernante global como son las empresas farmacéuticas y varias más como Coca-Cola o Jhonson-Jhonson Company, por ejemplo).

Nos permita calcular para dar margen de Ganancia del precio de un bien o producto (mercancía) y servicios (ejm: luz, telefonía, internet, parabólicas o TV por Cable, etc.). Así veamos el código fuente del archivo Form1.vb de nuestro proyecto:

Public Class Form1
       Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim mar As Single
       Dim sell As Single
       Dim cost As Single
       Dim ajus As Single
       Dim dif As Single
       Dim cien As Double

    'Número 100
    cien = 100

    'Ingreso de Datos
    cost = Val(TextCOST.Text)
    sell = Val(TextSELL.Text)

    'Calculo del Margen de Ganancia
    mar = ((sell - cost) / sell) * cien

    'Calculo del Margen Porcentual
    ajus = ((sell - cost) / cost) * cien

    'Calculo diferencia
    dif = sell - cost

    'Salida de Datos
    'TextMAR.Text = mar
    'TextPOR.Text = ajus
    'TextDIF.Text = dif

    'Redondeo del porcentaje y añadir signo dólar o peso "$" y porcentaje "%" 
    TextMAR.Text = Math.Round(Convert.ToDouble(mar), 2) & " %"
    TextPOR.Text = Math.Round(Convert.ToDouble(ajus), 2) & " %"
    TextDIF.Text = Math.Round(Convert.ToDouble(dif), 2) & " $"

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

    'Limpiar en los ingresos de datos
    'Para no afectar con el Error "NaN", añadir con el apóstrofe (') para taparlos
    'TextCOST.Text = " 0.0 "
    'TextSELL.Text = " 0.0"

    'Limpiar Pantalla en los resultados
    TextMAR.Text = " 0.0 "
    TextPOR.Text = " 0.0 "
    TextDIF.Text = " 0.0 "
    TextCOST.Focus()

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    Application.Exit()
End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
    AboutBox1.ShowDialog()
End Sub
End Class

En la imagen arriba identificada del software sencillo, aqui la características:

* Botón Calcular: Permite calcular, colocar primero cual es su precio viejo (o anterior) de una mercancía (o producto) y de un servicio básico (ejm: plan de datos de internet o ABA móvil de Movistar o Digitel por ejemplo) y la otra cual es precio actual de una mercancía (o producto) y de un servicio básico (ejm: plan de datos de internet o ABA móvil, etc), y pulse ese botón, una vez calculados aquí en la parte de «Resultados» allí es dar la resolución de los resultados de los cálculos realizados.

* Botón Acerca de…: Nos permite la versión de la aplicación, el autor de la misma y la descripción corta del app, el año en qué publicado el app.

* Botón Limpiar: Limpiar la pantalla con los cálculos ya realizadas anteriormente, podemos dar nuevos cálculos que desee ingresando los nuevos precios a establecer según el usuario.

* Botón Salir del App: Aquí sale el aplicativo.

Descarga el software sencillo (Versión Release): https://drive.google.com/file/d/1ABkDBHU-L0wYw9idDT1m83dVQnT7F9Sg/view?usp=sharing

Descarga el software sencillo (Versión DEBUG): https://drive.google.com/file/d/10xUf6o4fVO2ka_J7bBxz9rauDQcy–rw/view?usp=sharing

Descargue el código fuente (Necesitarás Visual Basic 2008 o posterior, y también sirve con el software libre MonoDevelop): https://drive.google.com/file/d/1bdtSJOFAz75xu1t_C0IsN_3lKUrqFeBw/view?usp=sharing

Descargue desde Github: https://github.com/cesarmarcanove/Fincalculator/releases

Ver Código Fuente desde Github: https://github.com/cesarmarcanove/Fincalculator/ (Ver en los apartados: Form2.vb y Form2.designer.vb)