|
說明 |
最近把工作辭掉啦,專心研究一些想研究的東東。 做BaseLibrary的想法是,把常用的一些東東,寫成一堆function庫,供以後自己寫程式時,方便使用,就只是降子的想法而已, 所以若寫的不好,請不要見怪喔! 目前提供了在檔案及圖形上的一些處理,開發時間不是很久,所以可能有不盡完善的地方,請見諒,若有什麼地方執行有誤或有更好的意見,希望大家能夠多回饋意見給我,謝謝!
請勿將它使用於任何商業用途,謝謝! |
|
|
預覽畫面 |
檔名 : a.jpg
檔案大小 : 18559 Bytes 上傳時間:2006-05-25 17:20

-- 用ValidateImage產生的驗證圖片
|
檔名 : b.jpg
檔案大小 : 16855 Bytes 上傳時間:2006-05-25 17:20

-- 用ValidateImage產生的驗證圖片
|
|
檔案列表 |
檔名 : BaseLibrary.rar 下載數:86
檔案大小:29745 Bytes 上傳時間:2006-05-25 17:10

--
內有使用手冊可參考用法
|
|
你太讚了
|
阿貴 [2008-04-11 12:18]
|
|
你真的太讚了,很少會有人把自己寫的核心工具拿出來 Share 給其它人使用,我欣賞你,我給你滿分5分~~~
最後我幫大家感謝你無私的分享,謝謝你~~
|
範例程式的GetRan
|
康師父 [2006-05-28 10:13]
|
|
最後的範例GetRan,從何而來 3Q
回應 : 範例程式的GetRan [2006-05-28 16:47] weu
|
GetRan只是一個function,可以亂數取值而已,貼上程式碼供參考
Function GetRan(ByVal Max As Integer) As Integer Dim RanValue As Integer Randomize() ' 初始化亂數產生器 GetRan = CInt(Int((Max * Rnd()) + 1)) ''產生1到Max的亂數 Return GetRan End Function
謝謝
|
|
|