标题:webbrowser控件如何隐藏滚动条
只看楼主
hytizj023
Rank: 1
等 级:新手上路
帖 子:166
专家分:7
注 册:2023-3-2
结帖率:100%
已结贴  问题点数:20 回复次数:4 
webbrowser控件如何隐藏滚动条


我想实现的效果是,隐藏滚动条,并将网页拉到特定的位置,意思是我只需要显示网站的一部分而不是全部,所以我要移动到特定的位置并隐藏滚动条就OK了,感谢各位大侠!
搜索更多相关主题的帖子: 位置 webbrowser 滚动条 隐藏 控件 
2023-03-07 17:20
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:1 
如果html是自己写的就简单,否则就要麻烦做点手脚。
2023-03-07 17:33
hytizj023
Rank: 1
等 级:新手上路
帖 子:166
专家分:7
注 册:2023-3-2
得分:0 
以下是引用吹水佬在2023-3-7 17:33:25的发言:

如果html是自己写的就简单,否则就要麻烦做点手脚。

就是不是我自己写的,我自己写的,就不用麻烦各位了。麻烦问一下,这个怎么解决大侠
2023-03-07 18:18
wxzd123
Rank: 2
等 级:论坛游民
帖 子:238
专家分:43
注 册:2012-9-6
得分:4 
This.Document.body.Scroll = 'no'
2023-03-07 18:24
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:15 

程序代码:
of = CREATEOBJECT("form1")
of.show(1)
RETURN

DEFINE CLASS form1 as Form 
    width=800
    height=500
    AutoCenter=1
    ADD OBJECT WB AS Olecontrol WITH left=0,top=0, Width=this.width,Height=this.height,Anchor=15,OleClass="Shell.Explorer.2"
    PROCEDURE Init
        this.WB.Silent = 1
        this.WB.Navigate("https://match.lottery./lotto/pc_zst/index?actionType=chzs&lottoType=3d")
    ENDPROC
    PROCEDURE WB.documentComplete(pdisp, url)
        IF SYS(3095,pdisp)==SYS(3095,this)
            this.document.body.Scroll = "no"
            this.document.parentWindow.scrollBy(100,600) && 滚动条滚到 x=100,y=600
        ENDIF
    ENDPROC   
ENDDEFINE
2023-03-07 19:03



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-511477-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.014299 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved