formula one 插入图片的问题

Question

在formula one 的帮助文档中有插入图片的VB代码
Dim ObjID As Long
    Dim nX1 As Single
    Dim nY1 As Single
    Dim nX2 As Single
    Dim nY2 As Single
    Dim hMF As OLE_HANDLE
    Dim nMapMode As Long
    Dim nWndExtentX As Long
    Dim nWndExtentY As Long
    Dim MapMode As Integer
    
    nX1 = 1
    nY1 = 7
    nX2 = 4
    nY2 = 12
    
    MapMode = MsgBox("Do you wish to strecth the image to fit?", vbYesNo)
    If MapMode = vbYes Then
        nMapMode = 8
    Else
        nMapMode = 7
    End If
    
    hMF = Picture1.Picture
    
    nWndExtentX = Picture1.ScaleWidth
    nWndExtentY = Picture1.ScaleHeight
    
    ObjID = F1Book1.ObjCreatePicture(nX1, nY1, nX2, nY2, hMF, nMapMode, nWndExtentX, nWndExtentY)如何移植到VB.NET中呢，做了很多尝试都不行。
vb.net 中picturebox没有picture属性
如此写 
 hMF = PictureBox1.Handle.ToInt32()
ObjID = AxF1Book1.ObjCreatePicture(nX1, nY1, nX2, nY2, hMF, nMapMode, nWndExtentX, nWndExtentY)老是报异常