vb制作简单的多窗口浏览器(6) --判断后退前进

前端之家收集整理的这篇文章主要介绍了vb制作简单的多窗口浏览器(6) --判断后退前进前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

起初想用CommandStateChange试试是否能实现这个功能,结果最后放弃,似乎它只支持单窗口的,于是只能用笨办法,添加变量记录数据,然后去判定是否可以允许后退或者前进

  1. Ifcurrectpage(activepage)=lastpage(activepage)ThenGoToaaa
  2. Picture5.Picture=Picture24.Picture
  3. OnErrorGoToaaa
  4. WebBrowser1(activepage).GoForward
  5. currectpage(activepage)=currectpage(activepage)+1
  6. add_page=1
  7. Ifcurrectpage(activepage)>1ThenPicture4.Picture=Picture19.Picture
  8. Ifcurrectpage(activepage)=lastpage(activepage)ThenPicture5.Picture=Picture40.Picture
  9. aaa:
  10. ExitSub

猜你在找的VB相关文章