Answer to Question #253613 in Visual Basic for Kikiki

Question

Using Visual Basic Design and develop a simple application System that determine the most economical quantity to be stocked for each product that a manufacturing company has in its inventory this quantity called economics order quantity (EOQ) is calculated as following 

EOQ = sqrt (2RS/I)

Answer 1

Public Class Form1
    ''' <summary>
    ''' Button Calculate
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub btnCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalculate.Click
        Dim R As Double = Double.Parse(txtR.Text)
        Dim S As Integer = Integer.Parse(txtS.Text)
        Dim I As Double = Double.Parse(txtI.Text)
        Dim EOQ As Double = Math.Sqrt(2 * R * S / I)
        txtEOQ.Text = Convert.ToString(EOQ)
    End Sub
End Class