visualbasic程式設(shè)計-展示頁
2025-07-26 18:42本頁面
【正文】 大寫字串 :UCase(字串 ) ? UCase(“AnB123”)?“ANB123” 計算字串長度 :Len(型別 ) ? Len(“123”)=3 計算空間 :LenB(字串 ) Dim A As Integer A=123 Print Len(A) 2 練習(xí)時，函式的頭尾請自行加入 4 字串函數(shù) (cont’d) 子字串搜尋： ? InStr([搜尋的位置 ],字串 1,字串 2[,比較法 ]) ? 傳回字串 2在字串 1出現(xiàn)的位置 ?找不到則傳回 0 ? InStr(“abcdecd”,”cd”)?3 ? InStr(4,“abcdecd”,”cd”)?6 ? 比較法 : ?vbBinaryCompare?分大小寫 ?vbTextCompare?不分大小寫 5 字串函數(shù) (cont’d) ? 使用比較法時， 起始位置要輸入 ? InStr(1,“abcd”,“Cd”,vbBinaryCompare)?0 ? InStr(1,“abcd”,“Cd”,vbTextCompare)?3 擷取子字串 :Mid(字串 ,起始位置 [,長度 ]) ? Mid(“test test”,6)?”test” ? Mid(“test test”,6,3)?”tes” 6 字串函數(shù) (cont’d) 從左邊取子字串 :Left(字串 ,長度 ) ? Left(“test1 test2”,5)?“test1” 從右邊取子字串 :Right(字串 ,長度 ) ? Right(“test1 test2”,5)?“test2” 去除左右空白字元 :Trim(字串 ) ? Trim(“ test ”)?“test” LTrim(), RTrim() 7 字串函數(shù) (cont’d) 8 解答 Private Sub Form_Click() Dim name, lastname, firstname As String Dim position As Integer Do name = InputBox(“請輸入姓名 :姓 ,名” , _ 注意 , 黃 ,俊龍 ) name = Trim(name) posit
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1