主题：图片列自动增加可以实现吗

定义一列为图片列，另一列为数据列
我可否在数据列中输入502,然后自动在图片列中增加名称分别为5.jpg，0.jpg，2.jpg这三个图片呢
相对应名称的图片预先保存在imges文件下

不知道有没有表述清楚，唉，怎么表达能力退化成这样了

谢谢大家了

帮你顶了。。。。。。

这要看你的文件是什么样的，还有就是数据列输入的是否有规律，比如，都是三位数，而且每个图片都是一位数，当然，我想是不太可能的全是一位数的，建议还是做一个文件上传比较好

这个当然是可以的，只要有规律就行

恩，有规律的，先大体说一下吧
我主要是数据列输入8位的数字，目的是想把这8位数字转换为图片形式的
我的想法是先保存了每个数字的图片在imges文件夹下，并且图片就用这个数字命名，如1.jpg，2.jpg……
如我输入了50211790,要求窗口中或者报表中能出现图片形式的50211790
文件我过会做一个上传

DataColChanged事件代码

Dim s As String
Dim i As Integer
Dim dr As DataRow = e.DataRow
If e.DataCol.Name = "数据列" Then
    If e.DataRow.IsNull("数据列") Then
        dr("图片列") = Nothing
    Else
        For i = 0 to Len(dr("数据列"))-1
            s =  s & dr("数据列").SubString(i,1) & ".jpg" & Chr(13) & Chr(10)
        Next
        dr("图片列") = s
    End If
End If

dr("数据列").SubString(i,1) & ".jpg" & Chr(13) & Chr(10)
这句可以解释一下吗？& Chr(13) & Chr(10)，我这里好像不执行
老大辛苦解释一下

数据列的每一个字符加上图片的后辍，再加回车符和换行符。
不会不行吧，看看下面的文件。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目2.rar

可以实现了，呵呵，找不到原因
我新建了一个项目就可以实现了
谢谢了

另，貌似图片必须在项目文件夹下，在imges下图片就不显示，是这样吗

肯定可以的。

Dim s As String
Dim i As Integer
Dim dr As DataRow = e.DataRow
If e.DataCol.Name = "数据列" Then
    If e.DataRow.IsNull("数据列") Then
        dr("图片列") = Nothing
    Else
        For i = 0 to Len(dr("数据列"))-1
            s =  s & "imges\" & dr("数据列").SubString(i,1) & ".BMP" & Chr(13) & Chr(10)
        Next
        dr("图片列") = s
    End If
End If