主题：[求助]图片添加水印报错了

        Dim file As String = e.FileName
        Dim txt As String =  e.DataRow("第一列")
        Dim img As image = getImage(file)
        Dim bmp  = new bitmap(img.Width, img.Height)
        Dim g = graphics.fromimage(bmp)
        g.DrawImage(img,0,0) 
        g.InterpolationMode = System.Drawing.Drawing2D.InterpolationMode.High
        g.SmoothingMode = System.Drawing.Drawing2D.SmoothingMode.HighQuality
        Dim fnt As new Font("微软雅黑", 60, FontStyle.Bold) 
        Dim size = g.MeasureString(txt, fnt)
        g.TranslateTransform((img.width-size.width)/2, img.Height - size.height - 50)
        Dim semiTransBrush As new System.Drawing.SolidBrush(Color.FromArgb(120, 177, 171, 171)) 
        g.DrawString(txt, fnt, semiTransBrush, new PointF(0,0))
        bmp.Dispose
        semiTransBrush.Dispose
        e.FileName=e.DataRow("第一列")
        e.SubFolder = e.DataRow("第三列")

还是报错。startIndex 不能大于字符串长度

这个代码不可能有这种提示。上传实例说明

ww

不能在这个事件用。这里只能获取文件名，不知道是从哪里添加的文件，文件也还没有添加到Attachments，无法取得文件完整路径。

Dim file As String = ProjectPath & "Attachments\" & e.NewValue

        e.SubFolder = e.DataRow("第三列")