Random Slide Jump with limit- Help

[speechpath]

I'm very much a newbie with VBA. I'm a teacher and I'm using a VBA code in a PPT program I've written for a special needs student. I learned how to use this code to jump to a random slide. How can I specify the number of times the random jump happens before the slide show moves to a specific (non randomized) slide?

Here's the code:

Sub randjump()
randomize
Dim Inum As Integer
Inum=Int(highest # in range-(lowest # in range -1)*rnd+lowest # in range)
ActivePresentation.SlideShowWindow.View.GotoSlide(Inum)
End Sub

Thanks for the help!

Rob