webbrowser控件如何隐藏滚动条 - 编程论坛

#2

吹水佬2023-03-07 17:33

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

#3

hytizj0232023-03-07 18:18

以下是引用吹水佬在2023-3-7 17:33:25的发言：

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

就是不是我自己写的，我自己写的，就不用麻烦各位了。麻烦问一下，这个怎么解决大侠

#4

wxzd1232023-03-07 18:24

This.Document.body.Scroll = 'no'

#5

吹水佬2023-03-07 19:03

只有本站会员才能查看附件，请登录

程序代码：

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