自制了一个全屏的浏览器,只要求做到两点:
1、浏览固定页面,如http://www.baidu.com,不能右键打开另外窗口,所有窗口都在自身窗口打开。
2、按特定快捷键打开自定义窗口,如 adBox.frm,输入相关信息,保存到本地文件夹。
3、如果可以,模拟鼠标手势,进行关闭窗口,刷新、向前,倒退窗口操作,如果麻烦,则可以在浏览器上单击右键显示自定义的右键菜单,选择相关的操作。本人是新手(只会使用简单的窗体,不会使用模块,不会用API),有高手点评,感激不尽,凡能说到VB技巧的,就散分。非常感谢!!!

解决方案 »

  1.   

    1.用webbrowse 控件
    2.
    private sub form_keyDown(.........)
        if keycode=asc("A") and shift=1 then'shift+A调用窗体
            adbox.show
        end if 
    end sub  
    '=====写adbox窗体上的text1控件的内容到磁盘文件d:\d.txt 文件中
       open "d:\d.txt" for output as #1
        print #1,adbox.text1.text
       close #1
    3.不知道在说什么
      

  2.   

    就是楼上说的,用webbrowse控件最简单啦,不过一点意思也没有,呵呵
      

  3.   

    1、浏览固定页面,如http://www.baidu.com,不能右键打开另外窗口,所有窗口都在自身窗口打开。
    不能打开窗口好办,可以在webbrower上面做一picture控件盖住他就可以了。2、按特定快捷键打开自定义窗口,如 adBox.frm,输入相关信息,保存到本地文件夹。
    这个用VB的菜单或API的定义热键应该可以实现吧。
    3、如果可以,模拟鼠标手势,进行关闭窗口,刷新、向前,倒退窗口操作,如果麻烦,则可以在浏览器上单击右键显示自定义的右键菜单,选择相关的操作。
    模拟鼠标可以用mouse_event 或是直接用程序控制就可以了。比如刷新就是webbrower.Refresh就可以了吧。我也是新手一块研究吧。
      

  4.   

    fishmans(金脚指)说的没什么用处,我度过了,因为webbrowser控件已把整个form覆盖了,你用form_keydown事件根本没用.而webbrowser又不能直接调用keydown或mouse事件. 
    litaoa(青云) ,能不能详细说一下如何在webbrowser控件上加载mouse_event呢?还有API热键又如何定义,本人新手中的新手,初次接触,请多多指教!