Sub OnClick(Thumbnail As Panel)
whichimage = Thumbnail.Tag
Dim iIntent As Intent
Dim Path1 As String
Path1 = File.Combine(File.DirInternal, whichimage & ".jpg")
iIntent.Initialize(iIntent.ACTION_VIEW,"file://" & Path1)
iIntent.SetType("image/jpeg")
StartActivity(iIntent)
End Sub