如何在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