how to do datatable without database

[dinitiae]

' copy this code in a new proyect
 
Public Class Form1
    WithEvents DataGridView1 As DataGridView, PBX As PictureBox
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            DataGridView1 = New DataGridView
            DataGridView1.Location = New Point(100, 100)
            DataGridView1.Size = New Point(300, 200)
            DataGridView1.Visible = True
            Me.Controls.Add(DataGridView1)
 
            PBX = New PictureBox
            PBX.Location = New Point(420, 100)
            PBX.Size = New Point(200, 200)
            PBX.BorderStyle = BorderStyle.FixedSingle
            PBX.SizeMode = PictureBoxSizeMode.StretchImage
            PBX.Visible = True
            Me.Controls.Add(PBX)
 
            Dim DT(1) As DataTable
 
            DT(1) = New DataTable
            Dim DC As DataColumn
            DC = New DataColumn("Column1", GetType(Object))
 
            DT(1).Columns.Add(DC)
            DC.ColumnName = "A"
 
            DC = New DataColumn("Column2")
            DT(1).Columns.Add(DC)
            DC.ColumnName = "B"
 
            Dim IMG1 As Image = Image.FromFile("C:\MMS FILES\RESOURCES\SCR1.jpg")
            Dim IMG2 As Image = Image.FromFile("C:\MMS FILES\RESOURCES\Perfx.jpg")
 
            DT(1).Rows.Add(IMG1, "222")
            DT(1).Rows.Add(IMG2, "YYY")
 
            DataGridView1.DataSource = DT(1)
 
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
 
    End Sub
 
    Private Sub DataGridView2_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.RowEnter
        On Error Resume Next
        PBX.Image = DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value
 
    End Sub
 
End Class

[Frinavale]

What is the problem?
What type of application are you working on?