vb6 0程式設計問題,求解答

2022-09-05 19:30:16 字數 1336 閱讀 1345

1樓:環業軟體

w.paintpicture pic.picture, i, j, pic.scalewidth, pic.scaleheight

pic.scalewidth , pic.scaleheight

??????????????????對嗎?

nexy j--------->>>>next拼寫錯誤

for j = 0 to w.height step pic.scaleheight

for i = 0 to w.height step pic.scalewidth 兩個都是to w.height ?

private sub fullpic(w as object, pic as picturebox)

'定義變數

dim i as integer, j as integer

dim x as integer

'平鋪圖形,利用雙迴圈語句

for j = 0 to w.height step pic.scaleheight

for i = 0 to w.width step pic.scalewidth

w.paintpicture pic.picture, i, j, pic.scalewidth, pic.scaleheight

next i

next j

end sub

2樓:

private sub fullpic(w as object, pic as picturebox)

'定義變數

dim i as integer, j as integer

dim x as integer

'平鋪圖形,利用雙迴圈語句

for j = 0 to w.scaleheight step pic.scaleheight

for i = 0 to w.scalewidth step pic.scalewidth

w.paintpicture pic.picture, i, j, pic.

scalewidth, pic.scaleheight, 0, 0, pic.scalewidth, pic.

scaleheight

next i

next j

end sub

private sub form_paint()

call fullpic(me, picture1) '列印**

end sub

3樓:匿名使用者

第九行 pic.scalewidth , pic.scaleheight去掉

第十一行 next j

VB 6 0過程問題

public sub jisuan x,y as integer z x y end sub private sub form click jisuan 5,6 print z end sub z定義有問題吧,在過程之外定義,或者定義公有變數。函式的話應該是 private sub form cli...

VB6 0中如何設定延時

private sub form load dim x x shell notepad.exe vbnormalfocus sendkeys 這是一個文字檔案的測試程式.true 模擬輸入英文字串 sendkeys true 兩次回車 waittime 2 延時 2 秒 sendkeys 自動輸入文...

vB6 0裡面的name屬性和caption屬性有什麼區別啊

簡單的說,name是給電腦看的。所以我們使用控制元件時,需要告訴電腦name的值 caption是給人看的,所以我們在顯示名稱給軟體使用者時,用的是caption的值 vb中物件name屬性與caption屬性有何區別 name屬性是一個控制元件 的物件名稱,是每個控制元件都必需有的,是對一個控制元...