How to zoom to a specific scale in ArcMap 9.3 in Vb.net?

Question

Greetings,

I wonder if there is any way to set the scale of the "Zoom to selected Feature" functionality through Vb.Net code?

But if this is can not be done. Could I zoom to the selected feature then set the scale to the value I want similar to what we can do in ArcMap 9.3(Zoom to selected then enter the value of the scale in the scale text found on the Standard Toolbar). Is this possible? How?

Please advise...

dgesridgesri · Answer

Thank you very much Mr. Hornbydd,

I was thinking of changing the zoom scale so when I zoom to a selected feature then it zoom to the location of that selected feature but with a specific scale.

However, what you have posted about changing the map scale is another workaround and it helped me a lot..

Again thank you man...

Hornbydd · Answer

You can change map scale like this:Dim pMap As IMap
        Dim pmxDoc As IMxDocument
        Set pmxDoc = ThisDocument
        Set pMap = pmxDoc.FocusMap
        pMap.MapScale = 10000

This VBA example assumes your data frame has its coordinate system set.

Duncan

dgesridgesri · Answer

Thank you Mr. Hornbydd for your interest on this post,

Well, I`m already using this function "ZoomToAllSelectedFeatures"  but I want to change the scale of the zoom if possible.

Or I think I can change the scale of the extent after I call that function but through vb.net code. Again if this is possible, please advise?

Thanks guys...