Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.
'Declared Constants Const BOOKS_READ1Integer As Integer = 10 Const BOOKS_READ2Integer As Integer = 15 Const BOOKS_READ3Integer As Integer = 20 Const MAX_BOOKS_ALLOWED_READInteger As Integer = 10000 'Declared Variables Dim totalPointsDecimal, booksReadInteger, bookPoints, _ customerCountInteger, numberBooksReadInteger, totalBooksRead, _ numbooksRead, average, booksRead As Integer Private Function calculatePointsDataType(ByVal bookValue As String) As Integer Dim bookPoints As Integer Try Dim numberBooksRead As Integer = Integer.Parse(numBooksReadTextBox.Text) If numberBooksRead <= 1 And 3 Then bookPoints = numberBooksRead * BOOKS_READ1Integer ElseIf numberBooksRead < 3 And = 6 Then bookPoints = 3 * BOOKS_READ1Integer + numberBooksRead - 3 * BOOKS_READ2Integer ElseIf numberBooksRead >= 6 And MAX_BOOKS_ALLOWED_READInteger Then bookPoints = (3 * BOOKS_READ2Integer) + (3 * BOOKS_READ2Integer) + (numberBooksRead - 6) * (BOOKS_READ3Integer) End If Catch ex As Exception End Try Return bookPoints End Function
|Cygwin - GNU GPL License||1||34|
|Calculate number of nights between two dates||5||53|
|ejb message driven bean mdb creation steps||2||15|
|vb.net IF Statement not working in Code Behind with Request.ServerVariables (It used to)||2||37|