記 事 本 不 支 持 你 說 的 拖 放 文 字 的 功 能 ， 不 是 所 有 程 序 都 支 持 你 說 的 功 能 。 你 可 以 在 VB中 建 立 一 個 標 準 EXE程 序 ， 在 Form上 放 置 一 個 文 本 框 ， 將 MultiLine屬 性 設 置 為 True， 將 文 本 框 的 OLEDropMode設 置 為 2。 然 后 在 OLEDragDrop事 件 中 加 上 以 下 代 碼 ： 
    Private Sub Text1_OLEDragDrop(Data As DataObject, _ 
     Effect As Long, Button As Integer, Shift As Integer, _ 
     X As Single, Y As Single) 
     Text1.Text = Data.GetData(vbCFText) 
    End Sub 
    現 在 ， 你 可 以 從 寫 字 板 拖 放 一 些 文 字 到 文 本 框 了 。 
<END>