楊元的博客

摘要： 最近朋友想找一下自己的網(wǎng)站在百度或者谷歌里多少頁上，手動點(diǎn)擊下一頁太麻煩，所以我?guī)退麑懥诉@個(gè)小程序。簡單介紹一下它有什么功能：比如你有一個(gè)建筑公司的網(wǎng)站，叫做瑞成建筑儀器公司，但是我們想讓別人搜到你的網(wǎng)站，人們不可能去輸入瑞成建筑儀器，一般都是會輸入建筑儀器，所以想讓自己的網(wǎng)站排名靠前，就要輸入建筑儀器，找到自己的網(wǎng)站（瑞成），然后去刷！這時(shí)候問題來了，輸入建筑儀器，自己的網(wǎng)站可能在第好幾十頁甚至百頁上，手動找太麻煩了。。。。。別急！用我的小程序，可以輸入大眾化的關(guān)鍵字，再輸入你期望找到的關(guān)鍵字，就可以自動幫你找在第幾頁出現(xiàn)了！！支持百度和谷歌。如果百度或者谷歌網(wǎng)頁更新的話，我也會不定時(shí)更新。 閱讀全文

摘要： 最近想幫同學(xué)刷一下網(wǎng)絡(luò)投票，所以想找個(gè)輪換代理的軟件，沒想到網(wǎng)上竟然沒有！好不容易找到幾個(gè)可憐兮兮的資源，不是假的就是有病毒。。。。。。。只能自己動手了。。。。彌補(bǔ)一下網(wǎng)絡(luò)的空白。。。。。。現(xiàn)在我以廊坊師范8期提高班的名義在此免費(fèi)發(fā)布一個(gè)定時(shí)更換代理的軟件，可以添加、導(dǎo)入代理IP，軟件會根據(jù)您添加的代理自動輪換。需要說明的是本軟件沒有驗(yàn)證代理有效性的功能，可以先用花刺代理驗(yàn)證一下有效性（防止做無用功），然后用花刺代理導(dǎo)出可以用的IP，在導(dǎo)入到本軟件。有人會問這個(gè)有什么用。。。。這個(gè)用處太大了。。。定時(shí)換IP可以無限投票，無限申請qq、只要是有IP限制的，只要你IP夠多，就可以突破限制。截圖：下 閱讀全文

摘要： 對于拖拽，我一直沒有一個(gè)明確的認(rèn)識，今天發(fā)現(xiàn)了這個(gè)問題，馬上著手解決（發(fā)現(xiàn)問題與解決問題的無縫結(jié)合，不能放到明天），認(rèn)識到自己哪里不會是一種學(xué)問，解決更是一種學(xué)問。 首先，我站在巨人的肩膀上-----先百度一個(gè)例子，通過例子理解更好一點(diǎn)。但這個(gè)巨人有點(diǎn)讓我失望，網(wǎng)上并沒有太完善的說明，但是還是得到了啟示。下面通過我的學(xué)習(xí)歷程來理解拖拽！（那就讓我當(dāng)一個(gè)小巨人吧~~~~） 說到拖拽，涉及到兩個(gè)事件：DragDrop、DragOver，必須把控件的DragMode屬性設(shè)為1（1為自動，默認(rèn)為0手動）才可以發(fā)生，該控件不再接收Click事件和MouseDown事件。（有人用到MouseDown和M. 閱讀全文

摘要： 本來以為用VB刷一個(gè)鏈接是很簡單的，但實(shí)際操作時(shí)，遇到了一個(gè)BUG！那就是IE內(nèi)核的瀏覽器內(nèi)存泄漏問題。在VB中的表現(xiàn)是：用web控件不停點(diǎn)擊或者刷新一個(gè)鏈接時(shí)，內(nèi)存會不斷的積累，即使你釋放了所有對象，關(guān)閉了所有彈出的頁面，只要主web控件不關(guān)閉，內(nèi)存會積累到驚人的地步（因?yàn)閣eb控件用的是IE內(nèi)核）于是我上網(wǎng)尋求解決辦法，結(jié)果沒有發(fā)現(xiàn)巨人，得到的回答只有一個(gè)：等微軟解決吧！ 但也有人說可以在執(zhí)行一段時(shí)間后重啟程序以釋放內(nèi)存。我想這是我能力范圍內(nèi)最好的辦法了！ 怎么重啟呢？？試想一個(gè)用戶正在使用你的程序，可他突然消失了，無法讓人接受！其次，如果你的程序最小化時(shí)，重啟時(shí)會不會給用戶造成騷擾？怎. 閱讀全文

摘要： 現(xiàn)在看看大家都用異或，感覺簡單了點(diǎn)，沒有創(chuàng)新。來一個(gè)新型的加密算法。 先說說思路：加密的時(shí)候是先用一個(gè)密碼產(chǎn)生隨機(jī)數(shù)列，隨機(jī)把ASC碼表打亂；然后把ASC碼表放在一個(gè)數(shù)組里。把真實(shí)的字符換成ASC碼，然后去數(shù)組里匹配，匹配成功后把這個(gè)數(shù)組的下表值轉(zhuǎn)換成字符，接著再用一個(gè)密碼產(chǎn)生隨機(jī)數(shù)列，用來隨機(jī)確定下表的位置（說明：加密后每組5個(gè)字符下表偽裝算一個(gè)，其他的用隨機(jī)數(shù)產(chǎn)生隨機(jī)字符，用的是第二個(gè)密碼），這樣產(chǎn)生的亂碼是原來字符的5倍，每五個(gè)一組，每組中有一個(gè)是記錄數(shù)組下表的字符（位置不定）。至于解密，先要有密碼把ASC碼表重新排序，然后五個(gè)一組開始解，如果加密完字符長度為n，要產(chǎn)生n個(gè)隨機(jī)數(shù)，其中每 閱讀全文

摘要： 問題首先是由vb的Timer控件引起的。大家都知道vb不支持多線程，但Timer控件給我們一個(gè)錯(cuò)覺：一個(gè)Timer控件就是一個(gè)線程，Timer控件是并行的。開始我也這么認(rèn)為，但一段簡單的代碼說明了一切。代碼如下：Option ExplicitDim i As Long, j As LongPrivate Sub Command1_Click()Dim x As DoubleFor i = 1 To 1000000 x = Sin(2) / i DoEventsNext iIf i = 1000001 Then MsgBox "aaa"End SubPrivate Sub F 閱讀全文

摘要： 聲明：本文部分內(nèi)容來源于網(wǎng)絡(luò)！首先，我認(rèn)為這樣花費(fèi)精力去研究VB調(diào)用API字符串的種種貓膩是很有必要的。本著嚴(yán)謹(jǐn)和發(fā)現(xiàn)問題與解決問題的原則，和為了能更好的認(rèn)識問題的本質(zhì)，我特寫了這篇冗長的討論。網(wǎng)上有很多關(guān)于此的討論，但比較雜亂，目的不明確，也很難懂。在此也就是做個(gè)總結(jié)吧！讓大家能有一個(gè)清楚認(rèn)識。我的問題是從調(diào)用內(nèi)存API時(shí)參數(shù)的ByVal VarPtr+變量和直接寫變量的區(qū)別開始的。舉個(gè)例子：ByVal VarPtr x 與x，按照網(wǎng)上的說法這兩者是沒有任何區(qū)別的，這是不正確的！這兩個(gè)有沒有區(qū)別要看變量x是什么類型的，如果是字符串型，這兩個(gè)是完全不一樣的含義；如果是除了字符串型以外的任何類型 閱讀全文