Bob Jenkins perfect hash function in VB.Net

Question

I am trying to convert Bob Jenkins perfect hash function from C # to VB.Net, and I am stuck in the following.

a += (UInt32)(url[k + 0] + (url[k + 1] << 8) + (url[k + 2] << 16) + (url[k + 3] << 24))

How can I write the instructions above in VB.Net?

Please note the following:

a - UInt32
url - String
k - integer

I tried the following, but it does not work.

a += url(k + 0) + (url(k + 1) << 8) + (url(k + 2) << 16) + (url(k + 3) << 24)

To avoid manual casting, I use "Option Strict Off"

0

Ali Apr 20 '12 at 5:58

2 answers

, vb typecasting string integer ( char).
Val(Mid(url,k,1)) char .

0

Alexey 20 . '12 6:05

Ali · Accepted Answer · 2012-04-20T06:29:08+0000

Ok, I got a response from this page. See Henk Holterman's answer and MarkJ comments.