本帖最后由 gz284596265 于 2009-12-01 15:52:08 编辑

解决方案 »

  1.   

    问题在:如果把autoredraw设置成true 按照上面的代码执行完刷新以后,填充区域无显示!
      

  2.   

    你把 huitu() 最后的 Picture1.Refresh 去掉试试。
    .AutoRedraw = True 了,就用不着 .Refresh。
    还有,你是不是还有别的绘图代码,把它 清除/覆盖 了啊?
    我觉得这种可能性最大,你可以试一下不画别的,只画“速度表指针”,看有没有结果。
      

  3.   

    hNewPen = CreatePen(0, 1, RGB(255, 255, 0)) '创建一个画笔:线型为实线,宽度为1,颜色为红
    LZ: RGB(255, 255, 0))颜色是黄色不是红色
      

  4.   

    Me.ScaleMode = vbPixels 
    在Picture1画图,上述对窗体的设置起何作用.
      

  5.   

    看看这本书:http://download.csdn.net/source/1817028