VB中怎樣在picturebox中輸入文字

2022-03-15 13:30:57 字數 4804 閱讀 3482

1樓:匿名使用者

簡單的實現方法:在picturebox中加入一個label控制元件,利用這個label顯示文字。將label背景設定為透明,所顯示的文字不會影響畫面。

具體實現方法如下:

(1)在窗體form1上佈置一個picturebox,將一個label拖入到picturebox內。再在窗體上佈置一個textbox

(2)窗體**

option explicit

private sub form_load()label1.caption = ""

text1.text = ""

end sub

private sub text1_change()label1.caption = text1.textend sub

(3)執行效果

2樓:匿名使用者

vb6.0中使用函式功能,可實現在vb的picture圖中寫文字,且字號及字型顏色可按要求改變,**如下:

option explicit

dim xx, yy as integer

dim fnt as long

dim txt as string

dim colvb as string

dim wp as variant

public function xp(colvb as variant, xx as variant, yy as variant, fnt as variant, txt as variant)

picture1.forecolor = colvb 'qbcolor(14)

picture1.currentx = xx

picture1.currenty = yy

picture1.fontsize = fnt

picture1.print txt '

end function

private sub form_load()

picture1.autoredraw = true

xx = 500

yy = 500

fnt = 24

colvb = vbred

txt = "這是vb對picture**框的**上寫字的演示"

wp = xp(colvb, xx, yy, fnt, txt)

xx = 500

yy = 2500

fnt = 48

colvb = vbgreen

txt = "字號調大的演示"

下有演示工程檔案:

pictureprint.rar

3樓:匿名使用者

picture1.print:picture1.print "vb中怎樣在picturebox 中輸入文字"

4樓:

麻煩,直接放進去一個label就行了。

怎麼在vb裡picturebox中輸出文字到特定位置

5樓:匿名使用者

picture1.currentx = 0 『水平座標picture1.currenty = 0』垂直座標picture1.

fontsize = 20 『字型大小picture1.print "hello word" '輸出文字

6樓:匿名使用者

大家都沒注意兩個跟文字尺寸有關的方法

textheight 返回字串高度

textwidth 返回字串寬度

指定位置 n 為中心線輸出文字

currenty=n-textheight(text)/2print text

7樓:淡月殘緣_董蒙

設定currentx和currenty的值為中心即可!

scale只是規定了個繪圖的範圍和那個沒關係,至於字號和大小隻是說法不同,你可以設定成x號字也可以設定成n磅字,也就是四號字或14磅都一樣的。

8樓:

文字大小是靠改picturebox的fontsize屬性你的scale能控制的只是位置吧?

picture1.currentx = 0 『水平座標picture1.currenty = 0 』垂直座標picture1.

fontsize = 20 『字型大小picture1.print "hello word"

vb中怎麼讓picturebox輸出多行文字

9樓:小俊七七

想要讓picturebox輸出多行文字,可以反覆使用print方法在picturebox控制元件中輸出多行文字,在插入的文字中輸入回車符(即chr(13))即可,每一個print語句右面是一行的內容。

此外,在需要換行的地方加上「 & vbcrlf & 」**也是可以實現讓picturebox輸出多行文字的。

擴充套件資料

picturebox 控制元件和 data 控制元件是唯一可以放置在 mdi窗體內部區域的標準 visual basic 控制元件。可以使用該控制元件在內部區域的頂部或底部對控制元件分組,以建立工具欄或狀態列。

注意 unisys corporation 有一項專利,該專利聲稱涉及到 gif-lzw壓縮技術的某些方面,在該技術中使用了 picturebox 和 image 控制元件。microsoft corporation 於2023年9月獲得了對 unisys lzw 專利的使用許可。

然而,microsoft 的許可證並不延伸到那些軟體開發商或第三方,他們使用任何 microsoft 工具包、語言開發或作業系統產品來在他們自己的產品中提供 gif 讀/寫和/或任何其他 lzw 能力(例如,通過 dll 和 api)。

10樓:匿名使用者

vb可多次使用print方法在picturebox控制元件中輸出多行文字。vb也可將長文字插入回車符 (chr(13)),通過print方法在picturebox控制元件中輸出多行文字。

為了在窗體或**框上顯示文字,應使用 print 方法,將該窗體或**框的名稱加在它的前面即可。為了把輸出文字傳送到印表機上,應使用 printer 物件上的 print 方法。

在指定位置顯示 print 輸出

用以下的一種或兩種方法,指定繪圖座標,就可以控制 print 輸出的位置:

1.使用 cls(清屏)方法來清除窗體和或**框,同時把繪圖座標恢復到原點(0,0)。

2.使用 currentx 和 currenty 屬性,設定繪圖座標。

**事例:

private sub form_click()

picture1.currentx = 100 '水平座標

picture1.currenty = 50 '垂直座標

picture1.fontsize = 20 '字型大小

picture1.print "hello word" '輸出文字

picture1.currentx = 100 '水平座標

picture1.currenty = 450 '垂直座標

picture1.print "若該處已有文字和圖形,則所列印的任何" & vbcr & "新文字將顯示在它們的頂部。" '輸出文字

end sub

11樓:匿名使用者

方法有二:

法一:多次執行print語句,每一個print語句右面是一行的內容。

法二:在需要換行的地方加上「 & vbcrlf & 」。例如我要輸出「

歡迎使用!

microsoft windows

」則語句為

picture1.print "歡迎使用!" & vbcrlf & "microsoft windows"

vb.net中怎麼在picturebox控制元件上顯示文字?

12樓:匿名使用者

currentx=100 'x座標

currenty=120 'y座標

picture1.print "我就是文字"

13樓:匿名使用者

vb中怎麼能使picturebox 裡顯示文字???

14樓:匿名使用者

最簡單 使用控制元件的print方法就可以了 例如如picture1.print "文字",但是控制不了文字的位置

最好是使用api函式textout

方法 textout 控制代碼,x,y,文字,長度(英文1個漢字2個)例如 textout picture1.hdc,0,0,"文字",4

15樓:

用print方法

picture1.print "內容"

如果想在picturebox裝入記憶體的時候顯示,則需要設定picturebox的autoredraw的屬性為true。

16樓:匿名使用者

picture1.print "這樣就能在picturebox裡顯示文字了"

17樓:匿名使用者

picture1.print "文字"

18樓:匿名使用者

直接使用 picture1.print 就可以了

19樓:匿名使用者

放個label上去就是了。可以設定大小和位置,難道你要儲存?

vb中if巢狀語句,在VB中如何簡化過多巢狀的if語句?

if 條件為真 then 執行語句 end if 判斷結束 if a 3 then if b 2 then if c 7 then if d 8 then 以上條件都成立的時候執行下邊一段話 執行 並結束這個判斷 假如d 5,則執行下邊的 else 執行 end if 這裡是結束d 8 這個條件的 ...

在vb中min是什麼型別的變數,vb中變數有哪些型別?

1 vb6支援的資料型別,以及儲存空間大小與範圍 資料型別 儲存空間大小 範圍 byte 1 個位元組 0 到 255 boolean 2 個位元組 true 或 false integer 2 個位元組 32,768 到 32,767 long 長整型 4 個位元組 2,147,483,648 到...

請教在vb中如何判斷null值,vb上如何判斷空值

哈哈抄,給你說啊vb裡的東西有點襲奇怪,如果它是null的,那麼你直接用 就可以判斷了也就是說你可以這樣寫 if sss then end if 不信你可以試 注意,如果sss的型別是數值型別的,就是等於0而不是null vb 裡不象vc有null 這個值但是他有 vbnullstring 一樣可以...