If Blznr = 0 Then
ImgVBlad1.Bitmap = LoadBitmap(File.DirAssets, "1.png")
ImgVBlad2.Bitmap = LoadBitmap(File.DirAssets, "2.png")
BtnVorige.Visible = False
Else if Blznr <= 1 Then
BtnVorige.Visible = True
ImgVBlad1.Bitmap = LoadBitmap(File.DirAssets, "3.png")
ImgVBlad2.Bitmap = LoadBitmap(File.DirAssets, "4.png")
End if