请教一下,这里的hdc是谁的?
--------------------------------------------------------------------
我想,我是不配拥有爱情的,丑陋的我自己,重要的是心已经死去。

解决方案 »

  1.   

    Private Sub Command1_Click() 
      Picture1.ScaleMode = vbPixels  
      lpRect.X1 = Picture1.Left + 10 
      lpRect.Y1 = Picture1.Top + 10 
      lpRect.X2 = lpRect.X1 + Picture1.Width - 20 
      lpRect.Y2 = lpRect.Y1 + Picture1.Height - 20 
      DrawFocusRect Picture1.hdc, lpRect 
    End Sub
    '这样如何?
    --------------------------------------------------------------------
    我想,我是不配拥有爱情的,丑陋的我自己,重要的是心已经死去。
      

  2.   

    thirdapple(陨落雕)
    你好
    我估计是ScaleMode 属性
    设置的问题!可能圈在了外边,所以看不见了,
    或者是因为API函数调用问题!