vb.net textbox1選中的文本，拖放到textbox2？

很久沒有上這里了，今天看到了這個問題，嘗試做了一個；

在薊州等地區(qū)，都構(gòu)建了全面的區(qū)域性戰(zhàn)略布局，加強發(fā)展的系統(tǒng)性、市場前瞻性、產(chǎn)品創(chuàng)新能力，以專注、極致的服務(wù)理念，為客戶提供成都網(wǎng)站設(shè)計、做網(wǎng)站 網(wǎng)站設(shè)計制作定制設(shè)計,公司網(wǎng)站建設(shè),企業(yè)網(wǎng)站建設(shè),成都品牌網(wǎng)站建設(shè),營銷型網(wǎng)站,外貿(mào)營銷網(wǎng)站建設(shè),薊州網(wǎng)站建設(shè)費用合理。

本例以源文本框TextBox1全部文字作為拖放文字為例，實現(xiàn)拖放

1、向一個窗體中添加兩個文本框，分別名為TextBox1，TextBox2。注意：把TextBox2控件的AllowDrop屬性設(shè)置成True，這點不要遺漏。

2、完整的代碼如下：

Public Class Form1

Private MouseIsDown As Boolean = False

Private Sub TextBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TextBox1.MouseDown

'設(shè)置一個標志以顯示鼠標已按下。

MouseIsDown = True

End Sub

Private Sub TextBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TextBox1.MouseMove

If MouseIsDown Then

'開始拖動（將TextBox1的文本內(nèi)容作為拖放內(nèi)容）。

TextBox1.DoDragDrop(TextBox1.Text, DragDropEffects.Copy)

End If

MouseIsDown = False

End Sub

Private Sub TextBox2_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox2.DragEnter

'檢查正在被拖放的數(shù)據(jù)的格式。

If (e.Data.GetDataPresent(DataFormats.Text)) Then

'顯示復(fù)制光標（表示是拖放行為）。

e.Effect = DragDropEffects.Copy

Else

'顯示不放置光標（表示不是拖放行為）。

e.Effect = DragDropEffects.None

End If

End Sub

Private Sub TextBox2_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox2.DragDrop

'粘貼文本（將拖放內(nèi)容作為TextBox2的文本內(nèi)容）。

TextBox2.Text = e.Data.GetData(DataFormats.Text)

End Sub

End Class

如何用vb.net 打開一個既存的txt文檔。

可以調(diào)用CMD

方法一：

Shell("cmd.exe?/c?call?c:\新建文本文檔.txt",?AppWinStyle.NormalFocus)

缺點：不但會打開文本文件，同時還會顯示一個cmd窗體。

方法二：

需要新建一個bat文件到資源里，輸入start C:\新建文本文檔.txt

代碼

shell?"bat文件的路徑.bat"

這樣就好了，兩種方法各有好壞。一個會顯示cmd窗體，一個需要bat文件。

vb.net怎么實現(xiàn)讀取指定WORD文檔中的內(nèi)容

添加spire.doc.dll為引用，在vb.net中讀取指定word文檔的內(nèi)容到?txt文件，代碼示例如下：

'加載Word文檔

Dim doc As Document = New Documentdocument.LoadFromFile("測試文檔.docx")

'使用GetText方法獲取文檔中的所有文本

Dim s As String = doc.GetText

File.WriteAllText("文本1.txt", s.ToString)

VB.net 讀取文本文件？

1、實現(xiàn)上傳按鈕方法代碼。

2、判斷圖片對象是否為空代碼。

3、取得數(shù)據(jù)庫字段 dt.Rows(0)("Pic")方法代碼。

4、字節(jié)數(shù)組轉(zhuǎn)換為Image類型方法代碼。

5、處理SQL中操作Image類型方法代碼。

6、實現(xiàn)的上傳結(jié)果。

標題名稱：vb.net操作文本,vb文件讀寫
URL地址：http://chinadenli.net/article25/dsigeci.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供面包屑導(dǎo)航、品牌網(wǎng)站制作、外貿(mào)建站、網(wǎng)站內(nèi)鏈、微信公眾號、Google

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)