33 一个有关dsplay放大缩小的脚本
很简单

页面上放一个Slider1

Max和min设置一下  

2句代码

Application.ActiveDisplay.zoom = Slider1.Value
Application.ActiveDisplay.Refresh

实现
posted on 2006-11-23 23:34  zljini  阅读(392)  评论(0编辑  收藏  举报