如何在vb中添加圖片

A. vb中怎樣插入圖片

你說的是在form中插入背景圖片嗎？ 是form的picture屬性。 追問： 不是，就好像一個照片管理的，已經有一個adodc 控制項 了 回答： Private Sub Form_Load() Form1.Picture = LoadPicture(" 絕對地址 ") End Sub 補充： 這樣你在 資料庫 中加入圖片地址欄位，然後用一個變數賦值。 追問： and? 回答： 你可以用SQL語言鏈接TEXT1.TEXT，你是這個意思吧。 追問： 我也不知道，反正就是有 很多圖片 ，只不過只會顯示名稱與text相同的那一張 回答： 其實不用鏈接 資料庫 ，也 不用很多 技術，用Form1.Picture = LoadPicture("圖片地址")就可以了。你把圖片放在一個 程序文件 夾里，然後用Form1.Picture = LoadPicture(APP.PATH+TEXT1.TEXT) 補充： 請問你不理解我這句話的意義嗎？ 追問： === 追問： 它說找不到， 回答： 了解什麼是相對路徑吧？清楚的話，你就能看懂我那句話。 追問： 但他還是說找不到，哎，算了，謝謝你

B. 怎樣在vb中添加圖片

有三種方法：
1、添加一個picturebox或imagebox，在屬性窗口中選擇picture屬性，然後就可以添加圖片了，這是最簡單的一種；
2、第二種是代碼加入:
Option Explicit
Private Sub Form_Load()
Me.Picture = LoadPicture("c:\text.bmp") 'c:\text.bmp為圖片路徑
End Sub
3、第三種是通過剪貼板加入，這種比較復雜,如：
Option Explicit
Private Sub Form_Load()
Clipboard.SetData Picture1.Image
End Sub

C. VB中如何添加背景圖片

1、打開Microsoft Visual Basic,新建一個標准Exe工程。

D. 如何用VB向EXCEL單元格中插入圖片

如果你知道圖片的Name
可以,如名稱是"Picture 1"
xlSheet.Shapes("Picture 1").delete
如果不知道名稱,知道在單元格的位置,譬如頂點位置在$B$3
可以循環判斷後刪除
For Each P In xlSheet.Shapes
If P.Name Like "Picture*" and P.TopLeftCell.Address="$B$3" Then P.Delete
Next

E. vb控制項中怎麼插入圖片

有Picture屬性的控制項都可插入圖片，就放在此屬性中。
至少應加上圖片文件的後綴名（如.jpg，.bmp等），如圖片不在當前文件夾（Form窗體所在的文件夾），要加上完整地址。

F. 在VB編程中如何插入圖片

有三種方法：
1、添加一個picturebox或imagebox，在屬性窗口中選擇picture屬性，然後就可以添加圖片了，這是最簡單的一種；
2、第二種是代碼加入:
Option
Explicit
Private
Sub
Form_Load()
Me.Picture
=
LoadPicture("c:\text.bmp")
'c:\text.bmp為圖片路徑
End
Sub
3、第三種是通過剪貼板加入，這種比較復雜,如：
Option
Explicit
Private
Sub
Form_Load()
Clipboard.SetData
Picture1.Image
End
Sub

G. vb如何添加圖片

新建工程，點菜單：工程\部件\——選：Microsoft Common Dialog Control 6.0
在窗體中加入：Command1、CommonDialog1,
將下列代碼Copy到代碼窗口中：
Private Sub Command1_Click() '文件打開
On Error Resume Next '設置錯誤處理
Dim openFilename As String
With CommonDialog1
.CancelError = True
.InitDir = "C:\"
.Filter = "點陣圖文件(*.BMP)|*.BMP|JPEG(*.JPG;*.JPEG;*.JPE;*.JFIF)|*.JPG;*.JPEG;*.JPE;*.JFIF|GIF(*.GIF)|*.GIF|TIF(*.TIF;*.TIFF)|*.TIF;*.TIFF|所有文件|*.*"
.FilterIndex = 2
.Flags = &H200000 '允許長文件名
.ShowOpen
If Err.Number = 32755 Then Exit Sub '若按取消按鈕，則退出過程
openFilename = .FileName '獲得要打開的文件名
Form1.Picture = LoadPicture(openFilename)
End With
End Sub

Private Sub Form_Load()
Command1.Caption = "選擇圖片"
End Sub

H. vb 如何插入圖片

材料/工具：visual basic6

1、首先啟動visual basic6，新建一個標准exe文件，進入窗體對話框。

I. VB中如何添加圖片

新建工程，點菜單：工程\部件\——選：Microsoft Common Dialog Control 6.0
在窗體中加入：Command1、CommonDialog1,
將下列代碼Copy到代碼窗口中：
Private Sub Command1_Click() '文件打開
On Error Resume Next '設置錯誤處理
Dim openFilename As String
With CommonDialog1
.CancelError = True
.InitDir = "C:\"
.Filter = "點陣圖文件(*.BMP)|*.BMP|JPEG(*.JPG;*.JPEG;*.JPE;*.JFIF)|*.JPG;*.JPEG;*.JPE;*.JFIF|GIF(*.GIF)|*.GIF|TIF(*.TIF;*.TIFF)|*.TIF;*.TIFF|所有文件|*.*"
.FilterIndex = 2
.Flags = &H200000 '允許長文件名
.ShowOpen
If Err.Number = 32755 Then Exit Sub '若按取消按鈕，則退出過程
openFilename = .FileName '獲得要打開的文件名
Form1.Picture = LoadPicture(openFilename)
End With
End Sub

Private Sub Form_Load()
Command1.Caption = "選擇圖片"
End Sub