主题：如何实现单元格内直接显示图片缩略图，鼠标放上去弹出大图

如果只有一个图片，则不会出错，如果有多个图片，则提示出错，

我自己写个事例，draw代码 

 If e.Col.name= "物件图片" Then 

 e.StartDraw 

 If e.Row.IsNull("物件图片") = False Then 

 Dim Multi As String = e.Row("物件图片") 

 Dim Values() As String 

 Values = Multi.split(vbLf) 

 e.Graphics.DrawImage(getimage(projectPath & "attachments\" & Values(0)), e.x + 3,e.y + 3, 50, 50) '绘制第一个图标 

 End If 

 e.text = "" 

 e.EndDraw 

End If 

 提示详细错误信息： 

调用的目标发生了异常。 值不能为空。 

参数名: image