vb.net中image转string

''' <summary>
''' image类型到string类型的转换
''' </summary>
''' <param name="img"></param>
''' <returns></returns>
''' <remarks></remarks>
Public Function Pic2String(ByVal img As Image) As String
Dim ms As New MemoryStream()
img.Save(ms, Imaging.ImageFormat.Jpeg)
Dim b() As Byte
b = ms.GetBuffer
Dim returnPic As String
returnPic = Convert.ToBase64String(b)
ms.Close()
Return returnPic
End Function
''' <summary>
''' string类型到image类型转换
''' </summary>
''' <param name="strPic"></param>
''' <returns></returns>
''' <remarks></remarks>
Public Function getPicFromString(ByVal strPic As String) As Image
Dim pic As Image
Dim b() As Byte
b = Convert.FromBase64String(strPic)
Dim ms As New MemoryStream(b)
pic = Image.FromStream(ms)
ms.Close()
Return pic
End Function