预览模式: 普通 | 列表

用vb实现ping一个地址并等待回应

本例演示了怎样通过API的调用向一个IP地址发送一个包的数据并等待回音。
新建一个工程,添加一个标准模块,写入以下代码:

Option Explicit

Public Const IP_STATUS_BASE = 11000

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 1

用vb实现MD5加密

1、新建一个窗体,创建一个文本框和命令按钮,加入下面代码:

Option Explicit
Private Sub Command1_Click()
Dim c1 As New Class1
MsgBox c1.DigestStrToHexStr(Text1.Text)

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3

vb设计软件试用期

大家都知道共享软件都有它们的试用期,即给你一个固定的期限免费使用,超出一定的期限免费使用。超出一定和期限如果你坚决拒付使用费的话,呵 呵,那个软件就不能启动了。你想不想也编一个带试用期的程序呢?不难,方法如下:
    编程思路
    应有的功能:
    1)给定一个试用期限,在系统每次启动时会判断软件已经使用了几天,还有几天可以及启动的次数。
    2)当系统日期被修改成往日的日期后,系统能自动判别,禁止修改日期 ,不予正常启动。
    3)当试用期到,显示信息,不予启动程序。

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 1

vb写定时断网程序

运行VB 6,向窗体添加7个Label控件、1个Timer控件、3个Text文本输入框以及4个Command按钮。



   原理简介:用Timer控件的True或者False值,控制倒计时的开始,当到达设定时间的时候,弹出对话框提示断开连接。

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 2

打开一文本文件并放入textBox中

打开一文本文件并放入textBox中

Dim FileNumber
Dim Lstr as String
FileNumber = FreeFile   ' 取得未使用的档案代码。
Open "TEST" For input As #FileNumber

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 0

含子目录的搜寻文件

含子目录的搜寻文件

标题:非递归、无使用界面的文件搜寻

      一般来说,搜寻目录及子目录底下符合条件之所有文件功能的程式撰写,一向
颇令人头疼,而最后的解决方式多用 Recursive(程式递归呼叫) 来解决,像 VB5.0

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 0

取得某个目录底下所有文件大小总和

取得某个目录底下所有文件大小总和


含目录底下的子目录,求得其所有文件大小之总和
其第二个叁数的目的是起始Static型态的totbyte, 呼叫它时,请不要传叁数进去

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 1

vb设计更换屏保

制作一个本企业的屏幕保护,在客户运行本企业的应用软件的时候,为客户更改屏幕保护,是个广告宣传的好办法。在第一VB论坛(http://www.d1vb.com)上有很多朋友提出这个问题,现解答如下:

  要更换屏幕保护,首先得做好一个屏幕保护(scr文件),本例以 工程1.scr 这个文件为例。由于windows是把屏幕保护文件存放在system下,但记录屏幕保护文件位置的文件却是windows目录下的system.ini,所以,首先需要找出系统的windows和system目录的确切安装位置。因此,可以分如下几步进行:

  1、找到windows和system目录的安装位置

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 0

用vb写小型网络管理系统

1 网络管理系统的功能

  用户登录认证,电子邮件系统,文件传送,消息通知

  2 Winsock控件介绍

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 0

用vb写光驱保镖

编程思路:当光驱里有光盘,立即检测此光盘是否已经注册,如不是,则弹出光驱,从而达到保护光驱的作用。

实现方法:
一.注册光盘
利用INI配置文件记录光盘的卷标号和序列号,比如一张卷标号为Sys、序列号为38972126的光盘,可在INI文件中在[CDRom]下按如下格式记录:ys=38972126。
二.检测光盘是否已经注册

查看更多...

分类:计算机编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 0

互联网 www.pckno.com