随着因特网的迅猛发展，现在编程常需要在程序中直接联网来处理一些事项，如在线注册和在线帮助，这就要求我们要在程序中建立某些连接。很多软件在不知用户是否联网的情况下不管三七二十一就启动浏览器查找网址，费了九牛二虎之力只能查出一错误页来（当然不可能有什么好的结果）。如果我们在程序编写时能自动判断用户是否已...
原帖及讨论：http://bbs.bc-cn.net/dispbbs.asp?BoardID=6&ID=166313以前的smtp服务器大多都支持匿名邮件的发送，因此我们只要用Winsock连上服务器25端口，然后再发送几个命令和邮件的相关信息，就能实现发送E-mail了（现在从网上下载的许...
FillString函数有两个参数，一个是用来重复填充的字符，另一个是填充后的字符串长度。然后它返回填充后的字符串，重复次数由填充字符的个数和填充后字符串长度决定。 该函数建立一个循环，循环次数基于所要求的字符串长度。循环步长有参数Value（即用来重复填充的子字符串）的长度决定。该函数...
'------------------------------------------------------------------- 'Author: Gordon F. MacLeod 'How to extract sounds from the SOUND.DRV library.. ' ...
在数据库的开发过程中，你可能会遇到oracle与vb的日期类型不匹配，无法直接比较的问题。而vb中又没有专门的函数可以转换oracle的日期，这个问题该如果解决呢?其实在oracle 的自带函数库里有一个很有用的函数to_date()，它可以将日期字符串按照自己定义的格式转换为oracle格式的...
如何使自己设计的程序具有漂亮和友好的界面，是程序员间永恒的话题。这里，笔者向您介绍一种非常简单的技巧，使文字旋转起来。 这里的“旋转字体”指的是让一行字体的水平基线(baseline)转过一定的角度。正如您所看到的，旋转字体会产生轻松、活泼的视觉效果，可以给观者以特殊的联想，是一种行之有效的显示特技...
---- 在VB软件开发中， 错误信息的捕获及处理是非常重要的部分。有些错误在编译时即可发现、排除。但还有一些错误是在软件运行时由于用户错误的输入等方面的原因而产生的，这就需要软件开发者在软件设计和开发时注意处理这方面的错误。VB 在捕获及处理错误信息方面有两个重要的函数。一个是ERROR，该函数捕...
自从Internet盛行以来，人们对于文件下载、即时信息获取、电子邮件传送变得方便许多。 Internet可以说是21世纪人类科技的一大创新。由于这个重大改变，人们的生活方式也受到非常大的影响；电子购物、网上信息库、网上股市实时交易如雨后春笋般的出现。以往，Visual Basic 4.0并没有提供...
在尊重软件著作权的时代，电子注册版软件的应用也越来越广。它的出现使用户对程序中未受限制的功能有了一定了解，起到了推广和传播作用，同时也很好地保护了制作人的切身利益。那么，我们如何制作一个电子注册版软件呢？ 经过摸索，笔者利用VB也简单地制作了一个电子注册版软件。 设计原理 利用AP...
播放 .flc 动画文件的方法与 .wav 及 .midi 并没有什么不同，最后完成的程序 大致如下： Sub PlaySound(filename) Dim cmd As String Call mciSendString("close MyFlc", 0, 0, 0) ' MyFlc 这个名称可...
Option ExplicitPublic Declare Function ChangeDisplaySettings Lib "user32.dll" Alias "ChangeDisplaySettingsA" (ByRef lpDevMode As DEVMODE, ByVal dwFlag...
Public Sub FocusMe(ctlName As Control) With ctlName .SelStart = 0 .SelLength = Len(ctlName) End With End Sub Now add a call to this subroutine in the ...
