|
I've had to restart the pc, and now im getting build errors in "Private Sub InitializeComponent()" There is 12 differnet errors, all for code generated by the form designer. Im gonna redo this form from scratch then get back tomorrow.
Thanks for the help
|
|
|
|
|
Hi everyone,
I've been working on this for 2 weeks and am at my wits end.
I have to read in 20 random numbers between 10 and 100, inclusive, and then display them with no duplicate numbers. The random array is no problem, but I can't seem to be able to loose the duplicate numbers. I started with the array unsorted, had not luck, so I sorted it first, but still no luck. Here's some snippets to show the direction I've been trying. (I hope I'm posting this right)
<Private Sub cmdSort_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles cmdSort.Click
Dim array1 As Integer() = New Integer() {randomObject.Next(10, 101), _
randomObject.Next(10, 101), randomObject.Next(10, 101), randomObject.Next(10, 101), _
randomObject.Next(10, 101), randomObject.Next(10, 101), randomObject.Next(10, 101), _
randomObject.Next(10, 101), randomObject.Next(10, 101), randomObject.Next(10, 101), _
randomObject.Next(10, 101), randomObject.Next(10, 101), randomObject.Next(10, 101), _
randomObject.Next(10, 101), randomObject.Next(10, 101), randomObject.Next(10, 101), _
randomObject.Next(10, 101), randomObject.Next(10, 101), randomObject.Next(10, 101), _
randomObject.Next(10, 101)}
Dim i, j As Integer
txtOutput.Text = ""
' omitted code for bubblesort
BubbleSort(array1)
For i = 0 To array1.GetUpperBound(0)
BinarySearch(array1, array1(i))
If array1(i) > 0 Then
txtOutput.Text &= array1(i) & " "
End If
Next
End Sub
Function BinarySearch(ByVal array As Integer(), _
ByVal key As Integer) As Integer
Dim low As Integer = 0 ' low index
Dim high As Integer = array.GetUpperBound(0) ' high index
Dim middle As Integer ' middle index
Dim number As Integer
key = number
While low <= high
middle = (low + high) \ 2
If key = array(middle) Then ' match
Return -1
ElseIf key < array(middle) Then ' search low end
high = middle - 1 ' of array
Else
low = middle + 1
End If
End While
Return number ' search key not found
End Function>
maddogjbm
-- modified at 14:39 Sunday 12th November, 2006
|
|
|
|
|
Hm... your code raises more questions than it answers...
Why do you call the BinarySearch function without taking care of the return value?
As the random numbers are always between 10 and 100, when do you expect the if statement that checks if it is larger than zero to exclude any value?
Why do you write your own BinarySearch, when there already exists one in the framework?
Why do you have the parameter key in the BinarySearch method, when you don't use it?
Why don't assign any value to the variable number?
---
b { font-weight: normal; }
|
|
|
|
|
OK, to start this is my first semester in VB.NET, I didn't grow up doing this, in fact I hadn't even touched a computer until 2001.
I'm trying to learn, if I knew the answers I wouldn't need to ask you.
In my mind the value return would be the number returned if it is not a duplicate? The reason for the statement that checks if it is larger than zero is because at one point the BinarySearch function was returning (and cmdSort was displaying) -1, that statement stopped it from displaying. I used my own BinarySearch because it was from my course text, I didn't realise framework had one, I'm still trying to make sense of the framework library, to me it's hard to understand. The book is a little easier, but still complicated.
As for the rest, my code started out much simpler but wasn't producing the results I desired so I've been altering it to try and get it to do what I need it to do. I believe I mentioned I've been working on this for 2 weeks, it's due by midnight tonight and I'm no closer to solving it now than I was before I asked for help here.
|
|
|
|
|
Hi Friend,
First of all try to make your post concise (dont mind).
now why not you simply declare an array then loop to 20 and generate random no.s then place an inner check that searches the random no. is already placed or not if yes loop variable's ending condition must be one incremented (or what ever u like).
I tried to answer. If not correct tell me your requirments then i'll try to solve.
Bye
Syed Shahid Hussain
|
|
|
|
|
Wow -what a mess.
List<int> list = new List<int>();
while(list.Count < 20)
{
int n = randomObject.Next(10,101);
if (!list.Contains(n)) list.Add(n); // ! is Not in VB.NET
}
list.Sort();
That should do it in C#, hopefully you can follow my logic and impliment it in VB.NET.
|
|
|
|
|
Why not make the numbers sorted and without duplicates from the start? 
List<int> list = new List<int>();
int count = 20, n = 10;
Random rnd = new Random();
while (count > 0) {
if (rnd.Next(101 - n) < count) {
list.Add(n);
count--;
}
n++;
}
---
b { font-weight: normal; }
|
|
|
|
|
Because that's harder to read ? :P Also, because I think it's worth pointing out that the container classes have methods like Sort, there's no need to be writing them.
|
|
|
|
|
I appriciate the thought, but C++ doesn't really help, I'm having a hard enough time trying to figure it out in VB.
Thank you though.
|
|
|
|
|
Hi
I can develop Muli-language projects in C# but in VB.net I cant. Please tell me exact method or an article that implement multi language...
![Rose | [Rose]](https://codeproject.freetls.fastly.net/script/Forums/Images/rose.gif) Thanks
Syed Shahid Hussain
|
|
|
|
|
Hi All,
I am facing serious problem in vb.net multithreading .i am using dataset as shared variable but geeting error oject required .i am explaining in details .
i have defined one class ,in that difind one shared variable .calss having a function that called by timer thread and refereshing dataset every five minute .othere 60 thread concurrently access the dataset by filter and deleting the row from the dataset based on filter condition .but i am getting seriuos error null poiter exception object required continously . I tried synclock to avoid the error but after some days its starting again .
how can i resovled the problem if not then what is other solution .shall I use xml doc object .Is there any other object i can use instead of dataset .
please advised me .
-- modified at 12:33 Sunday 12th November, 2006
Jaseem Ahmad
Software Engineer ,
Mercator ,IT Division of Emirates group .
Deira Dubai.
|
|
|
|
|
n buddy is there to reply my question .
Jaseem Ahmad
Software Engineer ,
Mercator ,IT Division of Emirates group .
Deira Dubai.
|
|
|
|
|
Hey guys
Thx to codeproject Team...
if i have an array and wants to insert each field of that array in a DB
While k < arr.Length<br />
<br />
insert into table table.column values(k(0)...) ?<br />
k=k+1
how do i do this?
Regards
Ramy
|
|
|
|
|
Your code is on the right track, except you would use arr(k), not k(0).
---
b { font-weight: normal; }
|
|
|
|
|
I know that it is gonna sound a silly question, i m new in Sql:
Insert into employee (id,name) values (employyeeId,"ramy")
what should i replace employeeide with
note that employyeid is the primarykey of the table
and how this value increments?
Regards
Ramy
|
|
|
|
|
If the field employeeid is defined as an IDENTITY field then the numbering is taken care of by sql server - you just need to insert the other field...
e.g.
INSERT INTO Employee (name) VALUE ('ramy')
Then you can find out what the identity of the most recent field added in your code by using the IDENT_CURRENT('Employee') syntax.
|
|
|
|
|
Thx Ducan
issue solved
Regards
Ramy
|
|
|
|
|
Hi everyone,
I have a project in VC++ ,it is ClassLibrary project and it has a function that return jbyte *.
I would like to call this function in VB project ,how can I convert jbyte * to byte array ?
I would appreciated for any help .
If there is any document,sampe code or link for "type conversion between VC++ and VB.net "please inform me.
yours sincerely,
Orchid
|
|
|
|
|
What on earth is a jbyte ?
|
|
|
|
|
Hello,
I am a newbie.
I have read source code of many programs.
They contain some application forms.
I can't know which function is created for user interface or change file time.
I would like to see the easy code to change file time.(Any language C/C++ , Java , Or VB)
I would like to change file attribute
- created time
- last modified time
- last access time
Any one can help me?
Thank you.
..................
|
|
|
|
|
Have a look at the Ssytem.IO.FileInfo class.
---
b { font-weight: normal; }
|
|
|
|
|
Hey guys
I need a simple code :
if i want the cursor to be on : X=20, y =30 the cursor goes to this location (x,y= varible pixles)
how can be this done?
Regards
Ramy
|
|
|
|
|
This should work:
Cursor.Position = New Point(Cursor.Position.X = 20, Cursor.Position.Y = 30)
|
|
|
|
|
When i apply this instruction ,it returns always x=0 and y=0 for cursor position
Cursor.Position = New Point(Cursor.Position.X = 20, Cursor.Position.Y = 30) ,
the error given in cursor position is:qualifying expression will not be evaluated
Regards
Ramy
|
|
|
|
|
Are you using VB6 or VB 2005?
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
