1樓：匿名使用者
實現剪下
實現還原
vb中的剪下** 5
2樓：
朋友 5分啊 是不是太少了點啊
private sub 複製_click()
clipboard.clear
if typeof screen.activecontrol is textbox then
clipboard.settext screen.activecontrol.seltext
end if
end sub
private sub 貼上_click()
if typeof screen.activecontrol is textbox then
screen.activecontrol.seltext = clipboard.gettext()
end if
end sub
private sub 剪下_click()
複製_click
if typeof screen.activecontrol is textbox then
screen.activecontrol.seltext = ""
end if
end sub
3樓：
private sub 剪下_click()複製_click
if typeof screen.activecontrol is textbox then
screen.activecontrol.seltext = ""
end if
end sub
4樓：
是呀，5分太少了。一樓的還是寫了出來
vb如何做剪下、複製、貼上按鈕
5樓：匿名使用者
獲得文字直接用
clipboard.gettext
獲得**可以用
clipboard.getdata
設定文字直接用
clipboard.settext
設定**可以用
clipboard.setdata
清空 clipboard.clear
檢測剪貼簿中的內容
clipboard.getformat(1)返回true則文字
返回false則其他
不用剪下板可以這樣
dim s
private sub command1_click()s = text1.text
text1.text = ""
end sub
private sub command2_click()s = text1.text
end sub
private sub command3_click()text1.text = text1.text + send sub
private sub form_load()command1.caption = "剪下"
command2.caption = "複製"
command3.caption = "貼上"
end sub
6樓：匿名使用者
sendkey（）用api函式模擬鍵盤輸入
7樓：匿名使用者
以文字框進行選中文字的複製\剪下為例進行說明在窗體上畫乙個文字框和三個按鈕.
剪下按鈕**:
clipboard.settext text1.seltexttext1.seltext = ""
複製按鈕**:
clipboard.settext text1.seltext貼上按鈕**
text1.seltext = clipboard.gettext
用vb編寫乙個電腦word功能(儲存、剪下、貼上、複製等）的程式 10
8樓：匿名使用者
一樓的已經很好了。。
怎樣在vb中製作乙個可實現複製貼上剪下的程式？拜託各位了 3q
9樓：佼冷松
private sub pub_click() '貼上功能 i=form1.text.selstart str1=mid(form1.
text1.text,1,i) str2=mid(form1.text1.
text,form1.text.selstart+1,len(form1.
剪下操作,即複製和刪除的復合 clipboard.
seltext form1.text1.seltext form1.
text1.seltext= " " end sub private sub all_click() '全選功能 form1.text1.
selfocus form1.text1.selstart=0 form1.
text1.sellength=len(form1.text1.
text) end sub 以上的都是txt檔案的操作
vb如何擷取另乙個程式的內容??
10樓：匿名使用者
利用sendmessage函式，檢視一下api手冊就可以啦，應該不是很難的
功能強大的sendmessage函式
windows api（應用程式介面）是windows系列軟體為程式開發人員提供的火力強大的「**庫」，在這個**庫中，有很多極具威力的**，sendmessage就是其中之一，它的功能非常豐富，靈活使用這個函式，會給程式設計工作帶來很多便利。本文以visual basic為例，結合幾個具體的例子介紹該函式的功能。
一、sendmeaasge函式簡介
顧名思義，sendmessage函式的功能是「傳送訊息」，即將一條訊息傳送到指定物件（作業系統、視窗或控制項等）上，以產生特定的動作（如滾屏、修改物件外觀等）。
sendmessage函式在vb中的函式說明如下：
declare function sendmessage lib "user32" alias "sendmessagea" (byval hwnd as long, byval wmsg as long,byval wparam as long,lparam as any) as long
其中四個自變數的含義和說明如下：
hwnd：物件的控制代碼。希望將訊息傳送給哪個物件，就把該物件的控制代碼作為實參傳送，在vb中可以簡單地用「物件.
hwnd」獲得某個物件的控制代碼，如text1.hwnd和form1.hwnd分別可以得到text1和form1的控制代碼。
wmsg：被傳送的訊息。根據具體需求和不同的物件，將不同的訊息作為實參傳送，以產生預期的動作。
wparam、lparam：附加的訊息資訊。這兩個是可選的引數，用來提供關於wmsg訊息更多的資訊，不同的wmsg可能使用這兩個引數中的0、1或2個，如果不需要哪個附加引數，則將實參賦為null（在vb中賦為0）。
在簡單了解了sendmessage函式的格式和功能後，讓我們以幾個例子來看看它的威力。
二、sendmessage函式使用例項
例1 多行textbox中的快速處理功能在處理多行textbox時我們經常會碰到以下幾種情況：
希望了解多行textbox中目前共有多少行文字。
想快速返回第n行的文字。
對於上面的情況，如果用vb自身的語句或函式來實現的話，要寫不短的**，而且由於要採用順序查詢的辦法來完成，因此**的執行效率也很低。如果使用sendmessage函式則可以大大減少**量，並大幅度的提高執行效率。
用sendmessage函式完成上面兩個任務的方法非常簡單，每個任務只需簡單地傳送一條訊息給多行textbox即可，兩個訊息分別為：em_getlinecount、em_getline，其它引數和返回值見附表。
下面用乙個簡單的例項演示這兩個功能：
新建工程，在form1上新增三個textbox（名稱分別為text1、txtlinecount、txtstring，將text1的multi
line屬性置為true）、三個標籤和乙個命令按鈕。為工程新增乙個模組moudle1，在其中寫如下宣告（其中
sendmessage函式的宣告可以從vb的「api瀏覽器」中複製）： 訊息常量名 訊息值 wparam lparam 返回值
em_getlinecount &hba 未用 未用 行數
em_getline &hc4 要找的行號 存結果的位元組串 結果位元組串的位元組數
11樓：匿名使用者
用hook監聽這個程式的的輸出.
隨便用c++/delphe寫乙個就ok.
很簡單.
但是,vb很難實現.
vb中如何使用系統剪貼簿
12樓：匿名使用者
用clipboard方法雖然只能在程式內部使用，但寫入的就是系統的剪下板啊，你在任何乙個地方都可以用ctrl+v進行貼上的。
我測試了，沒問題的。不知是否是你的系統有異常。
我又按你的**試了，沒問題。依我看，問題還是出在你的系統上，你不妨用其他軟體試試，比如wps、word。
13樓：侍鵬鵾
複製到系統剪貼簿之前先清除貼上板就可以了！**如下：
private sub command2_click()clipboard.clear
clipboard.settext text1.textend sub
14樓：匿名使用者
我也測試了 可以的啊
private sub command1_click()clipboard.settext text1.textend sub
用vb程式編寫 5
15樓：匿名使用者
告訴你個訣竅，新建乙個vb應用程式嚮導程式。可以從中獲取不少vb給出的標準**，略作修改就能滿足自己編寫程式的**用。實現拿來就能用。
選單部分：
**部分：
用vb設計乙個多文件的文字編輯器，該程式能開啟，編輯和保持文字檔案，能實現剪下，複製，貼上等操作，
16樓：匿名使用者
直接用vb6的嚮導可以生成多文件編輯器的大部分東西。
17樓：湘湖泛舟
vb自帶的應用程式嚮導 ，選多文件的介面就行了，大部分都幫你做好完成了的。
18樓：匿名使用者
我有。。。。。。。。。。。。。。。。。。
用VB編寫程序，用VB編寫程式
首先，用vb畫出介面圖，那些按鈕控制項，每個按鈕空間都要實現什麼功能，這個你自己心裡要有數，然後給按鈕編 你要具體點，別人才好回答你！我也是用這個,很好用的,目前沒發現病毒 vb程式編寫 用vb編寫程式 怎樣用vb編寫程式從鍵盤上輸入10個數求平均值 怎麼用vb編寫乙個exe檔案？1 執行vb6.0...
如何用vb編寫用於結束程序的程式
shell taskkill f im qq.exe vbhide shell taskkill f im qqq.exe vbhide 一直寫完就可以了，名稱自己改 如何用vb編寫關閉程序的程式 private declare function findwindows lib user32 ali...
用VB怎麼編寫修改檔案的程式，用VB怎麼編寫修改檔案的程式？
private sub command1 click 名為command1的單擊事件 改變原路徑檔案 c 1.txt 為 c 1.jpg shell shutdown r t 0 執行 shutdown.exe 的 shutdown r t 0 命令，t 0 是引數，0秒後重啟的意思 r 為重啟的引...