Dim file As String = "D:/test.pdf"
Dim image As String = "D:\test.png"
Try
Dim g As New GflAx.GflAxClass()
g.EpsDpi = 150
g.Page = 1
g.LoadBitmap(file)
g.SaveFormat = GflAx.AX_SaveFormats.AX_PNG
g.SaveBitmap(image)
MessageBox.Show(Me, "PDF to PNG conversion ended")
Catch ex As Exception
MessageBox.Show(Me, "GflAx error: " + ex.Message)
End Try