vb6调用相机显示不行显示的是静态的我要动态的

要实现相机动态显示，你可以使用ActiveX控件或第三方库来实现。以下是一种可能的解决方案：

首先，确保你已经安装了相机的驱动程序和软件，并且可以在电脑上正常使用相机。
在VB6中，添加一个PictureBox控件用于显示相机图像。
在VB6中，使用Microsoft Windows Image Acquisition (WIA)库来访问和控制相机。你可以在"项目" -> "引用"中添加"WIA"引用。
在代码中，使用WIA库来创建一个WIA设备对象，并打开相机：

Dim wia As Object
Dim device As Object
Set wia = CreateObject("WIA.CommonDialog")
Set device = wia.ShowSelectDevice

接下来，使用WIA库来创建一个WIA图像对象，并将其连接到相机设备：

Dim image As Object
Set image = CreateObject("WIA.ImageFile")
Set image = device.ExecuteCommand("{AF933CAC-ACAD-11D2-A093-00C04F72DC3C}")

将图像对象的数据加载到PictureBox控件中：

PictureBox1.Picture = LoadPicture(image.RawData)

为了实现动态显示，你可以在一个循环中不断更新相机图像数据，并将其加载到PictureBox控件中。你可以使用定时器控件来触发更新操作：

Private Sub Timer1_Timer()
    Set image = device.ExecuteCommand("{AF933CAC-ACAD-11D2-A093-00C04F72DC3C}")
    PictureBox1.Picture = LoadPicture(image.RawData)
End Sub

这样，你就可以在VB6中实现相机的动态显示了。记得在关闭程序或停止动态显示时，要释放相机资源并停止定时器