Here is what I have. I need the check boxes to add the variables Masters(3000) and doctorate(8000) to whatever the value of the current radio box. If they are both checked then they should both be sumed along with the current radio box value. If they are unchecked it should also update. Everything is outputed to lblSalaryOutput.text. I need to use a sub/Function to calculate. Am I on the right path? What do I still need to do, and if possible can someone provide me an example. I am not looking for someone to complete this but I could use very basic examples because Im very novice. It is for a class and is due tonight so Im hoping for some help soon. I also included an image of the form.
Option Explicit On
Option Strict On
Imports System.Math
Public Class frmMain
Dim lecturer As Integer = 50000
Dim instructor As Integer = lecturer * 1.3
Dim assistant As Integer = lecturer * 1.6
Dim associate As Integer = lecturer * 1.8
Dim professor As Integer = lecturer * 2.0
Dim masters As Integer = 3000
Dim doctorate As Integer = 8000
Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click
End
End Sub
Private Sub AboutToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AboutToolStripMenuItem.Click
MsgBox("This program was written by Steven R. Robinson", MsgBoxStyle.OkOnly, "Author")
End Sub
Private Sub optLect_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles optLect.CheckedChanged
lblSalOutput.Text = CStr(lecturer)
End Sub
Private Sub optInst_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles optInst.CheckedChanged
lblSalOutput.Text = CStr(instructor)
End Sub
Private Sub optAssistPro_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles optAssistPro.CheckedChanged
lblSalOutput.Text = CStr(assistant)
End Sub
Private Sub optAssocProf_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles optAssocProf.CheckedChanged
lblSalOutput.Text = CStr(associate)
End Sub
Private Sub optProf_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles optProf.CheckedChanged
lblSalOutput.Text = CStr(professor)
End Sub
Private Sub chkMast_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chkMast.CheckedChanged
End Sub
End Class