Programa tipo FBI

[death_nemesis]

este es el codigo que utilizo

Código vb:

Public Class Form3
    Public RutaImagen, rut2 As String
    Public img As Image
    Private Sub RUT_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles RUT.KeyPress
        Label1.Text = Trim(RUT.Text)
        TxtDigVer.Text = verificador(RUT.Text)
        RutaImagen = "C:\Imagenes\" & Trim(RUT.Text) & ".JPG"
        img = Image.FromFile(RutaImagen)
        PictureBox1.Image = img
    End Sub
    Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        RutaImagen = "C:\Imagenes\nada.JPG"
        img = Image.FromFile(RutaImagen)
        PictureBox1.Image = img
    End Sub
End Class