Quantcast
Channel: Transact-SQL forum
Viewing all articles
Browse latest Browse all 23857

Sales Commission Calculator APP Visual Basic 2010

$
0
0

Items have a fixed price of $10 per unit. Use a Select Case statement to implement the following sales commission schedule:

Fewer than 10 items sold = 1% commission

Between 10 & 40 items sold = 2% commission

Between 41 & 100 items sold = 4% commission

More than 100 items sold = 8%

Numbers of items sold 

Gross sales:

Commission (%)

Earnings:

                     Calculate(button)

I keep getting "End of statement expected" error...underlined below;

Public Class SalesCommissionCalculatorForm

    Dim Commission As Object
    Dim Price As Double


    Private Property caseCode As Double
    Private Property ItemsSold As Object

    ' handles calculateButton_Click event
    Private Sub calculateButton_Click(ByVal sender As System.Object,
      ByVal e As System.EventArgs) Handles calculateButton.Click

        Dim caseCode Ad Integer ' stores case code entered
        Dim message As String ' displays access status of users

        caseCode = Val(caseCodeTextBox.Text)
        caseCodeTextBox.Clear()

        Select Case ItemsSold
            Case Is < 10
                Commission = Price * 0.01
            Case Is < 41
                Commission = Price * 0.02
            Case Is < 101
                Commission = Price * 0.04
            Case Else
                Commission = Price * 0.08
        End Select
    End Sub

End Class ' SalesCommissionCalculatorForm


Viewing all articles
Browse latest Browse all 23857

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>