差異處

這裏顯示兩個版本的差異處。

--- visual_basic_dot_net [2024/04/15 08:54]
don [String 字串]
+++ visual_basic_dot_net [2024/04/15 09:13] (目前版本)
don [String 字串]
@@ 行 135: / 行 135: @@
 ===== String 字串 =====
 Integer HEX 轉成字串
+<code>
 Dim val As String
 val = "10"
@@ 行 144: / 行 145: @@
 Dim commandList(50) As Byte
 Dim command As String
+</code>
+字串是String資料型態的變數或字串值，字串是0或多個依序的Char資料型態的字元，\\
+以雙引號括起的文字內容，如下所示：
-字串是String資料型態的變數或字串值，字串是0或多個依序的Char資料型態的字元，以雙引號括起的文字內容，如下所示：
+<code>Dim str As String ="Visual Basic 2010程式設計" </code>
-Dim str As String ="Visual Basic 2010程式設計"
 或
-Dim str1 As String
+<code>
+Dim str1 As String
 str1 = "Visual Basic 2010程式設計"
-字串長度與大小寫轉換
+</code>
-函數可以取得字串長度、進行英文字母大小寫轉換和刪除頭尾的空白字元，如下表所示：
+字串長度與大小寫轉換 \\
+函數可以取得字串長度、進行英文字母大小寫轉換和刪除頭尾的空白字元，如下表所示：\\
 ^函數	^說明 ^
@@ 行 174: / 行 178: @@
 範例練習 :\\
-Dim a, b, c As String\\
+<code>
+Dim a, b, c As String
-        a = "1234567.abc"\\
+a = "1234567.abc"
-        b = "98766.abcd"\\
+b = "98766.abcd"
-        MsgBox("LEFT : " & Microsoft.VisualBasic.Left(a, 3))\\
-        MsgBox("Right : " & Microsoft.VisualBasic.Right(a, 3))\\
-        MsgBox("Mid : " & Microsoft.VisualBasic.Mid(a, 4, 3))\\
-        MsgBox("Len : " & Microsoft.VisualBasic.Len(a))\\
+MsgBox("LEFT : " & Microsoft.VisualBasic.Left(a, 3))
+MsgBox("Right : " & Microsoft.VisualBasic.Right(a, 3))
+MsgBox("Mid : " & Microsoft.VisualBasic.Mid(a, 4, 3))
+MsgBox("Len : " & Microsoft.VisualBasic.Len(a))
+</code>
 InStr函數，傳回在某字串中一字串的最先出現位置，傳回0表示沒有找到，我們可以利用它來判斷字串中是否有關鍵字存在。\\
@@ 行 222: / 行 227: @@
 範例：str=Lcase("Taiwan")
 結果：taiwan
 Ucase：將字串中的小寫字母變成大寫。
@@ 行 272: / 行 276: @@
 .NET Framework：比較字串\\
-http://msdn.microsoft.com/zh-tw/library/fbh501kz(VS.80).aspx\\
+[[http://msdn.microsoft.com/zh-tw/library/fbh501kz(VS.80).aspx]]\\
 String.Compare：比較兩個字串的值。傳回整數值。\\
 String.CompareOrdinal：比較兩個字串，不管本地文化特性。傳回整數值。\\
@@ 行 282: / 行 286: @@
 String.LastIndexOf：從您正在檢查的字串結尾開始，傳回字元或字串的索引位置。傳回整數值。\\
-字串處理範例：\\
-http://msdn.microsoft.com/zh-t矮w/library/ms228364%28VS.80%29.aspx\\
- 常用C#字串處理函數\\
-http://msdn.microsoft.com/zh-tw/library/system.string_methods%28VS.80%29.aspx\\
 ^名稱	^說明 ^
@@ 行 355: / 行 355: @@
 String.PadLeft(2,"0") : 將字串長度不足2位，左邊補 0
 </code>
+===== 副程序 =====
+Sub 程序 : 此種程序不會傳回值\\
+Function 程序 : 此種程序會傳回值，Function 也可稱為函式\\
+Event 程序 : 此種程序不會傳回值。\\
+Property 程序 : 此種程序用來傳回和設定物件的屬性。\\
+<code>
+[Private | Public] Sub 程序名稱 ([引數串列])
+	[程式區段]
+	[Exit Sub]
+	[Return]
+End Sub
+</code>
+如何呼叫\\
+Call 程序名稱([引數串列]) or  \\
+程序名稱([引數串列])\\
+<code>
+[Private | Public] Function函式名稱 ([引數串列]) [As 資料型別]
+	[程式區段]
+	函式名稱 = 運算式 或 (Return 運算式)
+	[Exit Function]
+End Function
+</code>
+返回參數\\
+函式名稱 = username  or Return = Username\\
+如何呼叫\\
+變數名稱 = 函式名稱 ([引數串列])\\
+參數\\
+<code>
+GetWelcome(ByVal username As String , ByVal ismale As Boolean) As String
+GetWelcome(ByRef username As String , ByRef ismale As Boolean) As String
+</code>
+程序引數可選擇性\\
+Sub 程序名稱 (…………, Optional ByVal 引數 As 資料型別= 預設值, ……… ])\\
+<code>
+Function mult(ByVal x1 As Integer, ByVal x2 As Integer, Optional ByVal x3 As Integer=0) As Integer
+</code>
+如果沒有傳遞第三個引數則以0替代\\
+傳遞陣列\\
+呼叫敘述 inverse(arrayname1)   實引數不需加小括號\\
+被呼叫程序 Sub inverse(ByVal arrayname2() As Integer)   虛引數須加小括號\\
+如果想要到整個程式結束變數才被釋放 則可以使用靜態變數\\
+''Static AAA As Integer =10''\\
+''Property ……….. End Property''\\
+程序引數可選擇性\\
+<code>
+Sub 程序名稱(………, optional ByVal 引數 As 資料型別=預設值, ………)
+	程式區段
+End Sub
+</code>
+若傳遞引數具有選擇性，可使用 Optional 來宣告，被宣告成選擇性的引數，\\
+必須指定資料型別及預設值，而且其後的引數也必須為選擇性參數。\\

Don Wiki

使用者工具

網站工具

差異處

頁面工具