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 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 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'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 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'm trying to convert an integer (0 to 255) into a 2-value hex string. For instance, if the integer was 255, the hex string would be "ff", if the integer was 15, the hex string would be "0f". The issue I'm having is trying to keep the leading 0. I've been able to overcome this by using an if statement to determine if the length is less than 2, in which I would concatenate a 0, but this is pretty inefficient I think. Here's my
Dim get_integer as Integer = TextBox1.Text Dim hex_value As String = Convert.ToString(get_integer, 16)
If hex_value.Length < 2 Then hex_value = String.Concat(0, hex_value) End If
how to improve this? I really would like to get away from using the if statement.
Follow-Up available: There's a follow-up with further details, see Convert MBF to IEEE.
I've got some legacy data which is still in use, reading the binary files is not the problem, the number format is. All floating point numbers are saved in MBF format (Single and Double). I've found a topic about that on the MSDN boards but that one only deals with Single values. I'd also would like to stay away from API-Calls as far as I can.
Edit: Just in case somebody needs it, here is the VB.NET Code (it's Option Strict compliant) I ended up with (feel free to convert it to C# and edit it in):
''' <summary>Converts a MBF Single to an IEEE Single</summary> ''' <param name="src">The MBF Single value</param> ''' <returns>The converted IEEE Single value</returns>
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 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 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)?