Question

关于VB GDI

看了一套gdi学习资料后 今天上机实验 没想到API浏览器里没有关于GDI的声明，重装了GDI+的DLL也没用
怎么办？想画条线都画不出来

Answer 1

Option Explicit
Private Declare Function MoveToEx Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, lpPoint As Any) As Long
Private Declare Function LineTo Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long

Private Sub Command1_Click()
    Dim dc As Long
    dc = GetDC(Me.hwnd)
    MoveToEx dc, 10, 10, 0
    LineTo dc, 200, 10
End Sub

从（10,10）画一条线到（200,10）

追问

为什么和我学的不一样？用你的方法怎么显示PNG呢？

追答

你学的可能是GDI+，也就是gdiplus，VB6中无法直接显示gdiplus导出的API。
VB6的API浏览器只显示其加载的文本文件或数据库文件中定义的API，具体请看API浏览器的“文
件”菜单。

追问

是啊 我学的是GDI+ 请问你学的是什么呢 GDI+的声明API浏览器一个都没有