99爱免费观看_日韩在线免费_97成人在线视频_中文字幕三区_美女福利视频网站_色伊人

如何用VB制作網址鏈接器

來源:期刊VIP網所屬分類:計算機信息管理時間:瀏覽:

  添加一個systray控件,使程序啟動后放入WIN95/WIN98狀態欄的系統盒中等等。限于篇幅,這里不再具體說明。編寫此程序旨在拋磚引玉。

  用過《東方網神》的朋友們都知道,《東方網神》內設有一個網址資源,分類存放了很多網址,你只要用鼠標單擊要去的網址,就可把你帶到該網站。其實我們也可以自己設計一個網址鏈接器實現此功能。

  下面就用VB6.0編寫一個簡單的網址鏈接器,步驟如下:

  1.啟動VB6.0,新建一個標準EXE工程,系統自動創建一個窗體form1,設置其caption屬性為“創新搜索引擎”。

  2.我們需要引用一個API函數ShellExecute,方法是在工程中添加一個模塊Module1,打開VB6.0 API瀏覽器,在API瀏覽器的“文件”菜單中選擇“加載文本文件”菜單項,此時將彈出一個“選擇一個文本API文件”對話框,從中選擇“Win32api.txt”,單擊“確定”按鈕,單擊ShellExecute函數,然后單擊“復制”按鈕。再回到Module1,按CTRL+V把ShellExecute函數粘貼到Module1模塊的代碼窗口中。

  3.回到form1窗體,添加一個frame控件,取名為frame1,caption屬性設置為“請選擇網站類別”,在frame1控件中放置一個option button控件組(單選按鈕),取名為option1,該控件存放網站類別,可根據需要設置option的控件數目。這里僅設置了四個,option1(0)的caption屬性為“國內著名網站”,option1(1)的caption屬性為“IT”,option1(2)的caption屬性為“硬件”,option1(3)的caption屬性為“軟件”。

  4.再添加一個frame控件,取名為frame2,caption屬性設置為“請選擇網站”,在frame2控件中放置一個label控件組,取名為label1,該控件存放網站的名稱。放置兩個label控件,也根據實際需要設置控件數目。設置其Font屬性為下劃線,Forecolor屬性為突出顯示,Mouseicon屬性(設置自定義的鼠標圖標)為一個手形圖標,這里為VB98graphicsiconsarrows目錄下的Point02.ico文件,其Mousepointer屬性為99(通過Mouseseicon屬性所指定的自定義圖標)。

  5.在form1窗體聲明以下變量:

  7.編寫一個link子程序

主站蜘蛛池模板: 久久精品亚洲精品 | 特级做a爰片毛片免费看108 | 激情久久五月天 | 在线免费看黄网站 | 欧美一级免费播放 | 久久另类| 91.成人天堂一区 | 国产精品999 | 久久久久久亚洲 | 国产精品久久久精品 | 综合91| 黄色毛片观看 | 国产精品69久久久久水密桃 | 亚洲免费网 | 日韩在线观看毛片 | 北条麻妃一区二区三区在线 | 日韩电影免费在线观看中文字幕 | 午夜视频在线观看网址 | 91精品久久久久久久久久 | 亚洲色图p| 久久99精品久久久久 | 九九热在线免费视频 | 午夜在线观看免费 | 久久久久久久久久久久久久久久久久久 | 日韩av黄色 | 欧美99 | 欧美精品一区三区 | 少妇撒尿一区二区在线视频 | 国产第一二区 | 午夜羞羞 | www中文字幕 | 日韩中文字幕av | 欧美美女黄色网 | 久久精品成人免费视频 | 精品九九久久 | 色欧美综合 | 精品国产一区二区三区电影小说 | 美女久久 | 国产精品欧美三级在线观看 | 一区二区免费播放 | 91视频免费观看入口 |