用vb如何編寫剪下和還原程序,用vb如何編寫剪下和還原程式

時間 2022-09-13 23:40:09

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 為重啟的引...