-
VB在CAI编程中的应用
一:前言 ----众所周知,VB中的MCI控件在设计多媒体CAI(Computer Assisted Instruction) 软件中有着非常重要的作用,有关这方面的文章也很多;其实,VB中其它众多控件在设计CAI软件时也有不少应用,本文就介绍几个在非多媒体CAI编程中有着特殊应用的控件,相信对广大CAI...
2008-02-23 06:52:19
-
Visual Basic设计多媒体应用程序
一、前言 随着多媒体硬件环境和软件环境的不断完善,目前,大部分计算机软件开发中都涉及多媒体软件技术的应用。 进行多媒体应用程序设计,从原理上说,可以采用从C 到多媒体专用开发系统(如TOOLBOOK、AUTHORWARE、DIRECTOR)等多种层次的工具。然而,由于多媒体软件涉...
2008-02-23 06:52:19
-
访问Microsoft Jet数据库---用Microsoft Jet 访问桌面
访问其它 Microsoft Jet 数据库 ( . mdb) 中的数据,包括用 M1crosoft Jet 的老版本建的各种数据库。 1. 链接外部 Microsoft Jet 表 为了在本地 Microsoft Jet 数据库中链接外部 Microsoft Jet 表,可以先用 OpenDatabase 方法打开本地 Microsoft Jet 数据库,建立一...
2008-02-23 06:52:17
-
用DAO打开Excel文件
Option Explicit Dim Db As Database Dim Rs As Recordset Private Sub Form_Load() Set Db = OpenDatabase("c:tempbook1.xls", False, False, "Excel 8.0;") Set Rs = Db.OpenRecordset("sheet1$") End Sub Private Sub Form_Unload(Cancel As Integer) Rs.Close Db....
2008-02-23 06:52:17
-
用CELL组件显示Access数据库的图片对象
Access数据库支持OLE对象字段,其中最常用的是BMP对象,即图片对象。图片对象的加入使Access数据库的可用性得到大大提高,它使数据库不仅仅局限于传统意义上的数据(即数值与字符),提高了信息的质量,并更接近于人们日常生活中的媒体。例如,要作产品介绍,需要保存该产...
2008-02-23 06:52:15
-
用MDB文件做密码库
能用数据库做密码库吗? 这是我曾经编过的一段程序,从MDB数据库中提取regpass表中的内容,用一个datacombo控件列出常的用户名供选择,一个TEXTBOX供用户输入密码,大概思路如此,希望对你有帮助. _______________________________________________ Dim cnnPass As New ADODB...
2008-02-23 06:52:16
-
利用API播放 AVI
声明: Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long 代码: Dim returnstring As String FileName...
2008-02-23 06:52:13
-
在VB中播放AVI文件
AVI文件是语音和影像同步组合在一起的文件格式。在VB5?0中用MMControl多媒体控件设计播放AVI文件的程序步骤如下: 1?新建一个工程。 2?在Form1上建立一个MMControl控件,并建立一个图片框。 3?设定MMControl对象的按钮属性。 4?撰写程序如下: Private Sub Form_Lo...
2008-02-23 06:52:14
-
获得MouseLeave的方法
VB中缺少一个MouseLeave事件,给编程带来许多不便。例如,当我们想令鼠标移动到一个命令按钮时令其Caption属性为一个名称,离开时又是另一个名称,我们通常只能这么处理:用两个MouseMove事件:一个是命令按钮的,另一个可能是窗体的,也可能是命令按钮周边的其它控件的...
2008-02-23 06:52:12
-
如何取得计算机的所有字型
取得屏幕字型: Dim I As Long For I = 0 To Screen.FontCount - 1 Combo1.AddItem Screen.Fonts(I) Next 取得打印机字型: Dim I As Long For I = 0 To Printer.FontCount - 1 Combo2.AddItem Printer.Fonts(I) Next 上一篇: 将包含有Null结尾的字符串转换为VB字符串...
2008-02-23 06:52:11
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash