dipende da che linguaggio usi.
se usi vb.net dovrebbe andare bene così (se non è cambiato qualcosa rispetto al VB 6.0):

Dim numero_casuale
'dichiaro la variabile che conterrà il numero

Randomize
' Inizializza il generatore di numeri casuali.

numero_casuale= Int((10 * Rnd) + 1)
'Genera un valore casuale compreso tra 1 e 10.



altri linguaggi nin so
SB