|
VB对低层硬件的访问控制 2003-07-21 |
---- VB没有提供直接访问低层硬件的控件和方法,一度给对访问硬件感兴趣的编程者带来不便。目前我们可从网上搜索到支持低层硬件访问的DLL和ActiveX控件,通过它们可读写存储器单元、端口,甚至控制硬件中断。下面通过两个利用DLL和ActiveX控件示例介绍VB对低层硬件的访问...[全部内容] |
|
怎样限制鼠标移动 2003-07-21 |
本文介绍如何限制鼠标在窗口的指定范围内移动。这个技术在需要防止用户鼠标在指定区域内活动时非常 有用。例如在一个射击游戏中,需要限制鼠标在射击区内移动。 操作步骤 1、建立一个新工程项目,缺省建立窗体FORM1 2、添加一个新模体 3、粘贴下面代码到新模体 Option E...[全部内容] |
|
在VB中如何得到网络中某一台电脑(电脑名)的网卡地址 2003-07-21 |
[程序语言] Microsoft Visual Basic 4.0,5.0,6.0 [运行平台] WINDOWS [功能描述] IPX和NETBIOS接口需要网络地址。该文通过详细的步骤演示了如何通过VB获取网卡地址。 步骤: 1)在Visual Basic生成标准的EXE文件。缺省创建 Form1。 2)在Form1中添加一命令按钮,缺省名为C...[全部内容] |
|
字符串中文的问题 2003-07-21 |
字串中文的问题,起於vb的字串是使用UniCode,而我们一般是使用Ascii Code。 这差别在何处呢?UniCode的每个字元长度是2个byte,而Ascii是一个byte,如果说,我将们将VB的字串写入档案,有时会有意想不到的结果。例如: Text1.Text = "这是一个abc" len5 = Len(str5) 如...[全部内容] |
|
自己编程模拟 MouseEnter,MouseExit 事件 2003-07-21 |
很多第三方的控件都提供的 MouseEnter 和 MouseExit 事件来补充 MouseMove 事件的不足(MouseMove 事件不能有效的捕获鼠标是否已在控件外),但是这些控件或要注册,或集合了其他实际没有什么作用控件,另外在程序中加入太多的控件也会影响程序的性能,利用 Windows 的 ...[全部内容] |
|
如何在开机时自动更换墙纸 2003-07-21 |
每次开机都面对同样的墙纸,真让人感到单调乏味。是不是可以在每次开机的时候,都能给你一个意外的惊喜,自动地更换墙纸呢?笔者用VB 5.0编了一个小程序,可以轻松地解决这个问题。而其关键在于一个WINDOWS API函数的使用,该函数的功能是用来设置或询问系统范围参数...[全部内容] |
|
如何改变桌面的图片 2003-07-21 |
此一问题需调用 SystemParametersInfo API 函数,细节如下: 1. API 的声明: Const SPI_SETDESKWALLPAPER = 20 Const SPIF_UPDATEINIFILE = &H1 Private Declare Function SystemParametersInfo Lib "user32" Alias " SystemParametersInfoA" (ByVal uAction As Long, ...[全部内容] |
|
利用VB捕捉并保存屏幕图像 2003-07-21 |
大家知道在VB下利用API函数Bitblt可以将屏幕或者窗口上的图像拷贝到VB中的PictureBox对象中,但是如果简单地利用PictureBox的SavePicture函数来保存图像,会发现什么也保存不了。这篇文章就是介绍如何捕获并利用Windows下的OLE API函数保存图像。 首先来看源程...[全部内容] |
|
怎样关闭一个正在运行的程序 2003-07-21 |
你可以使用API函数FindWindow和PostMessage去寻找指定的窗口,并关闭它。下面的例子教给你怎样找到并关掉一个Caption为“Caluclator”的程序。 Dim winHwnd As Long Dim RetVal As Long winHwnd = FindWindow(vbNullString, "Calculator") Debug.Print winHwnd If wi...[全部内容] |
|
用VB编写键盘拦截程序 2003-07-21 |
我们知道,在一些程序中,有一些快捷方式(如:Shift键最小化、ESC键退出、Ctrl+S存盘、Alt+x退出等等)。以前有一些介绍使用Win32 API可以做到,但过于繁琐,其实VB本身已经给我们提供了这个功能。 我们来新建一个窗体Form1,对于键盘操作可以看到有三个事件Ke...[全部内容] |