I got most part correctly but the only part isnt working right is when the last 5th digit match the sum number at the last number.
Private Sub btnVerify_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnVerify.Click
Dim strCardNum As String
Dim strSumNum As String
[CODE]...
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
[Code]....
I need to make a app that verifies a five digit credit card number. The check digit is 5th and is found by multiplying the 2nd and 4th digit. Heres my current
Dim strInput As String
Dim strOutput As String
Dim intSumOfDigits As Integer
[code]....
I have a Credit Card Number in an XML Message and I want to use a regex to find the Credit Card Number and encrypt it. All numbers are 16 characters long and they are not always in the same place in the xml, so basically I think I just need to find a string that is 16 characters and decrypt it, but I am not sure how.
[Code]...
i want a button to perform a function of checking the last digit number in a field of a table in and add a digit to it and display it in a textbox.
View 1 RepliesI am calling the function below from an Excel spreadsheet and the conversion from hex to decimal using the VAL function in the "manufacturer" variable below is coming back with a negative value. The VBA edition is 6.5.
Public Function decMEID(ByVal sKey As String) As String
Dim manufacturer As String
Dim serial As String
[code].....
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.
[Code]...
I want to generate a serial number in this format: INDDMMYY000001, INDDMMYY000002, INDDMMYY000003, ... I can generate INDDMMYY using following code: lblNoSiri.Text = "IN" + Date.Now.ToString("ddMMyy") However, I don't know how to generate the last six digit number. I only can generate number without zero in front of it. How to create the number with fix number of digit?
View 4 RepliesI am trying to make a basic ATM system, iv got all the interface done and I have made the link to my SQL database etc. the part i'm stuck on is how I can run a check to see if a bank card number matches up to the users PIN number. To simulate the user putting a card into the machine I've used a combo box, and that lists all the cards, that haven't been flagged as confiscated (there's a column in my ATMCards table that I can set to true or false) then after the user has selected a relevant card there's another text box where they can enter in their PIN number.
Now what I want to do is, if they chose the card number 1234567890123456 in the combo box and they enter in the PIN 1234 into the text box, then, after clicking the check PIN Button if the pin is correct they need to be taken to another from where they can check their balance etc., and if its wrong they got three attempts after which point i want to flag that card as confiscated.
I have a txtbox(for barcode).. if i input a item number in that txtbox and if that number will match in your database, the other information(shall we say, product type, item ID, etc..) will display in my other txtboxes..
View 5 RepliesI am trying to create a lotto simulation, but don't know how to continue.I am using numericupdowns to allow users to select 6 lotto numbers. and labels to display what they have chosen, but i'm not sure how to prevent duplicates without creating a large number of If statementsMy question is, is there an easier way to prevent duplicates without writing a bunch of if statements?here is my code:
Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Lotto1, Lotto2, Lotto3, Lotto4, Lotto5, Lotto6 As Single Lotto1 = Val(NumericUpDown1.Text) lblLotto1.Text = Lotto1 Lotto2 = Val(NumericUpDown2.Text) lblLotto2.Text = Lotto2 Lotto3 = Val(NumericUpDown3.Text)
[code]....
I don't understand how to save the user selected numbers, let the computer generate 6 random numbers, and match the two sets of numbers together to see how many matches there are. As far as I understand the numbers should be stored in 2 separate arrays and then matched together to find any matches.
I have created a basic query generator which allows a user to select the Select, WHERE and criteria attributes using a number of checkboxes.However i have got stuck. In the results form i have the following code
Private Sub DisplayRecord()
RichTextBox1.Text = ds.Tables("newResults").Rows(intCurrentRecord).Item(0)
RichTextBox2.Text = ds.Tables("newResults").Rows(intCurrentRecord).Item(1)
RichTextBox3.Text = ds.Tables("newResults").Rows(intCurrentRecord).Item(2)
[code]....
The program keeps on crashing if the user does not select the corresponding amount of display records from above for the amount of attributes they want for the SELECT part of the query in the intreface in form 1.
How would i go about making something where the number of SELECT attributes selected which are listed in a string create the correct number of textbox fields in the results form (form2)
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
[code]....
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.
View 9 RepliesI 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.
View 2 RepliesI'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.
View 8 RepliesI need to round like this:
12 -> 10
152 -> 200
1538 -> 2000
25000 -> 30000
etc.
Twisting my head, but can't see how to make this. Must work for any n number of digits. Anyone got an elegant method for it?
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.
View 3 RepliesIn the function it returns the no in one digit .I want it to always return 2 digit number.Like if it is 0, it should return 00.
Public Function GetHexColor(colorObj As System.Drawing.Color) As String
Return Hex(colorObj.R) & Hex(colorObj.G) & Hex(colorObj.B)
End Function
I would like to know how to detect a two digit number within a string.
For example: how can I pull the number 42 from that string?
Can i add, subtract, times, divide 40 digit number to 40 digit number ... example:
dim a as double = 1111111111111111111111111111111111111
dim b as double = 1111111111111111111111111111111111111
dim c as double
[code]....
I want to make a program that generates a 6 digit number for me by clicking a button. I can make a simple counter, but the nunmber I generate can only be used one. So , I need to store that number somehwere (access, xls, whatever) and then start the next count from the last number.
View 12 RepliesI want to be able to enter (type in) data into a combobox as well as picking from the list. In earlier VB there was AfterUpdate event so that I could enter in the data I wanted. Now I have tried Keypress, Enter, and others and they all want just one character or number. If I try to enter a two-digit number it doesn't wait.
View 16 Replieshow can i limit a user to enter 10 digit no like telephone no in textbox without using regular expressions?
View 12 RepliesOk, now I have another problem that I cant seem to figure out I now have the "Labour charge section" just incase the service requires one. which in alot of cases it does. So, I have a test box called text box 1, which I want to be able to insert "hours worked" which is a "digit" and then Have a fixed value, of five. Which the user can later change. The number from the box, and the user specified Hourly charge, must then be multiplied to create the total labour charge which will be inserted into a label view. So, my question first, is, how would the user be able to set the hourly charge and then not be able to change it by accident. I was thinking of having a tool strip with an options tab and then setting, and then you use that to fill the info, and have that hourly charge, hidden of the actuall form so that it cant be changed by mistake. Then, on to of that, how would you multiply these two numbers?
View 39 RepliesI am looking for a solution to implement Credit Card processing to a POS system I have written. I have been coding VB for about 7 years but never had a need to process credit cards.
View 1 RepliesI am trying to take a database with multiple entries of 11 digit numbers and run a check sum algorithm that adds the 12th digit to the 11 digits as an output.The algorithm is as follows:
Add sum of odd digits starting with first digit, then multiply by 3.
Add sum of even digits, then add to result of odd digits multiplied by 3.
Take result and divide by 10. The remainder is the check sum which needs to be added to the end of the original 11 digits.
I'm looking for a way to take seven 2 digit numbers & combine them into one number to store in a database.The numbers represent hours for each day of the week & I only have one field to store them in. Then I need to be able to take the stored number & decode it back into the original seven numbers. Anyone have any clever ideas how I can do this?
View 6 RepliesI am working on a Credit Card Project Program. Where you can create an account by typing in an account number which then starts you out with a $1,000 credit limit and balance.I have most of all the programming done for the project. Except for the updating of the current balance when charges are made and I'm having a problem with the interest which works but only shows you the interest fee when you calculate and not the interest fee + balance due. But I wont worry about that now.
What is the method of doing this. Can I write a new function that will update the balance available based on the charges or payments made? Or can I somehow program that into the current functions?
How can I generate a 7-digit random number and special character string in a textbox on a button click event, in VB.Net?
View 2 Replies