主题：麻烦看一下是什么问题？

问题出处 

 

图片上传窗口

 

问题1

按1次 下一步， 说是找不到 img的值 按两次会把水印印到图片上

 

问题2

印到图片上的 水印都是一样的， 和cn_name 不对应，麻烦看看是咋回事，

 

问题3

字体大小问题，因为图片的大小不同，所以（试验中发现，有的字体大，有的字体小）

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

点击浏览该文件:ecs.foxdb

 

希望能得到解决方案，非常感谢狐表公司的所有工作人员的亲切指导！！！

For Each File As String In FileSys.GetFiles("C:\图片\")
    Dim s As String = FileSys.GetName(File)
    Dim img As Image = getimage(file)
    Dim g As Graphics = Graphics.FromImage(img)
    Dim fnt As New Font("宋体",20)
    Dim sz As Object = g.MeasureString(s, fnt)
    g.DrawString(s,fnt,Brushes.Green, img.Width - sz.Width - 10, Img.Height - sz.Height - 10)
    img.Save(file)
    g.Dispose()
Next