tag:blogger.com,1999:blog-39991989449897615682024-02-02T13:33:26.449+08:00VB範例網本站於二零零零年創辦,以分享VB6及API程式寫作的範例、技巧為宗旨。含Visual Basic教學範例、VB心得與範例、函數介紹、自製函數、API範例、VB Script及原程式碼下載等。雖然現在已經推出了較新的VB.NET,但本站依然以VB6編程為主。 站長Dictbene和副站長thomson現在都在工作,因此很少有時間作更新,但我們會盡可能維持現有既資料。 承蒙各網友支持,本站曾於二零零二年奪得Uhome.net網站之星第四名。 本站於二零零四年因伺服器供應公司倒閉問題而停辦,直至二零零八年重新成立。VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.comBlogger33125tag:blogger.com,1999:blog-3999198944989761568.post-5743913066458177342009-12-15T16:32:00.000+08:002009-12-15T16:32:04.613+08:00VB範例網<ul style="border-bottom: medium none; border-left: medium none; border-right: medium none; border-top: medium none;">
<li style="border-bottom: medium none; border-left: medium none; border-right: medium none; border-top: medium none;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhGwE_bXdgC-Y-4zCXMrzadDN9rdss98IKhW6zFy9T_AoGrvulE1iUfdznIH7dJoSsLSFvXMrfLhwpbXVO5xrnTgu64M0HKBn1RtikI13nGcakCFqvV28PLPOB0Yqiz5iChSHY0UWDhHZLA/s1600-h/logo_12090.gif" imageanchor="1" style="clear: left; cssfloat: right; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhGwE_bXdgC-Y-4zCXMrzadDN9rdss98IKhW6zFy9T_AoGrvulE1iUfdznIH7dJoSsLSFvXMrfLhwpbXVO5xrnTgu64M0HKBn1RtikI13nGcakCFqvV28PLPOB0Yqiz5iChSHY0UWDhHZLA/s320/logo_12090.gif" /></a>VB範例網為了方便日後更新內容,新的網站將會放在Blogspot內。網址為<a href="http://vbexample.blogspot.com/">http://vbexample.blogspot.com/</a>或<a href="http://vbex.net/">http://vbex.net/</a>。</li>
</ul>
<div style="border-bottom: medium none; border-left: medium none; border-right: medium none; border-top: medium none;">
<br />
</div>
<ul style="border-bottom: medium none; border-left: medium none; border-right: medium none; border-top: medium none;">
<li style="border-bottom: medium none; border-left: medium none; border-right: medium none; border-top: medium none;"><strong>網友可點擊右方「本站目錄」以選擇內容</strong>。</li>
<li style="border-bottom: medium none; border-left: medium none; border-right: medium none; border-top: medium none;">雖然此前本網荒廢將近一年的時間,但經過搬遷後,本網會陸續將新的內容上載,感謝各方網友一直以來的支持。 </li>
<li style="border-bottom: medium none; border-left: medium none; border-right: medium none; border-top: medium none;">最後更新日期:二零零九年十二月十四日。</li>
</ul>VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-25964164983489609102009-12-15T16:30:00.002+08:002009-12-15T16:30:53.734+08:00Xor 運算法有些網友可能看過一些範例,看見Xor運算符號,可是就不知是甚麼來的,讓我為大家寫個範例:<br />
Private Sub Command1_Click()<br />
If 1 + 1 = 2 Xor 1 + 1 = 11 Then<br />
MsgBox "成立!"<br />
Else<br />
MsgBox "不成立!"<br />
End If<br />
End Sub<br />
結果為成立!因為Xor的運算是當一邊為True,一邊為False的時候則通過VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-16207463924097916612009-12-15T16:24:00.002+08:002009-12-15T16:24:18.339+08:00怎樣得知控制項陣列有多少個元素?假設控制項陣列名稱是textArr,textArr.Ubound就是最大元素了<br />
textArr.Lbound就是最小元素了<br />
<br />
<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-28010494376247153462009-12-15T16:23:00.002+08:002009-12-15T16:23:55.558+08:00某張表單的變數如何傳到另一張表單?原本只要在每個表單開一個Test1就可以了:<br />
Form1.Text1.Text = Form2.Text1.Text<br />
<br />
可是如果每次傳值到另一個表單都要開一個TextBox就太浪費了!站長教您用一個更好的方法:<br />
<br />
首先開Form1、Form2、Text1(於在Form2)和Command1(於在Form2)各一個,然後分別輸入:<br />
<br />
'Form1程式碼:<br />
Public MyValue as String '這行要放在最頂<br />
Private Sub Form_Load()<br />
MyValue = "哈哈哈!"<br />
End Sub<br />
<br />
'Form2程式碼:<br />
Private Sub Command1_Click()<br />
Text1.Text = Form1.MyValue<br />
End Sub<br />
<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-84236158998289184312009-12-15T16:22:00.001+08:002009-12-15T16:22:43.899+08:00ReDim<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhQ9hYqpwBFFfrtZGwgblTclr1GvnqPriB5zk1q49yhE53_uJ6sqwH9PzubmOHHa_EsAi6tjNJUAAHnvflkDXBk1KOY5UYzp4fLA-hLvS6EhoGNh0h0dUSIvamF-zk_6-0J0syiSq4jU6mC/s1600-h/b.GIF" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhQ9hYqpwBFFfrtZGwgblTclr1GvnqPriB5zk1q49yhE53_uJ6sqwH9PzubmOHHa_EsAi6tjNJUAAHnvflkDXBk1KOY5UYzp4fLA-hLvS6EhoGNh0h0dUSIvamF-zk_6-0J0syiSq4jU6mC/s400/b.GIF" /></a><br /></div>
<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-51140203547132402282009-12-15T16:20:00.001+08:002009-12-15T16:20:23.174+08:00二維陣列除了一維陣列,我們還可以宣告二維陣列:<br />
<br />
Dim A(2, 2) as Integer<br />
<br />
結果如下表:<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhr6FKl4a3EBEb7nVs0W9-lcdXVRrtKvmCKK7E9_LtAy6XTijO9lN0hJiCCxxYRjm9Gxzj1s05dZ0BmMmpfZ7QgurxVkC9N9FCZyzhPcJcLNI2QUiXV0AJ7TWrtxNaBvgQaD8gCZLRl246_/s1600-h/b.GIF" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhr6FKl4a3EBEb7nVs0W9-lcdXVRrtKvmCKK7E9_LtAy6XTijO9lN0hJiCCxxYRjm9Gxzj1s05dZ0BmMmpfZ7QgurxVkC9N9FCZyzhPcJcLNI2QUiXV0AJ7TWrtxNaBvgQaD8gCZLRl246_/s320/b.GIF" /></a><br /></div>
<br />
<br />
<br />
<br />
<br />
<br />
我們可以利用For敘述句配置一些資料: <br />
<br />
For i = 0 to 2<br />
For j = 0 to 2<br />
A(i, j) = i + j<br />
Next j<br />
Next i<br />
<br />
結果:<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEggTwpZFxaznZfbRy9VIOcauNQo0JIYlsZU31NARhzgVBRYbyCRnkWVvO8aRGEPcv19UeOhMEZzGxxSiWdil9zUcsoOVmKOAoVkLPcwZSjC9pdh2kMlJFah226v04i6-p7-jYJNvlDW9XNC/s1600-h/a.GIF" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEggTwpZFxaznZfbRy9VIOcauNQo0JIYlsZU31NARhzgVBRYbyCRnkWVvO8aRGEPcv19UeOhMEZzGxxSiWdil9zUcsoOVmKOAoVkLPcwZSjC9pdh2kMlJFah226v04i6-p7-jYJNvlDW9XNC/s320/a.GIF" /></a><br /></div>
<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-74407655689849337172009-12-15T16:16:00.000+08:002009-12-15T16:16:03.599+08:00一維陣列陣列是由許多形態一樣,但資料不同的項目組合而成,要分別它們就靠索引值:<br />
在VB中如何宣和一個陣列呢?<br />
<br />
Dim A(2) as Integer<br />
如此就宣告了A成為一個陣列了!<br />
<br />
如果我們要配置一些變數進去,可以利用For敘述句:<br />
<br />
For i = 0 to 2<br />
A(i) = i<br />
Next i<br />
<br />
結果:<br />
A(0) =0 <br />
A(1) =1 <br />
A(2)= 2 <br />
<br />
我們可以抽取其中的值來使用:<br />
<br />
A(0) = A(1) + A(2)<br />
<br />
結果:<br />
A(0) =3 <br />
A(1) =1 <br />
A(2) =2 <br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-47305171122081739042009-12-15T16:11:00.001+08:002009-12-15T16:11:53.477+08:00ConstConst是常數宣告,一些值是不斷被使用而其值是不變的,我們就可以宣告它們為常數:<br />
<br />
<br />
Const Pi = 3.14<br />
Const RD = 3.14 / 180<br />
Const Birthday = #05/27/1985#<br />
Const MyName = "小小菜"<br />
<br />
這些常數一經被宣告後就不能改變其值,否則會發生錯誤:<br />
<br />
Const Birthday = 27<br />
Private Sub Command1_Click()<br />
Birthday = Birthday + 1<br />
End Sub<br />
<br />
結果會出現執行階段錯誤!<br />
<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-70586534406315896642009-12-15T16:10:00.000+08:002009-12-15T16:10:36.713+08:00Static當一個副程式(Sub/Function)結束時,在其中所宣告的變數就不再儲存,變數的內容因此留失,以下有一些例子:<br />
Dim A As Integer<br />
<br />
Private Sub Form_Click()<br />
A = A + 1<br />
Print A<br />
End Sub<br />
<br />
結果:<br />
1<br />
2<br />
3<br />
4<br />
5 <br />
<br />
<br />
Private Sub Form_Click()<br />
Dim A As Integer<br />
A = A + 1<br />
Print A<br />
End Sub<br />
<br />
結果:<br />
1<br />
1<br />
1<br />
1<br />
1<br />
<br />
Private Sub Form_Click()<br />
<br />
Static A as Integer<br />
A = A + 1<br />
Print A<br />
End Sub<br />
結果:<br />
<br />
1<br />
2<br />
3<br />
4<br />
5<br />
<br />
例子1由於變數在最外宣告,因此不受副程式限制;<br />
例子2變數在副程式內宣告,因此副程式結束後變數不被儲存;<br />
例子3雖然變數在副程式內宣告,但由於宣告方式是Static,因此副程式結束後變數依然儲存。<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-72735676112971628812009-12-15T16:04:00.000+08:002009-12-15T16:04:12.941+08:00Dim利用變數時我們宣告它們,否則會出現一些不能預計的錯誤:<br />
<br />
Private Sub Command1_Click()<br />
A = A + 1<br />
Print A<br />
End Sub<br />
'不繼按時會印出:<br />
1<br />
1<br />
1<br />
1 <br />
<br />
<br />
Dim a As Integer<br />
Private Sub Command1_Click()<br />
a = a + 1<br />
Print a<br />
End Sub<br />
<br />
'不繼按時會印出:<br />
1<br />
2<br />
3<br />
4<br />
<br />
原因是左邊的範例沒有宣告變數a,因此不能儲存A的的值而無法加起。<br />
<br />
而右邊的範例因為經過宣告,a已經被儲存,因此能夠加上。<br />
<br />
以下是變數宣告的形態:<br />
<br />
數字宣告形態及有效範圍:<br />
<br />
Byte 0~255 <br />
<br />
Integer -32768~32767 <br />
<br />
Long -2147483648~2147483647 <br />
<br />
Single -3.402823E+38~-1.401298E-45,1.401298E-45~3.402823E+38 <br />
<br />
Double -1.79769313486231E+308~-4.94065645841247E-324,<br />
<br />
4.94065645841247E+324~-1.79769313486231E+308 <br />
<br />
字串宣告形態及有效範圍:<br />
<br />
String 0~65400個字元 <br />
<br />
其他宣告形態及有效範圍:<br />
<br />
Boolean True或False <br />
<br />
Date 西元100年1月1日~西元9999年12月31日 <br />
<br />
Object 任何物件 <br />
<br />
Variant 自由形態如數字、字串、物件、陣列等 <br />
<br />
變數大小寫視為相同例如:<br />
<br />
abc = Abc = aBc = ABC……<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-45300431212297004692009-12-15T15:59:00.003+08:002009-12-15T16:01:46.843+08:00OptionOption是用來設定VB寫作時的狀態:<br />
<br />
Option Base 設定陣列預設的最少值 <br />
Option Base 1 '只可以是0或1<br />
Dim A(3) '開新陣列<br />
Private Sub Form_Click()<br />
Print LBound(A) 'LBound是用來偵察陣列的下限<br />
End Sub <br />
結果印出1<br />
<br />
Dim A(3)<br />
Private Sub Form_Click()<br />
Print LBound(A)<br />
End Sub <br />
結果印出0<br />
<br />
Option Explicit 所有變數必須要預先宣告 <br />
Option Compare 設定文字比較的模式 <br />
Option Compare Text 時,文字比較時不計較大小階<br />
Option Compare Binary 時,文字比較時計較大小階<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-78962027317502912912009-12-15T15:58:00.000+08:002009-12-15T15:58:08.741+08:00Type以下是利用Type宣告變數的例子:<br />
Type L<br />
<br />
A as String<br />
<br />
B as Long<br />
<br />
C as Date<br />
<br />
End Type<br />
<br />
Dim Letter as L<br />
<br />
我們可以取讀Letter 的內容:<br />
<br />
Letter.A = "小123小菜"<br />
<br />
Letter.B = Var(Letter.A) + 456<br />
<br />
Letter.C = #5/27/1985#<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-17431598151054708712009-12-10T18:32:00.000+08:002009-12-10T18:32:11.722+08:00利用程式碼改變物件屬性<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEijQyOeR-hnzoDwDWUvvRI9LEtg-IjR0RW_iGri3O6YW-r4uYeTbIFnGaoFAoLSMKZfSYbToFCiFpZlZqYKeVxU8QB6KfjAN5qWM7jHjn9t-U8ATJEwhscaqxx5Eoo6Y_MOjgeFyhe3n9Sa/s1600-h/1.jpg" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEijQyOeR-hnzoDwDWUvvRI9LEtg-IjR0RW_iGri3O6YW-r4uYeTbIFnGaoFAoLSMKZfSYbToFCiFpZlZqYKeVxU8QB6KfjAN5qWM7jHjn9t-U8ATJEwhscaqxx5Eoo6Y_MOjgeFyhe3n9Sa/s320/1.jpg" /></a><br /></div>
這裡介紹VB中最利用簡單的語法調整物性,例如表單中有一個Command1和一個Text1,如果小小菜想按了按鈕後把Text1的內容改變的話,首先就在Command1上按連續兩下……<br />
<br />
<br />
<br />
<br />
<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiYYErGAqiWvW6q4ZjrWprvMDX-Wpt9-lQ5EMnVR3s1DYeuTNOuRnhqGuaWjPKNygMwI5MTRGDhIHrEZkGRcyIqMyAK34KtJWuWCG1vCnAVeqixRCTszjI4_U3gq5k4ghMnTcjLhaxou7b1/s1600-h/2.jpg" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiYYErGAqiWvW6q4ZjrWprvMDX-Wpt9-lQ5EMnVR3s1DYeuTNOuRnhqGuaWjPKNygMwI5MTRGDhIHrEZkGRcyIqMyAK34KtJWuWCG1vCnAVeqixRCTszjI4_U3gq5k4ghMnTcjLhaxou7b1/s320/2.jpg" /></a><br /></div>
就會出現 Project1 - Form1(程式碼)這個視窗,在Private Sub Command1_Click()與End Sub<br />
之間打上: <br />
Command1.Caption = "小小菜的按鈕"<br />
Text1.Text = "小小菜的欄位<br />
Form1.Caption = "小小菜的表單"<br />
打完後按F5執行……<br />
<br />
<br />
<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh2UipDbDMSJ97Noni8s7Hd0pb_Bc-7Z5O7b7sGh7v8bKGRKOj8LDomoTLR2wmdTvkWj5DBMN3sQhe-sPMB5nx2rd3x-G6gKL13qslXHS6kvtRTvzpcU_O1cH0He9HL4bzfy9kiwvzdvep2/s1600-h/3.jpg" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh2UipDbDMSJ97Noni8s7Hd0pb_Bc-7Z5O7b7sGh7v8bKGRKOj8LDomoTLR2wmdTvkWj5DBMN3sQhe-sPMB5nx2rd3x-G6gKL13qslXHS6kvtRTvzpcU_O1cH0He9HL4bzfy9kiwvzdvep2/s320/3.jpg" /></a><br /></div>
<br />
按下Command1之後,表單、按鈕的標題和欄位的內容都變更了!<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
Private Sub Command1_Click() 'Private Sub 代表私有化的副程式開始<br />
<br />
<br />
'Command1_Click()代表當Command1被按下時的事件<br />
<br />
Command1.Caption = "小小菜的按鈕" 'Command1.Caption代表Command1的標題( 把它改成小小菜的按鈕)<br />
<br />
Text1.Text = "小小菜的欄位" 'Text1.Text代表欄位的內容,最後Text1會變成小小菜的欄位<br />
<br />
Form1.Caption = "小小菜的表單" 'Form1.Caption代表Form1的標題( 把它改成小小菜的表單)<br />
<br />
End Sub<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-90858245705526595902009-12-10T18:31:00.000+08:002009-12-10T18:31:48.138+08:00編譯成*.exe檔案 如果用VB寫了一個檔案後如何能使用?每次都開啟VB執行嗎?當然不是~因為我們能把寫好的程式編制成*.exe應用程式,又快又方便!但是如何編譯呢?<br />
按檔案(F)->製成Project1.exe(K)...<br />
隨了*.exe之外,還可以編譯成*.scr (螢幕保護裝置檔)!因此您可以嘗試用VB製作私家螢幕保護裝置!<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-18303428330539314912009-12-10T17:44:00.000+08:002009-12-10T17:44:45.537+08:00使用快速鍵VB6.0常用快速鍵如下:<br />
<ul>
<li>貼上 :Ctrl + V </li>
<li>貼上連結 :Ctrl + K </li>
<li>複製 :Ctrl + C </li>
<li>剪下 :Ctrl + X </li>
<li>刪除 :Del </li>
<li>執行 :F5 </li>
<li>列出屬性或方法:Ctrl + J </li>
<li>瀏覽物件 :F2</li>
<li>搜尋文字 :Ctrl + F </li>
</ul>VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-81963338368012035792009-12-10T17:41:00.000+08:002009-12-10T17:41:48.498+08:00設定屬性<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjk-omBGHOFo043YLj-EZTQDOXhdMy31aF5HS5leHtpGr6HwZiNFxaREOgttfYY7kp7knthq0RQafQN4r9HNHc8czXbKIs2TAdOuAu2JmNAHGU1NmMoyhaHrysiY6EOZ637v658lQHcECzC/s1600-h/1.jpg" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjk-omBGHOFo043YLj-EZTQDOXhdMy31aF5HS5leHtpGr6HwZiNFxaREOgttfYY7kp7knthq0RQafQN4r9HNHc8czXbKIs2TAdOuAu2JmNAHGU1NmMoyhaHrysiY6EOZ637v658lQHcECzC/s320/1.jpg" /></a><br /></div>
在控制項、表單的單元中已經提到如何加入按鈕,但按鈕的標題是Command1,那麼如何把Command1改成"小小菜的按鈕"呢?<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi_HTw_JUulx51gNq2N-4rF52zfAUWaK5lNIBCTJnORotYhxQ91SD3z3vG1h8GTinjO3jJWYx6-EnTIcB4G1pBeeribveK5dWsM_Q9zIU6f6p_WWu7EvdTXX1lEqTX2aN2I2jzWrcv3_8rr/s1600-h/22.gif" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi_HTw_JUulx51gNq2N-4rF52zfAUWaK5lNIBCTJnORotYhxQ91SD3z3vG1h8GTinjO3jJWYx6-EnTIcB4G1pBeeribveK5dWsM_Q9zIU6f6p_WWu7EvdTXX1lEqTX2aN2I2jzWrcv3_8rr/s320/22.gif" /></a><br /></div>
首先按一下表單上的Command1,然後在屬性列的Caption改成“小小菜的按鈕”<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjzd8Hpmn-axNmAzMbTqZGAbN6lK_yA1V_nriHYPxidCPZF4Vetr-4E4A-rs2Yy-xEqIbMzy36KjmM7hUHyi1F4HGGc1GP1AgLdNyPmQZlGBOmwyEW9VypSRaq1PMwuUrGajASl3_SUGu74/s1600-h/3.jpg" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjzd8Hpmn-axNmAzMbTqZGAbN6lK_yA1V_nriHYPxidCPZF4Vetr-4E4A-rs2Yy-xEqIbMzy36KjmM7hUHyi1F4HGGc1GP1AgLdNyPmQZlGBOmwyEW9VypSRaq1PMwuUrGajASl3_SUGu74/s320/3.jpg" /></a><br /></div>
這時候原本的Command1成功變成了“小小菜的按鈕”了!其他的屬性則可以看看屬性列下面的詳盡解釋。<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-90553660790653182382009-12-10T17:38:00.000+08:002009-12-10T17:38:48.204+08:00VB控制項、表單<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi0-4kisqB-GLmeiEGrIkZ8V5u7vHuARaLqBbRITcpzdPxuG4kRCVYR2IdARcR7pMzOEyjb0lwvNxigo1FiMsgkjQtx425ancfk2a8_bhmXIL3Q164IYxlNMPwOLwkOuvsDzSPv_nhTYaXc/s1600-h/1.jpg" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi0-4kisqB-GLmeiEGrIkZ8V5u7vHuARaLqBbRITcpzdPxuG4kRCVYR2IdARcR7pMzOEyjb0lwvNxigo1FiMsgkjQtx425ancfk2a8_bhmXIL3Q164IYxlNMPwOLwkOuvsDzSPv_nhTYaXc/s320/1.jpg" /></a><br /></div>
當您一開始啟動VB的時候,您會見到畫面如左圖。最左邊的是工具箱,旁邊的是視窗叫作表單。表單就是您的程式介面設計地方,可以任意配置物件(即是控制項)如按鈕、下拉列等等……<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhbg6YO2GMBIb5UUSDYny1TbMSmfZ8CbLcD_briXb6jEsilNwpwAF69QZsGh3GRAIJA9iy3LlPy7HD3iGYhMc4lJlH0xzS4A5LOWMNdpVIWkdMBBLHl_CN2U-neBWHj-v6L3h8_Ji4xZt4C/s1600-h/2.jpg" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhbg6YO2GMBIb5UUSDYny1TbMSmfZ8CbLcD_briXb6jEsilNwpwAF69QZsGh3GRAIJA9iy3LlPy7HD3iGYhMc4lJlH0xzS4A5LOWMNdpVIWkdMBBLHl_CN2U-neBWHj-v6L3h8_Ji4xZt4C/s320/2.jpg" /></a><br /></div>
在工具箱按一個叫“CommandButton”的物件,然後在表單上按左鍵拖曳,就會出現一個按鈕了!而其他物件的加入方法都是一樣的。<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhNyaFaH8EJxFw7UevgVsZZkxgLWd-F5sj8BVSqKTJ4QJCwMtkH-ZaPIpdQyp0oCB0WaJHlH2pN0e7colVqIFKClhYB5wDc7Y4EKTY_xvha3Mi2rszEE1ggqKdCp87HUiJI1TBvxUw7OSWi/s1600-h/3.jpg" imageanchor="1" style="clear: left; cssfloat: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" ps="true" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhNyaFaH8EJxFw7UevgVsZZkxgLWd-F5sj8BVSqKTJ4QJCwMtkH-ZaPIpdQyp0oCB0WaJHlH2pN0e7colVqIFKClhYB5wDc7Y4EKTY_xvha3Mi2rszEE1ggqKdCp87HUiJI1TBvxUw7OSWi/s320/3.jpg" /></a><br /></div>
至於表單的大小也可以任意調整,只要把滑鼠移到表單邊緣拖延即可。<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-66146605870560689962009-12-06T11:26:00.003+08:002009-12-10T18:19:59.682+08:00VB ScriptVB的用途非常廣範的,除了程式應用方面,還可以用於網頁方面!如何用?就是利用VB Script了!以下站長會利用一些VB Script來教大家寫出互動的網頁效果!<br />
<u>請先檢查你的瀏覽器或防毒軟件有否禁止網頁使用VB Script,否則網頁內容可能無法執行。</u><br />
<ol>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/typing.htm">打字效果</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/times.html">九九乘數表</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/changephoto.html">圖片轉換範例</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/menu.html">模擬右鍵彈出選單</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/changehtml.html">HTML預覽工具</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/bs.html">隨機背景音樂</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/fullscreen.html">開啟全螢幕</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/windowbomb.html">VB Script視窗炸彈</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/clock.html">小時鐘範例</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbscript/display.html">會接疊的選單效果</a></li>
</ol>VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-61083387272959423932009-12-06T11:25:00.001+08:002009-12-10T18:19:18.882+08:00API實戰<b>系統</b><a href="http://www.blogger.com/" id="system" name="system"></a><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getlang.html">如何取得電腦的語系?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/wmclose.html">如何關閉其他程式?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getversionex.html">得知電腦的系統</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/GetImeName.html">取得電腦內裝有的輸入法名稱</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/ChIme.html">如何轉換輸入法</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/enumwindow.html">如何能知道某一應用程式是否被執行</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/closewin.html">如何叫出「關閉 Windows」的視窗?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/shutdown9x.shtml">Win9x(95/98/Me)關機方法</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/acctimer.html">更準確的Timer</a></li>
</ul>
<b>繒圖</b><a href="http://www.blogger.com/" id="gdi" name="gdi"></a><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/printscreen.html">Print Screen的三個方法</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/patse.html">透明貼圖的方法解說</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getword.html">取得Microsoft Word影像的方法</a></li>
</ul>
<b>網絡</b><a href="http://www.blogger.com/" id="network" name="network"></a><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/isConnected.html">如何偵測電腦是否已上網</a></li>
</ul>
<b>視窗處理</b><a href="http://www.blogger.com/" id="window" name="window"></a><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/Topmost.html">如何使表單永遠保持在畫面的最上層</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/gettext.html">移動Mouse後,如何得知Form上某個物件?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/noform.html">表單不見了,控制項還在</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getpath.html">如何得知某視窗的路徑?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/gettrayrect.html">如何取得工作列的寬度及高度?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/gethwnd.html">得知視窗hWnd的方法</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getlink.html">利用EnumWindow取得瀏覽器網址的範例</a></li>
</ul>
<b>滑鼠鍵盤</b><a href="http://www.blogger.com/" id="input" name="input"></a><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/blockinput.html">如何封鎖鍵盤及滑鼠</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/mousekeyevents.html">如何控制滑鼠和鍵盤自動按鍵?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getstart.html">如何偵察滑鼠是否按下了開始鍵?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/mousestate.html">如何取得滑鼠在表單外時的狀態</a></li>
</ul>
<b>多媒體</b><a href="http://www.blogger.com/" id="multimedia" name="multimedia"></a><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/loopplaysong.html">用 mciSendString PI函數怎樣一直重複撥放?</a></li>
</ul>
<b>其他</b><a href="http://www.blogger.com/" id="other" name="other"></a><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/shellandwait.html">如何像微調精靈一樣按次序執行程式?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/exwin.html">如何將TextBox的內容放在「開始 -> 執行」的視窗內?</a></li>
</ul>VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-67878145958290443562009-12-06T11:23:00.003+08:002009-12-10T18:20:11.720+08:00自製函數<ol>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/ChangeIME.html">ChangeIME -轉換輸入法</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/wordcount.html">WordCount -計算string內的字數(不是字元數)</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/bin.html">Bin - 將十進制轉成二進制的二個方法</a> <span style="color: red;">感謝網友神行者提供!</span></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/hex2rgb.html">十六進制顏色轉成RGB顏色</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/ubin.html">UBin - 將二進制轉成十進制</a> <span style="color: red;">感謝網友神行者提供!</span></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/delay.html">等待延遲函數-Delay</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/getapppathname.html">找出正確的目前檔案路徑-GetAppPathName</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/hittest.html">判斷物件有沒有相撞-HitTest</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/getrandomnumber.html">亂數取得函數-GetRandomNumber</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/selffunction/isundivnum.html">找出數值是否為質數-IsUnDivNum</a></li>
</ol>VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-9338923066158264902009-12-06T11:21:00.006+08:002009-12-15T16:31:22.713+08:00VB基本教學這裡主要教您如何正確使用VB,適合初學者。<br />
<ul>
<li><a href="http://vbexample.blogspot.com/2009/12/vb_10.html">控制項、表單</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/blog-post_10.html">設定屬性</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/blog-post_9850.html">使用快速鍵</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/exe.html">編譯成*.exe檔案</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/blog-post_6480.html">利用程式碼改變物件屬性</a></li>
</ul>
<b>變數、陣列<a href="http://www.blogger.com/" name="var"></a></b><br />
<ul>
<li><a href="http://vbexample.blogspot.com/2009/12/type.html">Type</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/option.html">Option</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/dim.html">Dim</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/static.html">Static</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/const.html">Const</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/blog-post_15.html">一維陣列</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/blog-post_2965.html">二維陣列</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/redim.html">ReDim</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/blog-post_8976.html">某張表單的變數如何傳到另一張表單?</a></li>
<li><a href="http://vbexample.blogspot.com/2009/12/blog-post_9905.html">怎樣得知控制項陣列有多少個元素?</a></li>
</ul>
<b>運算法<a href="http://www.blogger.com/" id="operator" name="operator"></a></b><br />
<ul>
<li><a href="http://vbexample.blogspot.com/2009/12/xor.html">Xor 運算法</a></li>
</ul>
<b>敘述句<a href="http://www.blogger.com/" name="statement"></a></b><br />
<span style="color: black;">VB是建基於Basic語法的,因此也如一般語法,有一些敘述如句If、Case、Do... Loop、For等等……以下為大家介紹 一些常用的敘述句</span><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/vbif.html">IF 敘述句</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/vbselectcase.html">Select Case 敘述句</a></li>
</ul>
<b>迴圈敘述</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/vbfor.html">For 敘述句</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/vbdoloop.html">Do ... Loop 敘述句</a></li>
</ul>
<b>控制項<a href="http://www.blogger.com/" name="control"></a></b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/pic.html#xy">如何取得PictureBox、Image的XY軸</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/pic.html#piccls">如何把PictureBox內的圖片弄走</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/pic.html#havepic">如何判斷PictureBox、Image內有沒有圖片</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/ChgPicture.html">滑鼠移過PictureBox時轉換圖片</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/label.html#linklabel">超連結效果</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/label.html#labelbottun">利用Label製作按鈕</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/textbox.htm#readfile">TextBox讀檔功能</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/textbox.htm#savefile">TextBox存檔功能</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/sltxt.html">如何讀取及寫入文字檔?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/getline.html">如何得知TextBox共有多少行?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/listfile.html">如何列出檔案到ListBox?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/moveobj.html">如何使物件可以用滑鼠拖曳移動?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/dropicon.html">如何開啟從外面拖圖示到程式內執行?</a></li>
</ul>
<b>視窗處理<a href="http://www.blogger.com/" name="window"></a></b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/checkform.html">如何防止視窗出界?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/nore.html">如何使按了X按鈕沒有反應</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/closeprogram.html">真正地關閉程式</a></li>
</ul>
<b>資料庫<a href="http://www.blogger.com/" name="db"></a></b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/mysql.html">如何在VB連接Mysql</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/access.html">如何在VB連接Access</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/txtdb.html">純文字資料庫的格式選擇</a></li>
</ul>
<b>小秘訣<a href="http://www.blogger.com/" name="tips"></a></b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/shutdownxp.html">WinXP簡易關機方法</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/e-mail.html">如何製作E-mail連結</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/checksetup.html">如何檢查程式是否已經安裝和安裝的目錄在那裡?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/vbcrlf.html">如何隔行?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/weblink.html">如何用VB製作超連結?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/rnd.html">如何取得不重覆的亂數?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/hex2rgb.html">如何將十六進制顏色轉成RGB?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/listfont.html">如何列出所有字型?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/ischi.html">怎麼知道字串是不是中文?</a></li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/beginer/AppPrevInst.html">如何防止程式被重複執行</a></li>
</ul>VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-9116539169466000842009-12-06T11:18:00.004+08:002009-12-10T18:20:38.936+08:00VB函數沒有了函數,就算有敘述句也不能運作,因為VB不會做動作,因此如果要令VB隨自己意思運作的話,函數就是我要下的命令了。<br />以下的函數用A-Z排列,並列明用途,方便網友查閱:<br />
<b>A:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/asc.html">Asc</a> :將字元轉成字元碼</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbabs.html">Abs</a> :絕對值的運算</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtan.html">Atn</a> :數學函數 Tan<sup>-1</sup></li>
</ul>
<b>B:</b><br />
<ul>
<li>暫時沒有,歡迎各網友提供!</li>
</ul>
<b>C:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/command.html">Command/Command$</a> :取得開啟檔案時的參數</li>
<li>Circle :畫圓函數</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/asc.html">Chr</a> :將字元碼轉成字元</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtan.html">Cos</a> :數學函數 Cos</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/cxxx.html">CInt、CLng、CBool、CByte、CDate、CDbl、CCur、CSng、CStr</a> :形態轉換函數</li>
</ul>
<b>D:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbday.html">Day</a> :時間函數-取得日</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbday.html">Date</a> :時間函數-取得日期</li>
</ul>
<b>E:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/end.html">End</a> :強制關閉程式</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/exit.html">Exit</a> :中途離開某敘述、副程式</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vblogexp.html">Exp</a> :數學函數-指數</li>
</ul>
<b>F:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbfixint.html">Fix</a> :除去小數位</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/format.html">Format</a> :改變某運算式的格式</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/kill.html">FileCopy</a> :複製檔案</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/filelen.html">FileLen</a> :取得檔案長度</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/filedatetime.html">FileDateTime</a> :取得檔案的日期和時間</li>
</ul>
<b>G:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/getattr.html">GetAttr</a> :改變檔案屬性</li>
</ul>
<b>H:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtime.html">Hour</a> :時間函數-小時</li>
</ul>
<b>I:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/isnum.html">IsNumeric、IsArray、IsDate、IsEmpty</a> :判斷函數</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/input.html">InputBox</a> :呼叫輸入資料視窗</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbinstr.html">InStr、InStrRev</a> :尋找特定字串</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbfixint.html">Int</a> :除去小數位</li>
</ul>
<b>J:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbjoin.html">Join</a> :合拼陣列的宇串</li>
</ul>
<b>K:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/kill.html">Kill</a> :刪除檔案</li>
</ul>
<b>L:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbleft.html">Left</a> :取得左邊的字元</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/trim.html">LTrim</a> :刪除左邊的空白字元</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vblen.html">Len</a> :取得字元的數目</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vblogexp.html">Loc</a> :傳回開啟檔案中目前的讀寫位置</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vblogexp.html">Log</a> :數學函數-對數</li>
<li>LBound :判斷陣列的下限</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/ucase.html">LCase</a> :將英文字轉換成小階</li>
</ul>
<b>M:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbday.html">Mouth</a> :時間函數-月份</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtime.html">Minute</a> :時間函數-分</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbmonthname.html">MonthName</a> :時間函數-取得月份名</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbmid.html">Mid</a> :取得中間的字元</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/msgbox.html">MsgBox</a> :呼叫對話視窗</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/mdir.html">MkDir</a> :製作資料夾</li>
</ul>
<b>N:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbnow.html">Now</a> :傳回目前的系統日期及時間</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/name.html">Name</a> :更名函數(可以用來複製檔案)</li>
</ul>
<b>O:</b><br />
<ul>
<li>暫時沒有,歡迎各網友提供!</li>
</ul>
<b>P:</b><br />
<ul>
<li>PaintPicture :繪圖函數-貼圖</li>
</ul>
<b>Q:</b><br />
<ul>
<li>暫時沒有,歡迎各網友提供!</li>
</ul>
<b>R:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/replace.html">Replace</a>︰取代字串</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbright.html">Right</a> :取得右邊的字元</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/trim.html">RTrim</a> :刪除右邊的空白字元</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbrnd.html">Rnd</a> :取得亂數</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/mdir.html">RmDir</a> :刪除某一資料夾</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/randomize.html">Randomize</a> :初始化亂數產生器</li>
</ul>
<b>S:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtime.html">Second</a> :時間函數-秒</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/seek.html">Seek</a> ︰傳回開啟檔案中目前的讀寫位置(函數)/設定檔案中目前的讀寫位置(敘述)</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbstrreverse.html">StrReverse</a> :反轉字串</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbsplit.html">Split</a> :字串分成陣列</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/space.html">Space</a> :隔空白字元</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbabs.html">Sgn</a> :數學函數-符號函數</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbsqr.html">Sqr</a> :數學函數-二次方</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/getattr.html">SetAttr</a> :改變檔案屬性</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtan.html">Sin</a> :數學函數-Sin</li>
<li>Shell :執行其他程式</li>
<li>String :複製字串</li>
</ul>
<b>T:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtan.html">Tan</a> :數學函數-Tan</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/trim.html">Trim</a> :刪除左右兩邊的空白字元</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtime.html">Time</a> :取得時間</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbtimer.html">Timer</a> :傳回由午夜到現在的秒數</li>
</ul>
<b>U:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/ucase.html">UCase</a> :將英文字轉換成大階</li>
<li>Unload :將表單或控制項載出記憶</li>
<li>UBound :判斷陣列的上限</li>
</ul>
<b>V:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/val.html">Val</a> :傳回字串中所含有的數字</li>
</ul>
<b>W:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbmonthname.html">WeekdayName</a> :取得日子名</li>
</ul>
<b>X-Z:</b><br />
<ul>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/vbfunction/vbday.html">Year</a> :時間函數-年</li>
</ul>
<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-68793124797507648392009-12-06T11:08:00.005+08:002009-12-10T18:21:59.080+08:00API字典<strong>A-B</strong><br>
<ol>
<li>AngleArc :填入角度,並在某一DC裡畫出圓形</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/arc.html">Arc</a> :在某一DC裡畫出弧形</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/bitblt.html">BitBlt</a> :貼圖到某一DC(無法縮放影像)</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/blockinput.html">BlockInput</a> :封鎖鍵盤及滑鼠</li>
</ol>
<strong>C</strong><br>
<ol>
<li>ChangeDisplaySettings :設定螢幕的解像度及顏色</li>
<li>CHOOSECOLOR :叫出選擇顏色的對話視窗</li>
<li>CHOOSEFONT :叫出選擇字型的對話視窗</li>
<li>Chord :在某一DC裡畫出一個弦</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/clipcursor.html">ClipCursor</a> :限制滑鼠的移動範圍</li>
<li>CopyFile :複製檔案(沒有工作進度視窗)</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/createcompatiblebitmap.html">CreateCompatibleBitmap</a> :建立相容性Bitmap</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/createcompatibledc.html">CreateCompatibleDC</a> :從記憶記製作出一個新的DC,並傳回hDC</li>
<li>CreateDirectory :製作資料夾</li>
<li>CreateEllipticRgn :製作橢圓形的hRgn(表單的形狀)</li>
<li>CreateFont :製作出一個新的字型風格(大小、粗幼、出字的角度、斜體、底線及刪除線等)</li>
<li>CreateHatchBrush :製作出板模刷子(FillStyle)</li>
<li>CreatePatternBrush :製作出圖刷物件</li>
<li>CreatePolygonRgn :製作多邊形的hRgn(表單的形狀)</li>
<li>CreateRectRgn :製作長方形的hRgn(表單的形狀)</li>
<li>CreateRoundRectRgn :製作圓角形的hRgn(表單的形狀)</li>
</ol>
<b>D-F</b><br>
<ol>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/deletedc.html">DeleteDC</a> :清除用完的記憶體DC</li>
<li>DeleteFile :刪除檔案(沒有工作進度視窗)</li>
<li>DeleteObject :清除一個已製作的物件(e.g.: hBmp, hRgn, hIcon…)</li>
<li>DestroyCursor :移除儲存在記憶體裡的圖示</li>
<li>DoFileDownload :叫出下載檔案的視窗</li>
<li>Ellipse :在某一DC中裡出一個弧形</li>
<li>EnableWindow :使用家無法控制某一視窗或物件(xx.Enabled = False)</li>
<li>EnumDisplaySettings :列舉出螢幕可支援的解像度及顏色設定</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/enumwindows.html">EnumWindows</a> :列舉出正在執行的的視窗的hWnd值</li>
<li>ExitWindowsDialog :叫出“關閉Windows”的視窗</li>
<li>ExitWindowsEx :關機、重新開機及登出電腦</li>
<li>ExitWindowsMsgBox :叫出關機及重新開的的MessageBox</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/findwindow.html">FindWindow</a> :利用物件或視窗的Caption或ClassName取得其hWnd值</li>
<li>FindWindowEx :利用母表單的hWnd值取得其下物件的hWnd值</li>
<li>FlashWindow :使視窗標題列閃爍</li>
<li>FloodFill :在一封閉區裡填上顏色</li>
</ol>
<b>G</b><br ><ol>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getasynckeystate.html">GetAsyncKeyState</a> :取得鍵盤或滑鼠按鍵的訊息</li>
<li>GetClassName :取得視窗視窗或物件的ClassName</li>
<li>GetComputerName :取得電腦名稱</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getcursorpos.html">GetCursorPos</a> :取得滑鼠在螢幕上的座標</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getdc.html">GetDC</a> :取得某視窗的hDC值(不包括視窗的工作區)</li>
<li>GetDeviceCaps :取得螢幕顏色、寬度和高度等設定</li>
<li>GetDiskFreeSpaceEx :取得硬碟空間的資訊</li>
<li>GetFileAttributes :取得檔案的屬性設定</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getforegroundwindow.html">GetForegroundWindow</a> :取得正在得到駐點的視窗的hWnd值</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getobject.html">GetObject</a> :取得圖片的大小及其位元數</li>
<li>GetOpenFileName :叫出開啟檔案的對話視窗</li>
<li>GetPixel :取得某一座標在DC裡顏色的數值</li>
<li>GetSaveFileName :叫出儲存檔案的對話視窗</li>
<li>GetShortPathName :取得短路徑</li>
<li>GetSystemDirectory :取得System目錄路徑</li>
<li>GetSystemMetrics :取得系統的各種料如取得螢幕大小、電腦開機模式(正常還是安全模式)或邊界粗幼等</li>
<li>GetTempPath :取得Temp目錄路徑</li>
<li>GetTickCount :取得開機到現在的時間</li>
<li>GetUserDefaultLangID :取得系統的地區及語言選項的ID</li>
<li>GetUserName :取得用定名稱(登入的名稱)</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getversionex.html">GetVersionEx</a> :取得電腦作業系統的版本資訊及系統名稱</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getdc.html">GetWindowDC</a> :取得某視窗的hDC值(包括視窗的工作區)</li>
<li>GetWindowLong :取得某一視窗的結構及屬性</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getwindowrect.htm">GetWindowRect</a> :取得視窗的寬度及高度及其座標</li>
<li>GetWindowsDirectory :取得Windows目錄路徑</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/getwindowtext.html">GetWindowText</a> :設定視窗的標題(Caption)或TextBox內的Text等</li>
<li>GlobalMemoryStatus :取得記憶體的資訊</li>
</ol>
<br />
<b>I-K</b><br>
<ol>
<li>InternetGetConnectedState取得連線的狀態</li>
<li>IsIconic :判斷視窗是否為最小化</li>
<li>IsWindowVisible :判斷視窗是否隱藏</li>
<li>IsZoomed :判斷視窗是否為最大化</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/isConnected.html">InternetGetConnectedState</a> :偵測電腦是否已上網</li>
<li>keybd_event :模擬鍵盤按鍵</li>
</ol>
<strong>L-P</strong>
<br >
<ol>
<li>LineTo :在某一DC裡畫直線</li>
<li>LoadCursor :載入圖示</li>
<li>LoadCursorFromFile :從檔案載入圖示</li>
<li>LockWindowUpdate :停止視窗更新</li>
<li>mciSendString :操作多媒體,可播放各類型的音樂、視訊檔及操作CD機</li>
<li>mouse_event :模擬滑鼠移動及按鍵</li>
<li>MoveFile :移動檔案(沒有工作進度視窗)</li>
<li>MoveToEx :設定某一DC開始畫圖的位置</li>
<li>PageSetupDlg :叫出設定列印版面的對話視窗</li>
<li>PaintDesktop :取得桌面的圖案</li>
<li>Pie :在某一DC裡畫出扇形</li>
<li>PolyBezier :在某一DC裡畫出貝茲曲線</li>
<li>Polygon :在某一DC裡畫出多邊形</li>
<li>PrintWindow :取得視窗圖案</li>
</ol>
<strong>R</strong><br>
<ol>
<li>RasEnumConnections :列舉出連線的項目</li>
<li>RasGetConnectStatus :取得連線項目的狀態</li>
<li>Rectangle :在某一DC裡畫出長方形</li>
<li>RegCloseKey :關閉已開啟了的登錄</li>
<li>RegCreateKey :建立一個新的登錄</li>
<li>RegDeleteKey :刪除登錄</li>
<li>RegEnumValue :列舉出登錄的機碼</li>
<li>RegOpenKey :開啟登錄</li>
<li>RegQueryValueEx :取得登錄機碼的內容</li>
<li>RegSetValueEx :設定登錄機碼的內容</li>
<li>ReleaseCapture :使系統在指定視窗停止接收滑鼠的各項訊息</li>
<li>ReleaseDC :釋放利用GetDC或GetWindowDC取得某視窗hDC所佔的資源</li>
<li>RoundRect :在某一DC裡畫出圖角形</li>
<li>RunDialog :叫出執行視窗</li>
</ol>
<b>S</b><br>
<ol>
<li>SelectObject :使DC和某一物件建立關聯</li>
<li>SendMessage :傳送及接收Windows的各種訊息,做出的功能包括:取得***密碼、關閉視窗、叫出“關閉Windows”的視窗、移動沒有標題列的視窗、剪下、貼上、複製、復原功能、使ListBox擁有Horizontal Scroll Bar、啟動螢幕保護裝置及其他等等……</li>
<li>SetComputerName :設定電腦名稱</li>
<li>SetCursorPos :設定滑鼠在螢幕上的座標</li>
<li>SetFileAttributes :設定檔案的屬性</li>
<li>SetForegroundWindow :從值入hWnd值設定得到駐點的視窗</li>
<li>SetLayeredWindowAttributes設定視窗透明度及去除表單中不須要的顏色(製作不規則表單)</li>
<li>SetParent :設定視窗或物件的母表單</li>
<li>SetPixel :設定某一座標在DC裡顏色的數值</li>
<li>SetTextColor :設定某一DC字的顏色</li>
<li>SetWindowLong :設定某一視窗的結構及屬性</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/Topmost.html">SetWindowPos</a> :設定視窗的座標位置、寬度、高度及它的顯示方式(如最上層顯示等)</li>
<li>SetWindowRgn :將hRgn套用到表單(設定表單的形狀)</li>
<li>SetWindowText :設定視窗、TextBox等的標題或內容</li>
<li>SHBrowseForFolder :叫出瀏覽資料夾的視窗</li>
<li>Shell_NotifyIcon :在工作列建立一個小圖示,及接收該圖示的訊息</li>
<li>ShellAbout :叫出關於視窗</li>
<li>ShellExecute :執行某一檔案</li>
<li>SHEmptyRecycleBin :自動清洗資源回收筒</li>
<li>SHFileOperation :叫出複製、刪除、移動檔案的視窗</li>
<li>SHGetSpecialFolderPath :取得特殊目錄的路徑(如我的最愛、我的文作夾等)</li>
<li>ShowWindow :使視窗最大化、最小化、顯示隱藏、浮現等</li>
<li>sndPlaySound :播放.wav音效檔案</li>
<li>StretchBlt :貼圖到某一DC(能夠縮放影像)</li>
<li>SystemParametersInfo :設定或取得系統的設定(如設定桌面、設定工作區及停用Ctrl+Alt+Del組合鍵等)</li>
</ol>
<strong>T-W</strong><br>
<ol>
<li>TextOut :在某一DC裡印出文字</li>
<li>TransparentBlt :在某一DC裡作透明貼圖(能夠縮放影像)</li>
<li>UpdateWindow :強行刷新視窗</li>
<li>VerLanguageName :從GetUserDefaultLangID取得的ID轉化成語言及地區選項的名稱</li>
<li><a href="http://www.eng.uwaterloo.ca/~kwlau/api/gethwnd.html#window">WindowFromPoint</a> :從座標取得視窗或物件的hWnd值</li>
</ol>VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-62794885446082049982009-12-02T20:12:00.009+08:002009-12-02T20:18:59.536+08:00實用類<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh3YxiAZEM3L98HVuKcJzumQcFRnIqQEnEt8eOX-aU0c5DQX_mL_34SIXFsDYmJSLuSb7aiM04LClr81WpCMuliu0X1p1C11OlulBDAxnTVaIpRXOUNfx2LC23v2mzaOOTwSIS3XgP8ezC2/s1600-h/wordpro.jpg" imageanchor="1" style="clear: right; float: right; margin-bottom: 1em; margin-left: 1em;"></a>
<span style="font-size: medium;"><div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh3YxiAZEM3L98HVuKcJzumQcFRnIqQEnEt8eOX-aU0c5DQX_mL_34SIXFsDYmJSLuSb7aiM04LClr81WpCMuliu0X1p1C11OlulBDAxnTVaIpRXOUNfx2LC23v2mzaOOTwSIS3XgP8ezC2/s1600/wordpro.jpg" imageanchor="1" style="clear: right; float: right; margin-bottom: 1em; margin-left: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh3YxiAZEM3L98HVuKcJzumQcFRnIqQEnEt8eOX-aU0c5DQX_mL_34SIXFsDYmJSLuSb7aiM04LClr81WpCMuliu0X1p1C11OlulBDAxnTVaIpRXOUNfx2LC23v2mzaOOTwSIS3XgP8ezC2/s320/wordpro.jpg" /></a><br /></div>
<ul>
<li><span style="font-weight: bold;"><a href="http://www.eng.uwaterloo.ca/~kwlau/program/vbexe/wordpro.zip">Wordpro v4.0</a><br /><span style="font-size: medium; font-weight: normal;">作者:Dictbene<br />檔案大小:39.3KB<br />簡介:可以用它處理字串,有各樣不同的效果</span></span></li>
</ul>
<div>
<br />
</div>
<div>
<span style="font-size: medium;"><br /></span><br />
</div>
<div>
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiFNYxul2M3JGWqaJfHxp5lhf7ut5p3qholcYM_Lvq-QGOjzCEo3hUnooojE9bLCcaCG8x5KtqMN2zlZuelxZg7BGlVfP5ujUYpBPii6IXmBAAahgEo3REd0IYs4mPcjkMzamurD91MVPdB/s1600-h/aclock.jpg" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiFNYxul2M3JGWqaJfHxp5lhf7ut5p3qholcYM_Lvq-QGOjzCEo3hUnooojE9bLCcaCG8x5KtqMN2zlZuelxZg7BGlVfP5ujUYpBPii6IXmBAAahgEo3REd0IYs4mPcjkMzamurD91MVPdB/s320/aclock.jpg" /></a><br />
<ul>
<li><span style="font-weight: bold;"><a href="http://www.eng.uwaterloo.ca/~kwlau/program/vbexe/aclock.zip">鬧鐘</a></span></li>
</ul>
<span style="font-size: medium;"></span><br />
<span style="font-size: medium;"></span><br />
<span style="font-size: medium;"><div style="text-align: left;">
<b><span style="font-size: medium;"><span style="font-size: medium; font-weight: normal;">作者:Dictbene<br />檔案大小:8.96KB<br />簡介:定時會響鬧提醒你</span></span></b><br />
<br />
<br />
<br />
</div>
<ul><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgkJH12eZvexw5zYhOqZ1JmjB1kYfEknFM9xblrQX18T6qiguKe-sDIF5vkUrVNRbG4LUgYblurXWQ0md8lmoQB5sHc7Jw3G2ocg0wMidMQ1dyjUu84As-rDIR6AJj5mTN-hSYoxbISAb5N/s1600-h/runex.jpg" imageanchor="1" style="clear: right; float: right; margin-bottom: 1em; margin-left: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgkJH12eZvexw5zYhOqZ1JmjB1kYfEknFM9xblrQX18T6qiguKe-sDIF5vkUrVNRbG4LUgYblurXWQ0md8lmoQB5sHc7Jw3G2ocg0wMidMQ1dyjUu84As-rDIR6AJj5mTN-hSYoxbISAb5N/s320/runex.jpg" /></a>
<li><b><span style="font-size: medium;"><a href="http://www.eng.uwaterloo.ca/~kwlau/program/vbexe/runex.zip">順序執行器</a><br /><span style="font-size: medium; font-weight: normal;">作者:Dictbene@Thomson<br />檔案大小:16.8KB<br />簡介:自行設定要執行的檔案或要開啟的網頁,然後按一個鍵便會自動執行</span></span></b></li>
</ul>
<div>
<br />
</div>
<div>
<br />
</div>
<div>
<br />
</div>
<div>
<br />
</div>
<div>
<br />
<br />
</div>
<div>
<ul><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEioNzmATmGx_3qVtTyVHDmw5yrya0p6jRxqhq5ShoYPfyl7O3d6apIxanAs1vXQxVExiA3DuaUET8GVNiz7iXpeBkTZBOeSWWjGVHj2ONsdr44VgYgFqVs9Gg4_KvnoXfL1YfBloHMuAAcD/s1600-h/visualmouse.jpg" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEioNzmATmGx_3qVtTyVHDmw5yrya0p6jRxqhq5ShoYPfyl7O3d6apIxanAs1vXQxVExiA3DuaUET8GVNiz7iXpeBkTZBOeSWWjGVHj2ONsdr44VgYgFqVs9Gg4_KvnoXfL1YfBloHMuAAcD/s320/visualmouse.jpg" /></a>
<li><b><span style="font-size: medium;"><a href="http://www.eng.uwaterloo.ca/~kwlau/program/vbexe/visualmouse.zip">虛擬滑鼠</a><br /><span style="font-size: medium; font-weight: normal;">作者:Dictbene<br />檔案大小:6.10KB<br />簡介:在沒有滑鼠的情況下可虛擬出滑鼠使用,按制方法見說明</span></span></b></li>
</ul>
<br />
<br />
</div>
<ul><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgM5om_kjbazkwGylubOLLQ_i5NiSR9me2DzM7z_obtmt9JtiYDgYt61_j7toJi9O2sJwUBCHXrSmpzX-0Qy3VMsJUZkt2w7glVmszdvmgMiylslYP6HFAkT3QkWNz4IZdSRSGuxYEwLHTm/s1600-h/rgngen.jpg" imageanchor="1" style="clear: right; float: right; margin-bottom: 1em; margin-left: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgM5om_kjbazkwGylubOLLQ_i5NiSR9me2DzM7z_obtmt9JtiYDgYt61_j7toJi9O2sJwUBCHXrSmpzX-0Qy3VMsJUZkt2w7glVmszdvmgMiylslYP6HFAkT3QkWNz4IZdSRSGuxYEwLHTm/s320/rgngen.jpg" /></a>
<li><b><span style="font-size: medium;"><a href="http://www.eng.uwaterloo.ca/~kwlau/program/vbexe/rgngen.zip">表單切割程式製作工具</a><br /><span style="font-size: medium; font-weight: normal;">作者:Dictbene<br />檔案大小:11.1KB<br />簡介:用於VB6編程,切割表單時的輔助工具</span></span></b></li>
</ul>
</span><span style="font-size: medium;"><br />
<br />
</span><br />
</div>
</span><br />
<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0tag:blogger.com,1999:blog-3999198944989761568.post-55750592237181317772009-12-02T20:05:00.001+08:002009-12-02T20:06:31.225+08:00遊戲類<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh1fmuk1vu5DVWeOeD5wdQTLYSnto7MCyWpax15oS2fCmqkqc_SwuBNTTN7c-IDI3njka9VnVsHKJ5fdojNMOu5tirgMAvq-oCc9v-UvyKaOT5QahEy7Ar2fxj2IFDXg-eyJWC3UvipqDkU/s1600-h/screendestroy.jpg" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh1fmuk1vu5DVWeOeD5wdQTLYSnto7MCyWpax15oS2fCmqkqc_SwuBNTTN7c-IDI3njka9VnVsHKJ5fdojNMOu5tirgMAvq-oCc9v-UvyKaOT5QahEy7Ar2fxj2IFDXg-eyJWC3UvipqDkU/s320/screendestroy.jpg" /></a><br /></div>
<ul>
<li style="text-align: left;"><span style="font-size: large;"><b><a href="http://www.eng.uwaterloo.ca/~kwlau/program/vbexe/screendestroy.zip">螢幕大報復</a><br /><span style="font-size: medium; font-weight: normal;">作者:藍兆<br />檔案大小:166KB<br />簡介:提供用不同的方法直接在螢幕上塗鴉</span></b></span></li>
</ul>
<div style="text-align: left;">
<br />
</div>
<div style="text-align: left;">
<br />
</div>
<div style="text-align: left;">
<br />
</div>
<div style="text-align: left;">
<ul><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjqusM-QtTNl_UX8mlZYUHt6xBLeMtM5P8wHu5SQN7JyESKmvsQy2R-3xfkfgOcNm3LOhhhz6r346-e75clkdQqlqkOu7_NoxA8HFqhD4FBzLr0Mlj5Okt-T1X4adhXY8aOJT3RHXPlIuPV/s1600-h/dog.jpg" imageanchor="1" style="clear: right; float: right; margin-bottom: 1em; margin-left: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjqusM-QtTNl_UX8mlZYUHt6xBLeMtM5P8wHu5SQN7JyESKmvsQy2R-3xfkfgOcNm3LOhhhz6r346-e75clkdQqlqkOu7_NoxA8HFqhD4FBzLr0Mlj5Okt-T1X4adhXY8aOJT3RHXPlIuPV/s320/dog.jpg" /></a>
<li><b><span style="font-size: medium;"><a href="http://www.eng.uwaterloo.ca/~kwlau/program/vbexe/dog.zip">小狗闖天涯</a><br /><span style="font-size: medium; font-weight: normal;">作者:Dictbene<br />檔案大小:49KB<br />簡介:執行後會有一隻小狗在螢幕上通處跑</span></span></b></li>
</ul>
</div>
<br />VB範例網http://www.blogger.com/profile/13483175495163586825noreply@blogger.com0