[Visual basic]Header de randomisation et time

Bonjour,
J'aurais besoin d'un header pour l'utilisation d'une fonction random.

Parex, avec Softintegration CH, je peux interpréter ce code, mais pas le compiler...:

#include <iostream>
#include <time>
using namespace std;

int main()
{
int line, x;
srand ( time(NULL) );

line = 4740; // here 'a' fills the line to the end...
while (line > 0) // this "while" makes a line of // random 0s and 1s...
{
x = rand()%2; // ici 'x' devient un bit...
cout << x;
--line;
}
}

SVP éclairz-moi dans mon progrès en VB!:)