2012年12月31日 星期一

[流程控制] If....Then....Else....End If

在 VB 上 If....Then....Else....End If 主要的功能就是「判斷」要執行哪一段程式碼
那話不多說,我們就來教如何運用 If 陳述式

A、單行敘述:專們用來寫簡單的判斷
下面這個例子非常簡單,用加法來作判斷
If 2 = 1 + 1 Then MsgBox( "正確") Else MsgBox("錯誤")

2012年12月22日 星期六

如何用 VB 來電腦截圖?

有很多人會用電腦中的內建程式或快捷鍵來截圖
在VB中也可以很輕鬆的完成這項工作
只要簡單的幾行程式碼即可完成唷!

2012年12月16日 星期日

用 Xor 來加密字串

Xor 字串加密是用於寫有關普通字串變成讓人不知道的字串值
而原理就是把一個字元改成另外一個字元,也就是位移的動作
ex:
例如將 abc 這個字串和 17 作 Xor 運算會得到 psr
如果將 psr  這個字串和 17 作 Xor 運算會得到 abc

也許你會覺得這種方式過於簡單,並沒有什麼安全性,事實上並不是這樣;有許多公認非常安全的加密法也只是做 Xor 運算而已,只是要看你如何組合,如果只是用單一個鍵去加密,當然很容易被破解,但我以下教學只簡單用一個字元來作字串的加密
如果你想要把字串加密的更難的話,也可以把程式碼編改一下唷!

2012年12月11日 星期二

[內建函數] 字串函數

內建函數有分為:字串函數、數值函數和時間函數

字串數值是專門用來處理字串資料的函數
而這一次我就來簡單介紹常用的字串函數
以下是我整理出來的字串函數,大家可以參考參考唷!

2012年11月20日 星期二

登錄檔的應用 (GetValue、SetValue)

在許多有設定的程式,要怎麼儲存那些設定呢?
而我上次有說可以用 txt 文字檔的讀寫來儲存使用者設定
但總總會有些不專業的感覺,而且也有可能會被誤刪的可能性
因而導致程式錯誤~

所以現在就來教一般程式都把設定儲存在 Regedit 登錄檔當中!
來看看怎麼操作吧!

2012年11月17日 星期六

顯示資料夾下的所有檔案

當你要程式搜尋電腦中某個資料夾下的檔案時
要用啥程式碼呢?
方法有很多種,今天就先教其中一種吧!

2012年10月26日 星期五

[FTP] 刪除檔案

FTP 這相關應用我覺得還蠻重要的
當然不一定會全部都用到
但如果你是在寫關於網路應用的話,也許就需要用到 FTP 相關的程式碼

這一次就來分享關於「如何刪除 FTP 上的檔案」吧!

2012年10月24日 星期三

用 Big5 來讀取文字檔

上次教如何使用 My 來讀取文字類的檔案(利用 My 來 讀取 / 寫入 文字檔
那個方法超簡單的,一條程式碼就可以解決的。

但唯一缺點就是:不能讀英文字母以外的語言

所以今天我就來分享這個程式碼
來教如何讀取其他語言的文字檔吧!

程式碼 VB
Dim myreader As Microsoft.VisualBasic.FileIO.TextFieldParser
myreader = New Microsoft.VisualBasic.FileIO.TextFieldParser ( "C:\VB.txt", System.Text.Encoding .GetEncoding("big5"))
Dim thedelimiters As String() = {vbTab}
myreader.Delimiters = thedelimiters
While Not myreader.EndOfData
    ListBox1.Items.Add(myreader.ReadLine)
End While

VB 應用
以上程式碼對初心者來說有些複雜
但只要去用心看,我相信還是可以輕易的運用的

就來教教如何使用吧!

一、相關重要設定
第二行「myreader = New Microsoft.VisualBasic.FileIO.TextFieldParser ( "C:\VB.txt", System.Text.Encoding .GetEncoding( "big5"))」中的「 "C:\VB.txt"」就是要讀取的檔案路徑;「"big5"」就是中文的文字編碼,當然也可以改為「"UNICODE"」這樣的話連日文都可以讀取囉~


二、讀取的資料位置
While Not myreader.EndOfData
     ListBox1.Items.Add(myreader.ReadLine)
End While

While Not myreader.EndOfData

End While是在說我要讀取文字檔讀到最底時,跳出迴圈

ListBox1.Items.Add(myreader.ReadLine)
就是說所讀取的一行一行資料都要增加到 ListBox1 中,這樣就可以把所有的資料給讀出來囉~

當然,如果不想要用 ListBox 的話,我們也可以用 TextBox 來輸出資料~
程式碼如下:
While Not myreader.EndOfData
     TextBox1.Text = TextBox1.Text & vbCrLf & myreader.ReadLine
End While


這樣的話就會把資料輸出到 TextBox 上囉~


當然這些程式碼只是參考之用~程式碼會有需多變化
只要成果顯現的出來,那就是正確的程式碼!

2012年10月21日 星期日

[My] 讀取 / 寫入 文字檔

這一次也是超簡單程式碼
讓你一看就會,不需要思考就會運用程式碼

讀取、寫入文字檔是 VB 蠻常用的程式碼
如果想要用 My 來當成是設定值,對初心者來說是最簡單的
當然,是沒有比用登錄檔還要安全
但簡單勝過一切!

2012年10月12日 星期五

[FTP] 取得 FTP 資料夾下的所有檔案、資料夾清單或詳細資料

關於 FTP 的相關程式碼我可找了好久
超難找的!
所以我要在此分享以下程式碼來提供給需要的人使用!
這一次是關於「顯示 FTP 資料夾下的所有檔案和資料夾

2012年10月10日 星期三

檢查電腦連線狀態

有些程式是需要網路支援的
例如:更新、上傳、下載等等

有些使用者在使用這些網路程式功能時
就有可能會因為沒接上網路,而造成程式錯誤

為了避免不必要的程式錯誤
我們可以來用以下超簡單程式碼來做檢查使用者是否有連結網路

查詢目前使用者 名稱 與 權限

這篇就來教如何查詢目前使用者 名稱 與 權限
一樣,我們還是維持超簡單的作風來做程式碼教學

2012年9月28日 星期五

查詢電腦是否有管理員身份

要查詢是否有管理員身分的方法有很多
我今天就來介紹其中一個方法吧!

亂數

在 VB 的程式中會有許多用到「亂數」這個功能
是 VB 必學的程式碼喔!
所以現在就來看看程式碼怎麼寫吧!

如何下載 VB Warehouse 中的程式範例?

本網站所提供的程式範例完全為自行編撰!
將程式範例放置於 Google Drive (Google 雲端硬碟)

關於 VB Warehouse 絕對領域

大家好~個人在 VB 的方面還是在研究中
在國小五年級開始自行研究
本身對 VB 程式語言很有興趣
雖然沒有老師可以請教,但有那股熱忱,什麼困難都沒問題喔!
自學時,真的一開始覺得程式語言是啥阿!
當時身旁有一本我姊用的計算機概論
我就利用那本書學習簡單的程式語言
而其他較複雜的程式語言我就在 知識+ 裡面查
當然,要花很多時間,而且有時會沒有而要去別的網站來尋找
但一切都值得~被我查到程式碼都很有成就感
而且不會忘記!