'Author: Gordon F. MacLeod 'How to play an .AVI file using API and the MMSYSTEM.DLL.. '------------------------------------------------------------------- ' Here's how to play an .AVI file via API ' Declare this API: Declare Function mciSendString Li...

2008-02-23 06:56:16

字串中文的问题，起於VB的字串是使用UniCode，而我们一般是使用Ascii Code。 这差别在何处呢？UniCode的每个字元长度是2个byte，而Ascii是一个byte，如果说，我将们将VB的字串写入档案，有时会有意想不到的结果。例如： Text1.Text = "这是一个abc" len5 = Len(str5)...

2008-02-23 06:56:16

各位VB高手，你一定也常常因苦于无法组织自己程序中大量的picture，而头痛不已，那就让小生为各位介绍一下VB编程的好帮手--资源文件。 所谓资源文件，就是指将在程序运行时用到的资源集中在一起的一个文件。一个资源文件可以包括文字（TEXT）、位图（BITMAP）。图标（IC...

2008-02-23 06:56:14

Option Explicit Private Sub Command1_Click() Dim I As Long, J As Long, K As Long Dim PrintString As String For I = 0 To Data1.Recordset.RecordCount - 1 If K = DBGrid1.VisibleRows Then DBGrid1.Scroll 0, DBGrid1.VisibleRows K = 0 End If For J = 0 To D...

2008-02-23 06:56:14

Switch from DAO to ADO By Sam Huggill Introduction A few days ago, I started a new project that handles a large database containing HTML code for a complete Web site. The project has to allow the webmasters of the web site view all updates made to th...

2008-02-23 06:56:12

在字符串处理时，如果字符串变量必须有引号，怎么处理呢？如 theStr = [MyName = "schunter" Class = "2"] 如何将此字符串显示出来呢？ 很多初学者肯定使用了C/C 的方法，""",或者""",这些在VB中都是错误的。正确的写法是： theStr = "[MyName =" """" "schunter" """"...

2008-02-23 06:56:13

本示例的功能是如何计算给定的两个日期之间的工作日，你可以选择是否将星期六或星期日也包括进去。同时本程序还允许你可入一些假期，从而在计算时将这些假期排除在外。 函数： Public Function BusinessDateDiff(ByVal dDate1 As Date, ByVal dDate2 As Date) As Long...

2008-02-23 06:56:11

实际上使用Visual Basic 5.0很容易建立屏幕保护程序。任何Visual Basic应用程序都可以作为一个屏幕保护程序来运行，只是有的程序做此工作会比其它程序更好一些。要想使自己的应用程序扮演Windows环境中屏幕保护程序的角色，需要将该程序作为一个屏幕保护程序来编译。...

2008-02-23 06:56:10

功能：显示一个动画时钟，该时针随着每一秒而动态变化。 程序说明 1．如何画时钟表盘上的所有直线元素？ 用Load命令建立原始Line控制的14个拷贝（因为表盘有12个点和时、分、秒共15个Line），该控制数组每一个实例的端点坐标属性设置为每条线在时钟表盘上的适当位置，这...

2008-02-23 06:56:10

一个单项工程可以包含多达 32,000 个标识符(非保留字)，它们包括（但不限于）窗体、控件、模块、变量、常量、过程、函数和对象。注意，实际的标识符数受可用内存的限制。 Visual Basic 中的变量名不多于 255 个字符，而窗体、控件、模块和类名不多于 40 个字符。Visual...

2008-02-23 06:56:08