Public Function ImageConversion(ByVal image As System.Drawing.Image) As String If image Is Nothing Then Return "" Dim memoryStream As System.IO.MemoryStream = New System.IO.MemoryStream image.Save(memoryStream, System.Drawing.Imaging.ImageFormat.Gif) Dim value As String = "" For intCnt As Integer = 0 To memoryStream.ToArray.Length - 1 value = value & memoryStream.ToArray(intCnt) & "," Next Return value End Function