❶ VB如何動態創建圖片Dim pic As Image 然後怎麼寫
'用PaintPicture方法
目標控制項.PaintPicture Me.Picture, 0, 0
用法參見MSDN
PaintPicture 方法
用以在 Form, PictureBox 或 Printer 上繪制圖形文件(.bmp、.wmf、.emf、.cur、.ico或 .dib)的內容。不支持命名參數。
語法
object.PaintPicture picture, x1, y1, width1, height1, x2, y2, width2, height2, opcode
PaintPicture 方法的語法包含下列部分:
部分 描述
object 可選的。一個對象表達式,其值為「應用於」列表中的一個對象。如果省略 object,帶有焦點的 Form 對象預設為 object。
Picture 必需的。要繪制到 object 上的圖形源。Form 或 PictureBox 必須是 Picture 屬性。
x1, y1 必需的。均為單精度值,指定在 object 上繪制 picture 的目標坐標(x-軸和y-軸)。object 的 ScaleMode 屬性決定使用的度量單位。
Width1 可選的。單精度值,指示 picture 的目標寬度。object 的 ScaleMode 屬性決定使用的度量單位。如果目標寬度比源寬度 (width2) 大或小,將適當地拉伸或壓縮 picture。如果該參數省略,則使用源寬度。
Height1 可選的。 單精度值,指示 picture 的目標高度。object 的 ScaleMode 屬性決定使用的度量單位。如果目標高度比源高度 (height2) 大或小,將適當地拉伸或壓縮 picture。如果該參數省略,則使用源高度。
x2, y2 可選的。均為單精度值,指示 picture 內剪貼區的坐標(x-軸和y-軸)。object 的 ScaleMode 屬性決定使用的度量單位。如果該參數省略,則預設為 0。
Width2 可選的。單精度值,指示 picture 內剪貼區的源寬度。object 的 ScaleMode 屬性決定使用的度量單位。如果該參數省略,則使用整個源寬度。
Height2 可選的。 單精度值,指示 picture 內剪貼區的源高度。object 的 ScaleMode 屬性決定使用的度量單位。如果該參數省略,則使用整個源高度。
Opcode 可選的。是長型值或僅由點陣圖使用的代碼。它用來定義在將 pictur 繪制到 object 上時對 picture 執行的位操作(例如, vbMergeCopy 或 vbSrcAnd 操作符)。關於位操作符常數的完整列表,請參閱 Visual Basic Help 文件中的 RasterOp Constants 主題。
在使用opcode時有一些限制。例如,如果資源是圖標或圖元文件,則只能使用 vbSrcCopy,而不能使用其他的opcode;並且,與圖案 (或 SDK 術語中的"畫筆"),如 MERGECOPY、 PATCOPY、 PATPAINT 和 PATINVERT,相交互的opcode實際上是同目標的 FillStyle 屬性交互。
注意 Opcode 用於將按位操作傳遞到點陣圖。當傳遞其他圖象類型時將一個值給該參數會造成「無效過程調用或參數」錯誤。這是設計的原因。要避免這個錯誤,對於除點陣圖外的圖象,將 Opcode 參數置為空。
❷ vb中怎樣做能使圖片具有動態效果
看你的圖片放在哪個界面中,如窗體中還是picturebox中,他們都有click事件,但是放在窗體中估計你是達不到抖動的效果了,只有放在picturebox中,然後用top和left來進行抖動!
❸ VB中怎麼添加動態圖片
1、首先要注冊,注冊方法:在工程中選中「引用」→引用項目ActiveMovie Control type Libray→然後點擊「確定」鍵即可。
2、其次,在PictureBox控制項中顯示GIF動畫,凡有句柄hwnd的窗體控制項均可以;
3、在窗體Form1上添加2個命令按鈕Command1,Command2和1個圖片框控制項Picture1。
❹ VB裡面怎麼插入動態圖啊
樓主你好!
可以按以下步驟:
1、打開VB6.0,新建標准EXE
❺ 在VB中讓圖片動起來
不要用什麼GIF控制項了,你直接用WebBrowser就可以了。。
輸入一句代碼就可以了。
WebBrowser1.Navigate (App.Path & "\**.gif") '()裡面的是目錄
WebBrowser 在什麼地方?
工程---部件 打開控制項選擇卡,在下面的「Microsoft Internet Controls 6.0」 把前面的方框打上對號,應用 確定就可以了。。
❻ VB6.0如何用VB6.0做動態圖像,就是簡單的把圖像從左端移動到右端,求高手~謝謝
Private Sub Timer1_Timer()
Label1.Left = Label1.Left - 20
End Sub
註:Label1.Left - 20向左移動
Label1.Left +20向右移動
Timer1.Interval = 1000'時間間隔為一秒
❼ 【怎麼用VB做動態圖片會的告訴的.不會的也可以學習下】
'先添加控制項:Timer1、Picture1
Dim ctS As Long
Private Sub Form_Load()
Timer1.Enabled = True: Timer1.Interval = 500
End Sub
Private Sub Timer1_Timer()
ctS = ctS + 1
If ctS > 5 Then ctS = 1
' 繪圖法 =================
Picture1.Cls
Picture1.Font.Size = 24
Picture1.Print ctS
'' 圖片法 =================
'' 刪除上面 繪圖法 的三條語句,改用下面的一條語句
'' 用繪圖軟體製作 5 張動作有連續性的圖片
'' 分別保存為 My1.bmp, My2.bmp, My3.bmp, My4.bmp, My5.bmp
'' Picture1.Picture = LoadPicture("C:\My" & ctS & ".bmp")
End Sub
❽ 怎麼讓VB中的靜態圖片動起來
1、在PR中導入圖片素材,添加到軌道上。
2、在上面點--「效果」按鈕。如圖:
3、把游標移到要加運動效果的位置,點添加關鍵幀。如圖:
4、在效果控制項面板裡面--「視頻效果」---"運動「如圖:
4、對」位置「,」縮放「」旋轉「等進行設置。
5、設置好了,圖片就運動起來了。
❾ VB中怎麼添加動態圖片
1、首先要注冊,注冊方法:在工程中選中「引用」→引用項目ActiveMovie
Control
type
Libray→然後點擊「確定」鍵即可。
2、其次,在PictureBox控制項中顯示GIF動畫,凡有句柄hwnd的窗體控制項均可以;
3、在窗體Form1上添加2個命令按鈕Command1,Command2和1個圖片框控制項Picture1。