我用line命令在picture中画了一个图形，现我想在程序运行过程中用数据控件把它以图片或图形的形式存入数据库中，请问怎么存啊？拜托各位了，谢谢谢谢！(如果可能我还想用循环实现画一个图存一个，这样就可以实现自动存储）

把图片保存成JPG格式（要通过非常复杂的算法或者利用组件），然后再存入数据库。

但，即使我弄成jpg格式也存不进去啊，现在,我能实现的就是在access数据库中通过插入的方式可以插入图片，然后在窗体上用OLE显示出来，但现在我是要在程序运行过程中通过picture实现存储（如果可能的话，最好通过循环生成很多图形实现自动储存）。拜托各位再给想想办法吧。另外还有一个问题：如果通过vb6自带的可视化数据管理器在数据库中添加记录，文本类型可以通过输入的方式输入，但二进制类型怎么输入啊(也就是图片弄不进去呵）？再次谢过各位了!

ADO Field对象的AppendChunk方法可以将二进制文件保存到数据库，这个问题网都讨论烂了，我就不说　了。

[此贴子已经被作者于2005-5-14 15:39:51编辑过]

我N早以前写过这样一个例子，现在不好找了。

我现在想用可视化数据管理器或数据控件做，楼上的大侠，能否再给点具体点提示啊？我这先谢过了。

将图片或文件存入数据库还有一种非常简单的方法，就是用ADO2.5以上提供的Stream对象读取文件，直接可以写入数据库。

下面给出代码片断：

Dim Rs As New ADODB.RecordSet
Dim Sm As New ADODB.Stream       'ADO Stream流对象
....
Rs.Open ...
Rs.AddNew
With Sm
 .Type = adTypeBinary     '二进制模式
 .Open    '打开流对象
 .LoadFromFile strPath & "\temp.jpg"  '从文件载入
 Rs.Fields("Picture") = .Read         '读取文件并写入数据库
 .Close
End With
Set Sm = Nothing
Rs.Update
....

长见识