内容列表
- 在VB中实现客户端程序自动查找并连接服务端程序
-
在VB中实现客户端程序自动查找并连接服务端程序 (南京审计学院教育技术中心 210029 丁国勇)在一般的讲解WINSOCK控件的用法的文章中,无论是使用T
- 分类:VB语言 查阅全文
- 自己编程模拟 MouseEnter,MouseExit 事件
-
自己编程模拟 MouseEnter,MouseExit 事件
很多第三方的控件都提供的 MouseEnter 和 MouseExit 事件来补充 MouseMove 事件的不足(MouseMove 事件不能有效的捕获鼠标是否已在控件外),但是这些控件或要注册,或集合了其他实际没有什么作用控件,另外在程序中加入太多的控件也会影响程序的性能,利用 Windows 的 API 函
- 分类:VB语言 查阅全文
- 如何使用 VB 编写自动反安装的程序?
-
如何使用 VB 编写自动反安装的程序?
如果您安装了某一个软件之后,想要反安装,您有二个方法:1、打开【控制面板】中的【添加删除新程序】,选择该软件來反安装。2、选择【开始】【程序集】中软件所产生的程序組中的反安装。上面的第一种方法,您不需要作任何处理,一般软件在安装完后,都会在【控制面板】中的【添加删除新程序】多一个该软件的选项。而第二种方法,就必须要我们编写程序來解决了!假�
- 分类:VB语言 查阅全文
- 远程数据库的访问
- 远程数据库的访问(VB数据库)
杨 尚 勤
---- 远 程 数 据 对 象(RDO) 是 VB 5.0 中 基 于 ODBC API 的 对 象 模 型, 它 短 小、 快 捷、 强 健, 可 以 访 问 任 何 32 位 ODBC 数 据 源, 如 SQL Server 和 Oracle 数 据 库, 是 访 问 远 程 数 据 库 的 更 新 更 高 级 的 工 具。 ---- 使 用
- 分类:VB语言 查阅全文
- 05-25日<一个简单实用的 vb 加密/解密算法>之改进
- 在看了网友 everjoe评论后,俺改进了一下该程序,其实也就是把W系列的函数用B系列去替代,然后就支持中文加密了
修改后的全部代码入下:
Function UserCode(password As String) As String'用户口令加密 Dim il_bit, il_x, il_y, il_z, il_len, i As Long &n
- 分类:VB语言 查阅全文
- ★★★敬请留意★★★:和微软一模一样的记事本的源代码(1)
- Private Declare Function htmlhelp Lib _ "hhctrl.ocx" Alias "HtmlHelpA" _ (ByVal hwndCaller As Long, _ByVal pszFile As String, ByVal _uCommand As Long, ByVal dwData As Long) As Long
Dim Chan
- 分类:VB语言 查阅全文
- ★★★敬请留意★★★:和微软一模一样的记事本的源代码(5)
- Type Formstate Deleted As Integer Dirty As Integer Color As LongEnd TypePublic Fstate As FormstatePublic Fstring As StringPublic Gstring As String
- 分类:VB语言 查阅全文
- VB中访问API函数之防错技巧
- 功能强大的API(应用程序接口)函数对于VB(Visual Basic For Windows)程序员来说,不愧是很好的编程工具,然而使用API函数的程序员也许都遇到这样的现象。在VB集成环境下,程序运行后,出现一错误信息对话框,按确定键后系统自动退出VB集成环境,此时如果你的程序尚未存盘,那末很遗憾挽回损失已回天乏力。最后一次存盘之后
- 分类:VB语言 查阅全文
- 在VB中实现客户端程序自动查找并连接服务端程序
- 在VB中实现客户端程序自动查找并连接服务端程序 (南京审计学院教育技术中心 210029 丁国勇)在一般的讲解WINSOCK控件的用法的文章中,无论是使用TCP还是UDP,客户端程序连接服务端程序时无一例外的要指定IP地
- 分类:VB语言 查阅全文
- 如何调试 VB 6 的安装源程序 Setup1.VBP?
- 如何调试 VB 6 的安装源程序 Setup1.VBP?方法一: 1.随便运行一个已经打好包的 Setup.exe,不要再做其他响应了! 例如: D:\MyVBP\SetupDemo\包\Setup.exe (此时出现 "XX 安装程序",不要做任何响应) 2.用 VB
- 分类:VB语言 查阅全文
- ★★★敬请留意★★★:和微软一模一样的记事本的源代码(4)
- Option Explicit
Private Sub CancelButton_Click()OKButton_ClickForm1.Text1.SelText = Text2.TextEnd Sub
Private Sub Command1_Click() If Fstring = "" Then Fstring = Text1.TextEls
- 分类:VB语言 查阅全文
- ★★★敬请留意★★★:和微软一模一样的记事本的源代码(2)
-
Public Sub Command1_Click()Dim FoundPos As IntegerIf Fstring = "" Then Fstring = Text1.TextElse If Text1.Text <> Fstring And Text1.Text <> "" Th
- 分类:VB语言 查阅全文
- ★★★敬请留意★★★:和微软一模一样的记事本的源代码(3)
-
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPrivate Const EM_GETLINECOUNT = &
- 分类:VB语言 查阅全文
- VB6.0中调用API函数创建和使用逻辑字体
-
VB6.0中调用API函数创建和使用逻辑字体 作者:王寿兵 发布时间:2001/05/15
文章摘要:
我们在用Visual FoxPro或Power Builder 等开发工具开发各种管理系统时,都要打印出一些各式各样的报表,在设计报表时,有时会遇到如下问题:报表的纵向数据列数太多,常用的宽行打印机(如LQ
- 分类:VB语言 查阅全文
- 经典加密算法在VB中的实现(2)- MD5
- Option Explicit Dim w1 As String, w2 As String, w3 As String, w4 As String Function MD5F(ByVal tempstr As String, ByVal w As String, ByVal X As S tring, ByVal y As String, ByVal z As String, ByV
- 分类:VB语言 查阅全文
- 经典加密算法在VB中的实现(1)- Base64
-
Public key(1 To 3) As Long Private Const base64 = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrst uvwxyz0123456789+/" Public Sub GenKey() Dim d As Long, phi As Long, e As Long Dim m As
- 分类:VB语言 查阅全文
- 如何实现窗体的自动隐藏显示功能
- 现在许多程序的窗体都有自动隐藏/显示的功能(比如OICQ)。 实现这样的功能其实很简单,原理是:判断鼠标是否移到了屏幕的最左边或最右边,如果移到了则显示窗体,如果鼠标移开了窗体则隐藏窗体。在本程序中,我们将用到GetCursorPos这个API函数是实现这个功能最重要的一步 ,这个函数的作用就是获取当前鼠标的坐标值,我们可以通过这个值来判断鼠标是否移到了屏幕的最边缘。 下面我们就开始吧。 新建一
- 分类:VB语言 查阅全文
- 经典加密算法在VB中的实现(3)- RC4
- Public Sub main() Dim key As String For i = 1 To 16 Randomize key = key & Chr(Rnd * 255) Next i MsgBox RC4(RC4("Welcome To Plindge Studio!", key), key)
- 分类:VB语言 查阅全文
- 解除爱虫病毒的武装
- Windows Scripting Host (以下简称为WSH)是为32位微软Windows操作系统平台设计的独立于程序语言的脚本主机,能在Win95、Win98、Win Me、WIN NT和Win 2000中运行。许多流行的编程语言,如Visual Basic、Scripting Edition开发系统和JavaScript等都支持WSH。它能通过基于Windows的WSCRIPT.EXE程序
- 分类:VB语言 查阅全文
- 在VB中怎样操作注册表.
- 在VB中系统提供了对注册表操作的两个函数.但它们只可以操作特定的键.使用起来往往不能满足需要.下面的这个函数可以实现对注册表的所有操作.并且具有标准VB函数的通用性和易用性.请指点..
Public Function SysRegControl(Optional ByVal RootKey As RegRootKey = regHKEY_LOCAL_MACHINE, Optional ByVal
- 分类:VB语言 查阅全文