VB點樣可以將TEXT1同TEXT2交換 用功式

硝酸 網友所言甚是，以下程式碼確實可行：

Dim TmpData As String
TmpData = Text1.Text
Text1.Text = Text2.Text
Text2.Text = TmpData

另外可以用ZeroMemory來清除TmpData的資料

2008-03-15 13:12:59 補充：
感謝garlic2010的意見
有關ZeroMemory的資訊，可參看：
http://tw.myblog.yahoo.com/cyrex4000/article?mid=633
而ZeroMemory的作用只是把TmpData的資料在記憶體區塊中置零/清空而已。

2008-03-15 13:14:14 補充：
您說：
TmpData 只是個 local variable，當TmpData 在內的 procedure 行完後，TmpData 便不再存在記憶中，何用清除 TmpData﹖
答：
確實，不清除TmpData對程式的運作無大影響。
但是，閣下所述：“TmpData 便不再存在記憶中”本人則希望作一個解釋：

2008-03-15 13:14:18 補充：
部分原程式碼：

TmpData = Text1.Text ’<<<<<<<<注意此行

然後，加一句：
MsgBox TmpData
結果，彈出的訊息視窗仍然是Text1.Text（原來）的資料。這證明了TmpData仍存在於記憶體中。
很多程式也會以保安理由將資料加密，當資料無用時，ZeroMemory API是個安全可靠的資料清除解決方案。

請問 centralfishdie 甚麽 是ZeroMemory﹖TmpData 只是個 local variable，當TmpData 在內的 procedure 行完後，TmpData 便不再存在記憶中，何用清除 TmpData﹖

2008-03-15 04:32:40 補充：
請問樓主交換用是甚麽意思﹖

Private Sub Form_Load()
Dim TmpData As String
TmpData = Text1.Text
Text1.Text = Text2.Text
Text2.Text = TmpData
End Sub