So basically what you are wanting the program to do is pick a random number and assign that number between 1 and 12 and assign it to a variable, then have the program tell the user if it matches the user's input?
Code:
Dim random as New Random
dim num as integer
num=random.next(1,13)
That is the code just for generating the random number between 1 and 12. If you need help with any other part of the code just ask.