   picturebox won't loadpicture
  When i execute the code it gives my an error saying that there is a type mismatch. I use a dialog box to let the user choose a picture file. But then the code gets to the case statement and then says there is a type mismatch and the Case Right(Filename, 3)... line is highlighted.   Private Sub open_Click()dialog.ShowOpenFilename = dialog.FilenameSelect Case FilenameCase Right(Filename, 3) = "bmp" Or "jpg" Or "tga"    picscreen.Picture = loadPicture(dialog.Filename)    End Select    End Sub
  Try:Case Right(Filename, 3) = "bmp" Or Right(Filename, 3) = "jpg" Or Right(Filename, 3) = "tga" ;You also might needSet picscreen.Picture = loadPicture(dialog.Filename)  