Click here to Skip to main content
15,896,269 members
Home / Discussions / Visual Basic
   

Visual Basic

 
GeneralRe: Print MsChart in VB.Net Pin
Mekong River14-Dec-04 11:04
Mekong River14-Dec-04 11:04 
GeneralRe: Print MsChart in VB.Net Pin
Brightday15-Dec-04 2:45
Brightday15-Dec-04 2:45 
GeneralHelp with a timeout function Pin
Nilus13-Dec-04 1:24
Nilus13-Dec-04 1:24 
GeneralRe: Help with a timeout function Pin
Dave Kreskowiak13-Dec-04 3:56
mveDave Kreskowiak13-Dec-04 3:56 
Generalstring manipultion Pin
SelvaRavi13-Dec-04 0:43
SelvaRavi13-Dec-04 0:43 
GeneralRe: string manipultion Pin
Dave Kreskowiak13-Dec-04 3:53
mveDave Kreskowiak13-Dec-04 3:53 
GeneralRe: string manipultion Pin
kostasvel14-Dec-04 16:25
kostasvel14-Dec-04 16:25 
GeneralError in program Pin
ShayShay12-Dec-04 23:35
ShayShay12-Dec-04 23:35 
This lab computes the amount of income tax that a person will have to pay, based on their salary
Whats wrong with this code? Is my calculations wrong?

Public Class FrmIncomeTax
Inherits System.Windows.Forms.Form

Private Sub FrmIncomeTax_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub btnCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalculate.Click
Dim Salary As Integer
Dim Salary1 As Integer
Salary = lblResult.Text

Select Case Salary
Case Is <= 20000
Salary1 = Salary * 0.02
Case Is <= 50000
' 5% tax bracket
Salary1 = 400 + ((Salary - 20000) * 0.05)
Case Is <= 75000
' 10% tax bracket
Salary1 = 400 + ((Salary - 50000) * 0.1)
Case Is <= 297350
' 15% tax bracket
Salary1 = 400 + ((Salary - 75000) * 0.15)
Case Else
' 20% tax bracket
Salary1 = 400 + ((Salary - 100000) * 0.2)
End Select

txtSalary.Text = Salary1

End Sub
End Class ' FrmIncomeTax
GeneralRe: Error in program Pin
Tom John13-Dec-04 0:10
Tom John13-Dec-04 0:10 
GeneralRe: Error in program Pin
Dave Kreskowiak13-Dec-04 3:49
mveDave Kreskowiak13-Dec-04 3:49 
GeneralRe: Error in program Pin
The Man from U.N.C.L.E.13-Dec-04 22:53
The Man from U.N.C.L.E.13-Dec-04 22:53 
GeneralRe: Error in program Pin
JWSantora118-Dec-04 16:42
JWSantora118-Dec-04 16:42 
Generalport access with VB Pin
Simon W Ross12-Dec-04 22:15
Simon W Ross12-Dec-04 22:15 
GeneralRe: port access with VB Pin
Dave Kreskowiak13-Dec-04 3:46
mveDave Kreskowiak13-Dec-04 3:46 
GeneralRe: port access with VB Pin
Simon W Ross13-Dec-04 20:05
Simon W Ross13-Dec-04 20:05 
GeneralRe: port access with VB Pin
Dave Kreskowiak14-Dec-04 5:20
mveDave Kreskowiak14-Dec-04 5:20 
Generalxtended MAPI code...PLs Help Pin
Boominathan12-Dec-04 17:47
Boominathan12-Dec-04 17:47 
GeneralRe: xtended MAPI code...PLs Help Pin
Dave Kreskowiak13-Dec-04 3:43
mveDave Kreskowiak13-Dec-04 3:43 
GeneralRe: xtended MAPI code...PLs Help Pin
Mekong River13-Dec-04 17:24
Mekong River13-Dec-04 17:24 
GeneralApplication.ProductVersion Pin
TonyForgan12-Dec-04 17:31
TonyForgan12-Dec-04 17:31 
GeneralRe: Application.ProductVersion [EDITED] Pin
Dave Kreskowiak13-Dec-04 3:24
mveDave Kreskowiak13-Dec-04 3:24 
Questionadjust height of RptLine at run-time in data report? Pin
jitwadee12-Dec-04 17:03
jitwadee12-Dec-04 17:03 
AnswerRe: adjust height of RptLine at run-time in data report? Pin
Dave Kreskowiak13-Dec-04 3:13
mveDave Kreskowiak13-Dec-04 3:13 
AnswerRe: adjust height of RptLine at run-time in data report? Pin
jitwadee14-Dec-04 15:30
jitwadee14-Dec-04 15:30 
GeneralReferencing an Excel Spreadsheet in VB6 Pin
itsmattdee12-Dec-04 14:22
itsmattdee12-Dec-04 14:22 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.