設計一個個人納稅計算程序

???? 此次程序要求設計一個個人納稅計算程序。按規(guī)定：工資、薪金所得，使用超額累進稅率。以每月的總收入減去800元后的余額，為應納稅所得額。以下即為我根據(jù)題目要求編寫的計算程序：

?

Private? Sub? Command1_click()

Dim? w? as Long????

Dim? s? as? Long

Dim? y? as? Long

w=Val(Text1.Text)

?

s=w-800

Select? case? s

Case? is<=500

y=s*5/100

Case? is<=2000

y=s*10/100

Case? is<=5000

y=s*15/100

Case? is<=20000

y=s*20/100

Case? is<=40000

y=s*25/100

Case? is<=6000

y=s*30/100

Case? is<=8000

y=s*35/100

Case? is<=100000

y=s*40/100

?

Case? Else

???? 通過對該程序的編寫，我對vb有了較深一步的了解，對vb有了一定的興趣，而且懂得了對于網(wǎng)絡的充分利用，讓資源得到充分的運用，也讓自己的生活變得便利。

?

?

總結

以上是生活随笔為你收集整理的设计一个个人纳税计算程序的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。