BitmapToClient example for Visual Basic

Dim szOut As String

    'Test a bitmap location for its screen location
    LEADRasterView1.ScaleMode = 3 'pixels b/c I'm passing pixels
    LEADRasterView1.BitmapToClient 50, 50
    szOut = ""
    szOut = szOut + "ClientX = " & CStr(LEADRasterView1.ConvertX) & Chr(10) & Chr(13)
    szOut = szOut + "ClientY = " & CStr(LEADRasterView1.ConvertY) & Chr(10) & Chr(13)
    MsgBox szOut