Re: [VB6 ] 製作Browser的問題

看板Visual_Basic作者LinLeopold (神鵰李奧)時間19年前 (2006/03/28 19:19)推噓0(0推 0噓 0→)

留言0則, 0人參與討論串5/6 (看更多)

不好意思我還是寫不出來耶... 可否再請教一下我把 lngHis=ubound(arrHistory)+1 redim preserve arrHistory(lngHis) 貼到Command2(也就是下一頁的那個按扭) 當然在"一般"(Genneral)的地方我已經有宣告arrHistory了可是我run的時候還是出現錯誤...@@" 我再詳細解釋我的瓶頸過程一下... 我的視窗介面是設計成有兩個webbrower 所以開始執行時會同時先跑出兩個網頁所以在from load中已經寫了 WebBrowser1.Navigate "www.google.com.tw" WebBrowser2.Navigate "www.msn.com.tw" 尤於我們老師要求的是如果當text1.text打了一個新網址這個新網頁會出現在WebBrowser1中原本的WebBrowser1中的google網頁就會跑到WebBrowser2去以此類推... 現在我主要的瓶頸是按鈕上的"上一頁"、"下一頁" 隱形字問題題目規定是開始執行的時候 "上一頁"、"下一頁" 字必須是鎖著的所以我在屬性的地方就先把它們兩個的Enabled改成false 但是當我打下在text1.text中第一個網址時 "上一頁"按鈕的字必須從虛字變成實字也就是Enabled必須打開但是這時候的"下一頁"的Enabled必須還是鎖著的除非我回到"上一頁" 我的"下一頁"的Enabled才會打開(這是題目規定的) 也就是除非有上一頁可走 "上一頁"按鈕才能打開同理除非有下一頁可走 "下一頁"按鈕才可打開不知道各位高手懂不懂我的意思 sorry... 因為我也是vb初學者 ^^" 我們的老師提示是說設三個變數就可以寫出來了 but 目前我只寫得出一個變數也就是aa 在Text1_KeyPress(KeyAscii As Integer)中寫下 Dim KeyAscii As Short = Asc(eventArgs.KeyChar) If KeyAscii = 13 Then aa = WebBrowser1.LocationURL WebBrowser1.Navigate(Text1.Text) WebBrowser2.Navigate(aa) Command1.Enabled = True 這樣子 "上一頁"是打開了但是 "下一頁"還是鎖著的如果我在Text1_KeyPress(KeyAscii As Integer)中把Command2.Enabled = True寫下去這樣也是錯的因為除非我先回到上一頁不然不可能有下一頁可走... 所以"下一頁"不能在這時候打開請問各位高手我到底該怎麼辦呢...?? @@" ※ 引述《lls23 (侰侰侁)》之銘言： : 應當在你點擊往下一頁按鈕時用﹐並且判定此時並非瀏覽已有頁面 : 而是真的往下一新頁走 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 220.141.102.65