Basically I have and array of integers that vary in size. I need to compare each number to each other number and display which number is repeated. For example:
Dim ints() As Integer = {1,2,2,5,4,6}
The number that shows up more than once is 2.
How can I run through the array and compare each integer with the numbers in the array. I tried a for loop but it didn't return the value I was looking for.
Basically what I'm trying to do is this, I have 20 statements in a Select Case (right now they're just labels for my own testing), I have a random number generator that will generate a number between 1 and 20. Since I don't want the same statement to repeat during the individual run of the program I'm trying to generate a random number, then check it in a dupeCheck method, then if it isn't a dupe I'm trying to return it to the select case and put it in the array so that when I choose the next random number if it's the same the dupe check method will catch it and return a False boolean and then the random method will do a recursive call to itself to generate a new random number and the whole thing starts again. I'm populating the numbers into the select case just fine, but VB keeps telling me that my functions aren't returning values on all paths, and stepping through I can see that the recursion isn't happening and that it's just sending the repeat number back, but I can't figure out where my major issue is. I'll show you my current skeleton code for the "GuessOrDie" as well as the first manifestation of the code I wrote for it a couple of days ago (the old code had infinite recursive calls and array out of bound exceptions)
I would really love it if you guys could take a look and let me know what mistakes I'm making, I'm having big problems moving from FOR loops in java to For/Each loops in VB and I suspect that is a big part of my problem.
Current Code:
Public Class GuessOrDie
Dim questHistoryArray(19) As Integer
Dim indexCount As Integer
[Code].....
I have a method that I want to check to make sure that both integers entered are both positive:
Public Function BothPositive(ByVal num1 As Integer, ByVal num2 As Integer) As Boolean
If (num1 And num2) > 0 Then
Return True
Else
Return False
End If
End Function
Now if I were to enter some numbers in
BothPositive(1,1) = True
BothPositive(1,2) = False
BothPositive(-10, 10) = True
Why is this? What is going on with the order of operations in the comparison statement or what is the "And" trying to compare? I don't see why this wouldn't work.
I tried coding for an application that will display the positive integers, negative integers and zero entered in a inputBox. for some reason it keeps crashing down.here is my code. paging all visual basic professionals. [code]
View 6 RepliesI have a quiz I am building that randomly picks the questions from the database and displays them to the page. It seems like it might be hanging with the logic I have on the page_load.I am storing the questionid in a session comma delimited and keep looping through to get the next randomly generated number that isn't in the session. [code]
View 3 Replies"declare a two dimensional array of integers named intgrades.it should have 30 rows and 10 columns
View 1 Replieshow to write a function in VB that returns the smallest value in an array of integers?
View 2 RepliesI am dealing with a situation which I do not understand why the loop never ends. I have attached this example. I do not know what I am doing wrong.I have 8 x 8 array of integers (TheConnectionsValue (7,7))
0
0
1
0
0[code]....
What is the fastest way to convert a String into an array of Short integers representing the character codes?[code]...
View 2 RepliesI am looking to declare an array of 20 integers to store the answers to the questions, and then for the next button i am looking to get the answer and write it to the array. If one radio button is checked then i want it to write 1 to the array. Then finally i want to write the username, the array of answers and score to the txt file. How can I do that?
below is my code i have so far:
Imports System
Imports System.IO
Public Class Question
[Code].....
I try to generate 10 random integers and store it in an array(9). Then I split the array into half by converting it into string. My code can compile but it sometimes work and most time cannot work. I don't know what is the problem....
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
[Code]......
Am new to programming and i would like your help to this question. [b][color="Red"]Write a declaration statement of an array of integers to store 15 numbers. Initialise the first 5 values.
When I open the Visual Studio 2005 I don't see the template i.e. Win32 Applications, C++
"Create an array to store 10 integers. Initialize all the array elements with -1."
View 1 Replieshow to convert an array of strings to an array of integers? I want to convert a string array with 77, all string numbers, to an integer array?
View 1 RepliesI have a form with a lot of LineShapes on it, and basically what I'm trying to do is make certain lines a blue colour and others a black colour, depending what it's in an array of integers. Each line is called line1, line2 etc. So if one of the values in the array is 3, then line3 would be coloured blue.
I have the following code to handle all the lines more easier:
MeterArray = New PowerPacks.LineShape() {line1, line2, line3, line4, line5}
However, since I'm going to have about 50 seperate lines, this is going to look quite messy when I reach line50. So my question is, is there a tidyier way of handling these lineshapes.
What is the simplest/best practices way to get a comma separated list of the integers in the Integer array levels?
Dim levels(5) As Integer
Dim levelsStr As String
'put values in levels'
[code].....
How would I create a list of elements in VB.NET, save it to a .dat file, and make Ruby re-create such list (as an array) with such elements (they will be strings, booleans and integers)?
View 2 RepliesI have been tasked to create a Visual Basic console script that asks the user 5 times in a row to input a number into an array (sales figures in thousands), Then you display these results as a sort of tally chart.
For example for the data: sales(10,7,12,5,15)
The output would be
2008:++++++++++
2009:+++++++
2010:++++++++++++
[Code]...
how to change the integer value from within the array into a certain number of a single character.
this is what i need done add up the sum of all the even integers from 2 to 50 in VB?
View 1 RepliesI'm making a program that will use .split and I only want to split every other instance. The way I want to do this is by splitting by only odd integers, how do I do this?
View 5 RepliesI would like to know if there is a command to make a program choose between certain integers. For example, I would like my program to make a random choice between the numbers 12, 118,224 and 300.
View 1 RepliesId like to use 4 integers in a For, Next loop. The integers are 1, 3, 7, 9. Is it possible to pass just these integers to the loop without putting them in an array or something similar?
[Code]...
What is the formula in VB for finding the average of two integers?I know in normal math it is e.g. (4 + 6) / 2 it only needs to be the average of two values.
View 5 RepliesSo I am making a file crypter so that I can encrypt my VB.NET Application that I am making so that people can't decompile it. I had made this in C# and am transfering it to VB.NET, Everything worked fine in C# but once I had re-written the code in VB.NET i get this error inside of my RC4 Encryption method:
'Arithmetic operation resulted in an overflow.'
The error is occuring here:
Dim t As Int64 = (s(i) + s(j)) Mod 256
This is the same code above in c#:
int t = (s[i] + s[j]) % 256;
Is there anyway to make that calculation with it erroring? And why does it work in C# but not VB.NET?
I need to add integers in a listbox, using for next.
Dim intCount As Integer
Dim dblTotal As Double
' here are the lines of code that will perform the calculations
' to create a grand total.
For intCount = 1 To lstCosts.Items.Count
dblTotal += dblSubTotal += intCount
Next intCount
lblTotal.Text = dblTotal.ToString("C")
The amount of items in the list box is not seso I used the items.count. I have been getting the wrong result.
Private Sub btnCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalculate.Click
' Declarations.
Dim intCount As Integer
Dim dblTotal As Double
' here are the lines of code that will perform the calculations to create a grand total.
[Code] .....
I have a group of 25 labels named Label1, Label2, Label3, ... Label25 in a square of 5 per row, 5 per column and I wanted to assign the backcolor to all of them on a loop and assign a value of "True" or "False" to a matrix of 25 boolean values representing them.
But I was getting errors on the pattern created.
My approach was to use a substring containing a number copied from the label names:
Num = Val(sender.name.substring(5))
And the subindexes of the matrix:
p = (Num - 1) / 5
q = (Num - 1) Mod 5
The values for the lower corner of the matrix were rouded to 5 instead of being 4. Instead of (4,0) ,(4,1), (4,2), (4,3) (4,4) I was getting (5,0),(5,1)...(5,5)
So I solved the problem by creating two single variables "A" and "B", doing the divission and MOD operations on them, finding the floor of them and then converting to integer:
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles _
Label1.Click, Label2.Click, Label3.Click, Label4.Click, Label5.Click, _
[Code]......
I have made a simple program for invoices, e.g. The total amount is coming 48,950/$, How to appear this amount in words "Forty Eight Thousand Nine Hundred and Fifty, through MODULE.
View 2 RepliesI am working on a program that has many integers (q1, q2, etc.), and each of them can be 0 or 1. This is dependent on which radiobuttons are selected. I need it to check and make sure that all of the integers have a value, but since "Null" is the same as "0",
View 8 RepliesI suspect there is something wrong in my application, specifically in a part where I have to compare a couple strings and a couple integers.
I do something like this:
If myString = myOtherString Then
do something
End If
And the same thing for integers.
However, for some reason, it is not returning true... also, I heard somewhere there were more proper ways to compare strings and integers.
How do I convert hex and integers to binary?
View 5 Replies