主题：[求助]利用GDI+可否实现字宽系数的调整

没看懂为什么要怎样做，输入两个字，那就把字变形拉宽？输入10个字，就缩小？

参考

If e.Col.name = "第一列" AndAlso e.text > "" Then
    Dim g As Graphics = basemainform.creategraphics
    Dim fnt As New Font("宋体",9)
    Dim msg As String = e.text
    Dim sf As new StringFormat
    sf.Alignment = StringAlignment.Center
    sf.LineAlignment = StringAlignment.Center
    e.text = ""
    Dim size = g.MeasureString(msg, fnt, e.width)
    Dim bmp As new bitmap(size.width, e.height)
    g = Graphics.FromImage(bmp)
    g.DrawString(msg,fnt,Brushes.black,  new Rectangle(0, 0, size.width+1, e.height), sf)
    e.graphics.DrawImage(bmp,new Rectangle(e.x, e.y, e.width, e.height))
End If

直接设置图片的宽度和拉伸属性，即可

http://www.foxtable.com/webhelp/scr/1182.htm