Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Const NUMBER_OF_IMAGES As Integer = 9
Dim RandomGenerator As Random
Dim intRandomNumber As Integer
' Create and init the randon number generator
RandomGenerator = New Random
' Get the next random number
intRandomNumber = RandomGenerator.Next(1, NUMBER_OF_IMAGES + 1)
' Use random number to build the path to our random image
picMain.ImageUrl = "images/pic" & intRandomNumber & ".jpg"
Dim FileList() As String = System.IO.Directory.GetFiles("C:\inetpub\[URL unfurl="true"]wwwroot\testsite\images")[/URL]
Dim RandomGenerator As Random
Dim intRandomNumber As Integer
' Create and init the random number generator
RandomGenerator = New Random
' Get the next random number
intRandomNumber = RandomGenerator.Next(1, FileList.GetUpperBound(0) + 1)
' Use random number to build the path to our random image
picMain.ImageUrl = "images/" & Path.GetFileName(FileList(intRandomNumber))