主题：[分享]个人所得税正反计算器

Dim t As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim i As Double = cdbl(t.Text)
If i  <= 5
    MessageBox .Show("税率:  0.03")
ElseIf i  > 5
    MessageBox.Show("税率:  0.1")
End If