AYUDA: Unir tabla al dataset

[rishart]

Hola amigos espero tengan un buen dia, bueno aqui les muestro un codigo el cual mediante un dataset mando una imagen dinamica al reporte al crystal report, pero el problema es que no se como agregarle a este codigo una consulta SQL, alguien podria ayudarme a adaptarle a este codigo una consulta sql o como le puedo hacer para mostrar mi consulta. acontinuacion les muestro el codigo

Código:

Try
            Dim FilStr As Stream
            FilStr = System.IO.File.OpenRead(My.Application.Info.DirectoryPath & "\1.jpg")
            'New FileStream(My.Application.Info.DirectoryPath & "\i.jpg")
            Dim BinRed As New BinaryReader(FilStr)

            Dim dr As DataRow = Me.DsImages.Tables("images").NewRow()
            dr("path") = Me.OpenFileDialog2.FileName
            dr("image") = BinRed.ReadBytes(CInt(BinRed.BaseStream.Length))
            Me.DsImages.Tables("images").Rows.Add(dr)

            FilStr.Close()
            BinRed.Close()

            Dim DyImg As New DynamicImageExample()
            DyImg.SetDataSource(Me.DsImages)
            Me.CrystalReportViewer2.Show()
            Me.CrystalReportViewer2.ReportSource = DyImg

les agradezo de antemano la atencion prestada esperando y puedan ayudarme. muchas gracias y les envio un cordial saludo,