Text 屬性範例 這個範例用來說明 Text 屬性。若想測試此範例,請將程式碼貼到包含三個 TextBox 控制項和一個 CommandButton 控制項的表單的宣告區塊,然後按 F5 鍵執行並且在 Text1 中輸入文字。 Private Sub Text1_Change () Text2.Text = LCase(Text1.Text) ' 以小寫顯示文字。 Text3.Text = UCase(Text1.Text) ' 以大寫顯示文字。End SubPrivate Sub Command1_Click () ' 刪除文字。 Text1.Text = ""End Sub