您现在的位置:首页 > IT认证 > 计算机二级考试 >

VB多类图片数据库存取技巧


  一、实现思路:

  用户添加或修改图片时控制使用COMMONDIALOG的SHOWOPEN对话框,然后记录通用对话框的FILENAME到变量A,再使用APP.PATH找到到特定目录下的该图片文件,改变窗体上放置图片控件的属性即可显示。数据库中只使用一文本型字段记录下变量A,图片文件保存在程序目录下,此法可同时使用GIF、JPG和BMP等等图像文件。

  二、实现方法:

  1、在窗体上建立IMAGE控件,名为IMAGE1。

  2、用DATA控件得到数据源表。

  3、建立“更改图片”按钮COMMAND1,其代码为:  

  Private Sub Command1_Click()

  CommonDialog1.FileName = ""

  CommonDialog1.Filter = "文件bmp *.bmp 文件JPG *.JPG 文件GIF *.GIF"

  CommonDialog1.ShowOpen

  Dim a As String

  a = CommonDialog1.FileTitle 注释:得到不含路径文件名

  If a <> "" Then

  Image11.Picture = LoadPicture(App.Path & "\bmp\" & a)

  注释:\bmp\是我用于存取图片的本系统文件夹下的一个子文件夹。

  Data1.Recordset.Edit

  Data1.Recordset.Fields( "tp") = a 注释:TP是存取图片名称的字段。

  Data1.Recordset.Update

  End If

  End Sub

 

 

【免责声明和版权说明】
本站部分信息来源于互联网,对转载的信息我们力求标明信息的出处,我们尊重作者的版权著作权,对我们转载的信息如有异议或有侵权或违法信息请及时联系我们,本站会立即删除,对原创内容我们愿意支付适当的稿酬,联系方式:邮件:webmaster@jscj.com 电话:4008816886

相关文章

无相关信息
更新时间2022-03-13 10:53:42【至顶部↑】
联系我们 | 邮件: webmaster@jscj.com | 客服热线电话:4008816886(QQ同号) |  添加客服微信

付款方式留言簿投诉中心网站纠错二维码手机版

客服电话: