怎样在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

有2种方式：毕顷1.使用rtf格式，这个格式没研究过，想用这格式，自己上百度找资料把；2.利用剪切板来实现图片的添加：先添加一个picture控件，设置为不可见，然后差雹把需要手庆陆添加的图片加载到这个picture上，接着：Clipboard.Clear

Clipboard.SetData Picture1.Image把这图片复制到剪切板最后RichTextBox1.SetFocus '把焦点给RichTextBoxSendKeys "^v"'（也就是Ctrl+V，粘贴的快捷键）把图片粘贴出来。

要在文本框里显示刚才添加的图片文件的路径，使用CommonDialog控件的FileName属性：

例如：Text1.text = CommonDialog1.FileName

要调用cmd命令：VB提供的：Shell函培禅历数，具体使用方法：

Dim RetVal As Integer

RetVal = Shell("C:\Exsa\1.exe", 1)

其中：1.exe就是配搜你所谓的cmd命令程袭丛序文件

---