- Version
- Download 45
- File Size 254.57 KB
- File Count 1
- Create Date March 2, 2016
- Last Updated March 2, 2016
Respondents Calculator in Visual Basic
Respondents Calculator in Visual Basic
Step by step tutorial on how to create a respondents calculator in Visual Basic
Source code and pdf tutorial is included in the download file.
Source code:
Private Sub txtPop_KeyPress(KeyAscii As Integer)
If (KeyAscii >= vbKey0 And KeyAscii <= vbKey9) Or KeyAscii = 46 Or KeyAscii = vbKeyBack Then
Else
Beep
KeyAscii = 0
End If
End Sub
Private Sub txtPop_Change()
txtres.Text = Val(txtpop.Text) / (1 + (Val(txtpop.Text) * 0.0025))
End Sub