在VB中,控制項的Stretch屬性設定為時,影象框可自動改變大小以適應其中的圖形

2021-03-28 19:36:49 字數 2378 閱讀 4798

1樓:網海1書生

題目錯了吧?應該是 stretch屬性設定為true時,圖形可自動改變大小以適應影象框控制項

而**框(注意不是影象框)的autosize屬性設為true時,**框可自動改變大小以適應其中的**。

2樓:九羅

那個最佳答案啊,你想一想,題目沒錯!

影象框image的stretch屬性預設為false

在vb中,控制項的stretch屬性設定為(false )時,影象框可自動改變大小以適應其中的圖形.

在vb中,控制項的stretch屬性設定為( true)時,圖形可自動改變大小以適應影象框控制項.

**框picturebox的autosize屬性預設為false

picturebox的autosize屬性為false時,**框裡的**按實際大小顯示,超過**框大小的部分會被裁切。

picturebox的autosize屬性設為true時,**框可自動改變大小以適應其中的**。

專門找個vb環境除錯了一下,所以其他人的所有答案作廢吧,不要誤人子弟!!!

3樓:大當家

這個答案是false時,影象框自動改變大小以適應其中的圖形大小。

當stretch屬性值為true時,載入到影象框的圖形可以自動調整尺寸以適應影象框的大小。

4樓:匿名使用者

stretch 屬性 返回或設定乙個值,該值用來指定乙個圖形是否要調整大小,以適應與 image 控制項的大小。語法object.stretch [= boolean]stretch 屬性的語法包含下面部分:

部分描述object物件表示式,其值是「應用於」列表中的乙個物件。boolean乙個用來指定是否要調整圖形的大小的布林表示式,按照設定值的描述。

設定值boolean 的設定值為:設定值描述true表示圖形要調整大小以與控制項相適合。false(預設值)表示控制項要調整大小以與圖形相適。

說明如果 stretch 被設定為 true,那麼,控制項大小的調整使得它所包含的圖形的大小也要調整。 stretch 屬性示例 本例從乙個圖示目錄將乙個箭頭圖示裝入 image 控制項。當 stretch 屬性設定為 true 時,該箭頭將緩慢地移過窗體,而當 stretch 屬性設定為 false 時,該箭頭將跳躍式通過窗體。

要試用此例,先將下面的**貼上到包含乙個 image 控制項、乙個 checkbox 控制項、以及乙個 timer 控制項的窗體的宣告部分,然後按 f5 鍵 並單擊該窗體。應確認圖示目錄所在的路徑,必要時可以改變。單擊 checkbox,然後再次單擊窗體,就可以看到 stretch 屬性的影響。

dim imgw ' 宣告變數。 private sub form_load () ' 將圖示裝入 image 控制項。 image1.

picture = loadpicture("icons\arrows\arw02rt.ico") image1.left = 0 ' 將圖象移動到左部邊界處。

imgw = image1.width ' 儲存圖象的寬度。 timer1.

interval = 300 timer1.enabled = false ' 關閉計時器。 check1.

caption = "stretch property" end sub private sub form_click () timer1.enabled = true ' 開啟計時器。 end sub private sub timer1_timer () static moveicon as integer ' 移**標的標誌。

if not moveicon then image1.move image1.left + imgw, image1.

top, imgw * 2 else ' 移**象並使它返回原來的寬度。 image1.move image1.

left + imgw, image1.top, imgw end if ' 如果圖象在窗體的邊界之外,那麼將導致結束。 if image1.

left > scalewidth then image1.left = 0 timer1.enabled = false end if moveicon = not moveicon ' 復位標誌。

end sub private sub check1_click () image1.stretch = check1.value end sub

5樓:匿名使用者

true

這個很簡單啊

6樓:匿名使用者

該題應將srtretch屬性設定為false,而有一句與其極為類似的話為將autosie的屬性設定為true時,**框可以自動改變大小以適應其中的的**,這兩句的混淆點在**和圖形不一樣

VB中label控制項中的文字怎麼「垂直居中「呀

在vb中如text和label控制項是沒有垂直居中功能的,但是可以變通就是給文字加空行。加乙個 text1 乙個 mand1 636f707962616964757a686964616f31333337396235 dim aa as string,i as integer,jj as intege...

求VB動態填加刪除控制項原始碼,vb中如何動態新增刪除控制項

窗體上新增乙個picture控制項,name屬性設為pic,index屬性設為0 初始化picture private sub form load pic 0 left pic 0 width addpic movepic 1,0 end sub 新增按鈕 private sub command1 ...

怎麼樣在VB中隱藏滑鼠,怎麼樣在VB中隱藏滑鼠?

windows中的api函式showcursor提供了一種簡單的隱藏滑鼠的辦法。showcursor的申明如下 private declare function showcursor lib user32 byval bshow as long as long 當你讓bshow為0的時候,滑鼠指標消...