I'm trying to calculate the ISBN check digit of a number. First I have to remove all dashes from the ISBN; the rult is a 10-digit interger. For example 0-619-15934-0 becomes 0619159340. Then apply a weight factor to each of the first nine digits and sum the weighted numbers. AThe weight factor is the digit's position in the ISBN. THat is, the first digit is multiplied by 1, the second by 2, etc. Finnally I have to compute the check digit as the mod 11 modulus of this number for example. 209 mod 11 = 0 (i.e., 209/11 = 19, remainder 0_ This is the check digit. If the remainder is 10 ten the check digit is 0. Once the check digit has been calculated, it can be compared to the check digit given with an ISBN to determine if the ISBN is correct, or appended to a new ISBN as its check digit.[code]THe first problem arises when it tells me to make sure I enter all numbers when I should be deleting the dashes and then making sure that the contents are numeric. But even without it and without entering dashes the program still blows up.
I'm supposed to write a program that validates an inputted ten digit ISBN number using the check-digit at the end to ensure that the sum is a multiple of eleven. Before calculating this and detecting if the entered number is indeed a valid ISBN, we're required to check the first nine digits and see if they are indeed integers. After this the tenth digit is checked to see if it is "X" (for ten) or 0-9.
With the code I've written it keeps returning false for whether or not the ISBN is valid, even with valid numbers. I feel like its something to do with the hyphens; have I misused the replace function?I'm a little lost on how to make my code work, but I'm fairly certain my logic is okay so far.
I can get it to tell me if the ISBN I entered is valid or not, but there is a second part I need that I keep drawing blanks on. I need to be able to enter an ISBN with a missing digit marked by a "?" in the textbox i am entering the ISBN in. For those who don't know what an ISBN is it...
An ISBN (International Standard Book Number) is a ten digit code which uniquely identifies a book. The first nine digits represent the book and the last digit is used to make sure the ISBN is correct. To verify an ISBN you calculate 10 times the first digit, plus 9 times the second digit, plus 8 times the third ... all the way until you add 1 times the last digit. If the final number leaves no remainder when divided by 11 the code is a valid ISBN.
1.Write a program that reads a ten digit number and validates it.(DONE)
2.Write a program that reads in a valid ISBN with a single missing digit, marked with a ?, and outputs the correct value for the missing digit.(Ehhh....)[code]So i need help making it so i can input a ISBN with a missing digit marked by "?" and output a valid ISBN with missing digit.
I just finished this application where you enter a five-digit credit card number, with the fifth digit being the check digit. everything seems to work except, I can't seem to get it to determine that any number is "valid". Every 5-digit combination that I enter returns "The credit card number is not valid". Im using visual basic 2008 express
i'm trying to calculate the check digit for a scan line. my problem is it needs to be weighted 2121, right to left. so what i have to do is take each character in the string and convert it to it's ASCII equivalent then multiply that by either a 2 or 1 depending on the position of the character. how can i alternate the 2 to a 1 after each character?
Dim Product As Integer Dim SumOfProducts As Integer
I am working on a check digit program and I am having some trouble finding the best path to take. The program requires 5 digits (numbers). I am calling them
num1 num2 num3 num4 num5
My ultimate goal is to use this equation:
num5 = num1 + (num2 *2) + num3 + (num4*2) - but I use the second digit of the resulting number.
Example: number 12346 - would be "correct!"
12345 - would be "wrong!"
1 + (2*2=4) + 3 + (4*2=8) = 16 so the correct would be 12346 When the user puts in the numbers on the UI I will be returning a comment in a text box on the UI.Which direction should I start?
I'm making a project that randomly picks a number from an array, but if it picks a number less than 10 then the number is a single instead of a double.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim N(2) As Integer N(0) = "0" & 1 N(1) = "0" & 2 N(2) = "0" & 3
I'm using Visual Studio and table adapters using an Access DB as the backend. I need the minimum 4 digit value. I want to get next available 4 or 5 digit number. And this will change depending upon the users request. Currently I use a table adabpter query. But how would I write a query. I suppose I could do a long iterative loop through all values until I see a 4 digit.But I'm trying to think of something more efficient.
Function GetNextAvailableNumber(NumofDigits) as Long 'SQL Code Here ---- 'Query Number Table
I need to add a loop to allow repeated checking of ISBN numbers, which should check to determine when processing should be ended and should allow exiting the program without having to enter an ISBN before quitting. I also need to use a Select Case for the three ISBN possibilities (ISBN-10, ISBN-13, invalid ISBN length).
I am trying to generate all possible 3 or 4 digit combinations from 0 to 9. I will be outputting them to a text file but I just need help with actually generating them.
i need a 2 digit prefix that increments. 1 - 99.. after reaching 99 it will be 100, that what im supposed to trap. if must be a0 - a9, after then b0-b9 ...... z0-z9.
How I could retrieve the single digits of a 4 digit number to manipulate them in my own way to encrypt the 4 digit number to my liking. Here's what I have to do; take a 4 digit number, add 7 to each digittaking the result and dividing by 10 leaving only the remainder. Then swap the first digit with the third, and swap the second with the fourth digit.
I found a good method of getting the next 4 digit number. How to find next free unique 4-digit number..But in my case I want to get next available 4 or 5 digit number.And this will change depending upon the users request. Theses number are not a key ID columns, but they are essential to the tagging structure for the business purpose. Currently I use a table adabpter query. But how would I write a query. I suppose I could do a long iterative loop through all values until I see a 4 digit.[code]Numbers is the List of All available number from 0 to 99999, basically what's available to use. LineList is my final master table where I keep the long and all the relevant other business information.
I'd like to know how to get VB to display the individual digits of a three digit number when I click a button. Sorry if this seems simple, or if it's in the wrong place.
How can I get the datetimepicker value to have a 2 digit day EX. If it was November 6, 2009 the value is showing as 11/6/2009 but I need it to be 11/06/2009
I have a search that searches by date and Im using the datetimepicker. the date format in from my sql database is in MM/DD/YYYY not MM/D/YYYY So my results come up ok if the day is a 2 digit day normally (ex. 11/20/2009)but if its a single date (11/6/2009) I don't get any results because it is looking for 11/06/2009 I don't see how I can get the value of datetimepicker to be MM/DD/YYYY Even if i set the custom format to MM/dd/yyyy the value is showing up as MM/d/yyyy
I'm populating a checkedlistbox with this loop. Dim week As Integer For week = 1 To 51 Step 2 CheckedListBox1.Items.Add(week) Next And get this result 1 3 5 7 9 11 13 etc. This is how I want it 01 03 05 07 09 11 13 etc.
I have to do one project like : 1.Complete the code to convert a 3 digit number to Text (Number > 19) 2.Adding suitable conditional statements modify to code to support the whole range of 3 digit numbers.
I am searching an MS Access database via an asp written in VBscript. I am looking for entries that are less than 45 days old. The query worked great until October rolled around. Then none of the new entries were being displayed. I discovered that any month that has 2 digits, such as October with 10 or even Jan-Sept if I enter a "0" in the month (ie. 09 vs just 9), will not display. The SQL statement is below (created in Dream Weaver):
<%Dim rs_blog__MMColParamrs_blog__MMColParam = "entrydate"%> <%Dim MinDateMinDate = DateAdd("d",-45,Date())%><%Dim rs_blogDim rs_blog_numRows Set rs_blog = Server.CreateObject("ADODB.Recordset")rs_blog.ActiveConnection = MM_intranet_STRINGrs_blog.Source = "SELECT id, employee, subject, blog, entrydate FROM blog WHERE entrydate >= '" + Replace(MinDate, "'", "''") + "' ORDER BY id DESC"
How do I get the data that has 2 digits in the month to display and only show the entries that are no more than 45 days old.
I have a function which takes in an integer value. I want to be able to grab the first digit (or the first and second digits in some cases) of this integer and do something with it.What is the best way in VB.NET to get the first digit of an integer (or the first and second)?