512位元強質數(編號:4866)

請教先進,vb如何產生512位元強質數,以及隨機亂數(分佈均勻,機率1:30000),謝謝大家.