All you need is the RaptorDB class, convert the following sample to vb and you are good to go.
RaptorDB.RaptorDB rap = RaptorDB.RaptorDB.Open("strings", 30, false, INDEXTYPE.HASH);
rap.IndexingTimerSeconds = 1;
rap.InMemoryIndex = true;
string key = "some very long string";
for (int i = 0; i < count; i++)
{
string ss = key + i.ToString("000000");
rap.Set(ss, ss);
}
rap.SaveIndex(true);
int j = 0;
for (int i = 0; i < count; i++)
{
string ss = key + i.ToString("000000");
byte[] bb = null;
if (rap.Get(ss, out bb) == false)
j++;
}