vb.net_vs_2005_中級篇2

1、實(shí)例53：獲得撥號網(wǎng)絡(luò)項(xiàng)目實(shí)例說明在本實(shí)例中，我們將制作一個能夠取得本地計算機(jī)上的撥號網(wǎng)絡(luò)的項(xiàng)目的應(yīng)用程序。程序運(yùn)行結(jié)果如圖531所示。圖531運(yùn)行結(jié)果技術(shù)要點(diǎn)?讀取注冊表內(nèi)容?添加到列表框?qū)崿F(xiàn)過程■新建項(xiàng)目打開Visual，選擇“新建項(xiàng)目”，在項(xiàng)目類型窗口中選擇“VisualBasic項(xiàng)目”，在模板窗口中選擇“Windows應(yīng)用程序”，在名稱域中輸入“GetDialList”，然后選擇保存路徑。單擊“確認(rèn)”?！鎏砑涌丶驮O(shè)置屬性向窗體

2、上添加一個ListBox控件。將窗體的Text屬性改為“獲得撥號網(wǎng)絡(luò)項(xiàng)目”，其余屬性都保持默認(rèn)?！鎏砑哟aPrivateDeclareFunctionRegOpenKeyLib“advapi32.dll“Alias“RegOpenKeyA“(ByValhKeyAsIntegerByVallpSubKeyAsStringByRefphkResultAsInteger)AsIntegerPrivateDeclareFunctionRegCl

3、oseKeyLib“advapi32.dll“(ByValhKey實(shí)例54：倒計時程序?qū)嵗f明本實(shí)例將制作一個倒計時程序。程序運(yùn)行時，始終位于在任何窗口的最前面，雙擊窗體結(jié)束應(yīng)用程序。程序運(yùn)行結(jié)果如圖541所示。可以在窗體上單擊鼠標(biāo)右鍵，在彈出的菜單中選擇“設(shè)置倒計時”，設(shè)置界面如圖542所示。圖541運(yùn)行結(jié)果圖542設(shè)置倒計時界面技術(shù)要點(diǎn)?保持窗體最前?倒計時?TimeSerial()函數(shù)?SetWindowPos（）API函數(shù)實(shí)現(xiàn)過

4、程■新建項(xiàng)目打開Visual，選擇“新建項(xiàng)目”，在項(xiàng)目類型窗口中選擇“VisualBasic項(xiàng)目”，在模板窗口中選擇“Windows應(yīng)用程序”，在名稱域中輸入“ReverseCount”，然后選擇保存路徑。單擊“確認(rèn)”?！鎏砑涌丶?、菜單和窗體為當(dāng)前窗體添加兩個Label控件和兩個Timer控件。其中一個Timer控件控制一個Label控件在上方一直循環(huán)移動；另一個Timer控件控制時間的顯示。添加一個ContextMenu控件并新建菜單