how to implement hashtable

Question

0.00/5 (No votes)

See more:

Hi,

i want to implement hashtable for the below scenario.

i have data in a table like.

Model Number Part number
xxx iu 234
ZZZ 123
yyy 213
abc 890
xxx 234

i want to trace how many times a model is repeated. and if the model is already in hashtable i want to increment model count else add it to hashtable.

but in my code it's updating value when it contains a model.
i dono how to implement pls help me.

and another question should i increment key value (when ever i added to hashtable)?

below is code how i am implementing...

i got all these rows into a datarow.
By looping into datarow,i want to implement hashtable for modelnumber.

VB

For Each aceDAERow In aceDAERows

 If aceDAERowHash.ContainsValue(aceDAERow.Item("Model_Number")) Then
        aceDAERowHash(modelnumber) = aceDAERowHash(modelnumber) + 1
 Else
       aceDAERowHash.Add(modelnumber, aceDAERow.Item("Model_Number"))
 End If
 modelnumber = modelnumber + 1

 Next

Thanks in advance.

Posted 19-Sep-11 5:17am

subhash04573

Add a Solution

Comments

sachin10d 19-Sep-11 12:30pm

Dictionary should be used instead of hashtable.

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

#realJSOP · Accepted Answer · 2011-09-19T05:29:00

Solution 1

I think this will work (caveat - I didn't test this, so you may need to tweak it).

VB

Dim hash As New Dictionary(Of String, Integer)()

If hash.Containskey(name) Then
	hash(name).Value += 1
Else
	hash.Add(name, 1)
End If

Posted 19-Sep-11 5:29am

#realJSOP

Comments

subhash04573 19-Sep-11 21:43pm

thank you very much