- 博客(44)
- 资源 (43)
- 收藏
- 关注
RSS订阅原创 vb.net 2010下求最大值、最小值及两种排序方法
算法：最大值，最小值及位置 Dim A%() = {8, 6, 9, 3, 2, 7} Dim intMin%, intPos%, i% intMin = A(0) ‘最小值’ intPos = 0 ‘位置’ For i = 1 To 5 If A(i)
2016-10-11 22:42:06
4763
原创 本机IP和本机MAC地址绑定 ＆ 网关IP与网关MAC绑定(
本机IP和本机MAC地址绑定 ＆ 网关IP与网关MAC绑定 的好处是：绑定后是为了防止ARP欺骗 第一步：绑定本机IP和本机MAC地址：首先在开始——运行里输入cmd命令,打开dos窗口后在命令行下输入：arp -s 192.168.1.16 00-11-2F-3F-96-88 回车。就绑定了。 (即 ARP -s IP地址 MAC地址 )如果要查看是否绑定，可以用 arp
2012-10-02 11:56:40
2610
原创 华容道游戏ＶＢ.NET 2010 版２８连局
这一版的华容道游戏，有玩法演示，局数、步数、时间提示完善。新增加了关数名字。托动处理的更加完美，当鼠标手动图片后图片消失，鼠标变成你托动的图片，产生一种立体的感觉。请大家查看新版的华容道游戏ＶＢ.NET 2010 版２８连局。下载地址：华容道游戏ＶＢ.NET 2010 版２８连局功能介绍：本程序可对游戏进度进行存档，下面介绍三种打开方式： 一、按文件菜单
2012-09-20 10:02:23
3386
原创 把压缩文件嵌入图片中的工具
这个程序可以很方便的把隐私文件压缩成rar后隐藏在一张ｊｐｇ图片中，把这张图片放在你的众多图片中，是不是别人根本得不到你的重要文件了，利用检验是否嵌入成功按钮，可把被嵌入图片中的ＲＡＲ压缩文件取出来，快来试试吧。 下载地址：把压缩文件嵌入图片中的工具 如果以下软件在你的电脑上无法运行，提示缺少部件，请安装：Visual Basic 6.0运行库，如果以下程序能正常运行则不用安装
2012-09-20 09:58:06
939
原创 一键得到机器的IP子网掩码网关及DNS
一键得到本机的IP子网掩码网关及DNS,非常方便，省去输入ｄｏｓ命令的麻烦，而且得到的内容是文本类型，可以方便的剪切出来用。（注：电脑已经连接局域网）下载地址：一键得到本机的IP子网掩码网关及DNS郭卫推荐阅读：精典创意设计空间——郭卫简历 2012-08-10 21:34:22把压缩文件嵌入图片中的工具 2012-04-18 17:23:26华容道游戏ＶＢ.N
2012-09-20 09:53:08
861
原创 一键安装WinRAR主题界面美化
只要你的电脑上安装了WinRAR 压缩软件，就可以一键安装进行界面美化。下载地址：一键安装WinRAR主题界面美化 我的更多文章：本机IP和本机MAC地址绑定 ＆ 网关IP与网关MAC绑定(2012-09-01 00:19:17)一键得到机器的IP子网掩码网关及DNS(2012-08-30 16:18:26)精典创意设计空间——郭卫个人简历(2012-06-26 00:47
2012-09-20 09:47:15
1063
原创 抢30游戏
一、电脑和玩家轮流选择数字，可以选择一个、两个，最多选择三个，直到第一个抢到30的为赢 二、首先选择玩家或电脑，然后点击开始，下面分步说明： ①、单击玩家后点击开始，玩家可以选择一个、两个或三个复选框，然后单击电脑单选按钮 电脑会自动选择一个、两个或三个复选框，然后把选择权自动交还给玩家。 ②、单击电脑后单击开始，电脑自动选择
2012-03-15 23:45:53
2729
原创 AndAlso，OrElse和And，Or的区别
AndAlso和OrElse应该是vb.net引入的新运算符。AndAlso，OrElse相对于and，or最大的特性是会自动实现“最短路径”。所谓“最短路径”就是指：当第一个被比较的运算式的结果已经能决定运算的最终结果时，就不会再去比较其他运算式，因此可以避免掉额外且不需要的比较运算式。举个很简单的例子说明下： 1 Dim a As Int16 = 1 2
2012-03-10 11:26:59
1923
原创 Continue在循环中的用法
VB.NET 2005,已经实现了continue语法，具体是这样操作：如果 Continue 语句在 Do...Loop 循环中，请将该语句更改为 Continue Do。如果 Continue 语句在 For...Next 循环中，请将该语句更改为 Continue For。如果 Continue 语句在 While...End While 循环中，请将该语句更改为 Continu
2012-03-10 11:24:57
1799
原创 select case 用法
Public Class Form1 Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnok.Click Select Case txtName.Text Case "1"
2012-03-10 11:12:24
1224
原创 if……elseif……else……end if 的用法
Public Class Form1 Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnok.Click If txtName.Text = "1" Then txtName.Text = "Madras
2012-03-10 11:04:58
3081
原创 语句判断时，如何不区分字符串的大小写
第一：用if……end if 判断Public Class Form1 Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnok.Click Dim strName As String strName = txt
2012-03-10 11:02:50
3031
原创 Like 运算符的用法
Option ExplicitPrivate Sub Form_click() Dim testCheck As Boolean testCheck = "F" Like "F" Debug.Print testCheck 'True '--------------------------------------
2012-03-10 10:57:31
1498
原创 动态生成控件并定位
Public Class form1 Private a(0 To 8) As Control Private b(0 To 8) As Object Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click For i
2012-03-10 10:54:19
466
原创 拼图游戏
下载地址：拼图游戏3X3-4X4如果以下软件在你的电脑上无法运行，提示缺少部件，请安装： Visual Basic 6.0运行库，如果以下程序能正常运行则不用安装。一般Xp sp3以下电脑不会出此提示，主要是windwons 7 以上操作系统。整点报时窗体皮肤效果查看器华容道20连局游戏多功能记事本产生序列数字 程序设计：永远的魔灵 by 郭卫公司：精典
2012-02-13 01:59:18
605
原创 通讯录
、有备份和还原数据库功能2、把数据转为网页功能，可以用word直接编辑和打印3、数据表格浏览功能，让你的数据更直观。初始密码：123456下载地址：通讯录 如果以下软件在你的电脑上无法运行，提示缺少部件，请安装：Visual Basic 6.0运行库，如果以下程序能正常运行则不用安装。一般Xp sp3以下电脑不会出此提示，主要是windwons
2012-02-13 01:56:08
567
原创 批量生成资源文件
经过20天的试验，资源文件批量生成工具1.0终于面世了它可以批量生成ico、cur、txt、bitmp、wav类型的资源文件，我测试了一次导入1000个文件，可以生成需要的资源，但局限是路径中不能有空格，欢迎大家调试，并提出更多的意见，让此工具更强大。方便vb和其它程序制作有大量资源的收集工作vb开发，作者：郭卫（魔灵） http://icecept.blog.sohu.com
2012-02-10 12:49:15
517
原创 金山毒霸病毒库还原备份器
金山毒霸病毒库还原备份器，可以把上网电脑上的病毒库备份下来，到没有上网的电脑上为金山毒霸升级下载地址：金山毒霸病毒库还原备份器如果以下软件在你的电脑上无法运行，提示缺少部件，请安装：Visual Basic 6.0运行库，如果以下程序能正常运行则不用安装。一般Xp sp3以下电脑不会出此提示，主要是windwons 7 以上操作系统。整点报时窗体皮肤效果查看器华
2011-12-26 12:50:41
821
2
原创 SKN程序皮肤更换效果查看器
SKN程序皮肤更换效果查看器，内含28个精典皮肤，SKN 皮肤控件，SKN 皮肤效果查看器。一文件多得，希望大家支持我。 下载地址：http://download.youkuaiyun.com/detail/icecept/3848014
2011-11-27 14:06:58
1045
原创 设置文件关联
可以建立、删除、修改自己的文件关联，非方便实用。 下载地址：设置文件关联 如果以下软件在你的电脑上无法运行，提示缺少部件，请安装：Visual Basic 6.0运行库，如果以下程序能正常运行则不用安装。一般Xp sp3以下电脑不会出此提示，主要是windwons 7 以上操作系统。整点报时窗体皮肤效果查看器华容道20连局游戏多功能记事本产生序列数字
2011-11-21 22:29:59
574
原创 she窗体皮肤效果查看器
可以查看 .new 的窗体皮肤，是一款非常好的窗体皮肤查看软件，内置6款皮肤,可以很好的帮助程序设计师美化自己的程序。下载地址：窗体皮肤查看器
2011-10-07 11:18:24
728
原创 28连局华容道游戏
华容道游戏取材于三国时期，关羽在华容道放走曹操的故事。这个游戏一共28局，是根据一款手机游戏编写的，希望大家能够喜欢。一个益智类的小游戏，大家可以在工作之余作为消遣之乐。玩不过去没有关系，我们可以把游戏进度存储起来，下次玩的时候读取进度文件就可以了，我们可以用两种方式来读取存档文件，利用文件菜单里的存档功能把进度存档后，我们可以文件件菜单里的读档功能来读取进度。还可以用建立关联菜单把存
2011-10-07 11:16:41
2151
原创 用dos命令修复文件关联的方法
有些时候，我们的文件关联被破坏，应该怎么办呢？我们可以用 dos里的 ftype 命令和 assoc 命令ftype是文件类型打开方式， assoc 是关联需要的扩展名。我们在开始菜单的运行里输入 cmd.exe 或 command.com.下面我们开始介绍，如何修复批处
2011-10-07 11:14:27
1762
原创 产生序列数字（流水号码）
可以很方便的定制自己需要的序列数子，可以加前缀和后缀，按照界面上的制作步骤，你可以很快的得到你想的数字，右侧的记事本，就是按照左侧定义生成的。下载地址：产生序列数字
2011-10-07 11:13:05
858
原创 多功能记事本:文本加密、自动保存
菜单栏简介 文件菜单----------------------编辑菜单-------------------------------工具菜单 文件菜单下打印设置对话框：文件菜单下打印对话框：编辑菜单下查找/替换对话框：
2011-10-01 00:27:14
1177
2
原创 让data控件和datagrid 控件查询同步
Private Sub xpcmdbutton7_Click()<br /> On Error Resume Next<br /> Dim TexFind As String, SerchNumber As String<br /> SerchNumber = Trim(InputBox("请输入要查找的项目 1:按姓名" & vbCrLf & vbCrLf & Space(19) & "2:按公司名称" & vbCrLf & vbCrLf & Space(19) & "3:电话号码 "
2010-09-25 20:25:00
491
原创 备份数据库和还原数据库
备份数据库Private Sub mnudbasecopy_Click() On Error Resume Next Dim tishi As String tishi = "智能报价系统.mdb文件是智能报价系统系统重要的数据文件,可手动把" & vbCrLf & vbCrLf & CheckFilePath(App.Path) & "智能报价系统.dbf" _ & vbCrLf & vbCrLf & "文件备份在安全的地方,妥善保存,以便以后恢复之用." A
2010-09-25 20:23:00
245
原创 10个api函数搞定注册表
修改了在注册表中对于取单个值的问题，判断注册表中的值是什么值，并逐个返回，可以单独判断一个值或一个项不存在时的状态，精简并优化了一些代码。可以返回和设置二进制、16进制和dword值。在窗体中：***************************************************************************模 块 名：Form1**
2009-11-17 08:31:00
678
原创 htmlhelp帮助制作及调用步骤
***************************************************************************模 块 名：Form1**说 明：永远的魔灵 by icecept(郭卫）**创 建 人：icecept(魔灵)**日 期：2009-11-15 20:27:03**修 改 人：icecept(魔灵)**版 本：V1.0.0**E-ma
2009-11-17 08:28:00
2651
原创 用资源文件做捆绑工具，（exe加入资源文件)
***************************************************************************模 块 名：Form1**说 明：永远的魔灵 by icecept(郭卫）**创 建 人：icecept(魔灵)**日 期：2009-11-15 20:27:03**修 改 人：icecept(魔灵)**版 本：V1.0.0**E
2009-11-17 08:25:00
807
原创 FSO文件系统对文件和文件夹的详细操作
***************************************************************************模 块 名：Form1**说 明：永远的魔灵 by icecept(郭卫）**创 建 人：icecept(魔灵)**日 期：2009-11-15 20:27:03**修 改 人：icecept(魔灵)**版 本：V1.0.0**E-ma
2009-11-17 08:19:00
942
原创 更改桌面主题
************************************************************************* Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As Stri
2009-11-17 08:12:00
358
原创 用资源文件做捆绑工具（控件加入资源文件）
-------------------------------------------------- 在窗体中---------------------------------------------------------------------********************************************************************
2009-11-16 21:09:00
523
原创 Explorer 崩溃重启后的任务栏图标重建
在窗体中：****************************************************************************模 块 名：工程1 - Form1**说 明：永远的魔灵 by icecept(郭卫）**创 建 人：icecept(魔灵)**日 期：2009-06-17 01:09:52**修 改 人：icecept(魔灵)**版
2009-11-16 21:05:00
1030
原创 QQ祝福语
****************************************************************************模 块 名：QQ祝福 - Form1**说 明：永远的魔灵 by icecept(郭卫）**创 建 人：icecept(魔灵)**日 期：2009-03-29 02:40:34**修 改 人：icecept(魔灵)**版 本
2009-11-16 11:20:00
1297
原创 做事的准则
作者：永远的魔灵 by 郭卫http://hi.baidu.com/icecept http://icecept.jimdo.com Email:icecept@163.com QQ:543375508 在以前的日子里,我以平面设计为主,程序设计为辅,慢慢执行我的计划,但我忽视了一个非常重要的一点,那就是团队协作.到我进入图文输出公司,我深深地体会到了这一点
2009-11-16 11:19:00
425
原创 爱之永恒之懂得放手
作者：永远的魔灵 by 郭卫http://hi.baidu.com/icecept http://icecept.jimdo.com Email:icecept@163.com QQ:543375508 一个小伙子非常爱一个姑娘，整天非常好的待她,捧在手里怕摔了。含在嘴里怕化了，每时每刻都陪着她，然而姑娘却有一天离她而去。小伙子百思不得其解，费尽周折找到了她。
2009-11-16 11:18:00
317
原创 爱之永恒之唐诗新编
作者：永远的魔灵 by 郭卫http://hi.baidu.com/icecept http://icecept.jimdo.com Email:icecept@163.com QQ:543375508望庐山瀑布 (唐)李白 日照香炉生紫烟， 遥看瀑布挂前川。 飞流直下三千尺， 疑是银河落九天。原释意：庐山风景秀丽，香炉峰的瀑布尤为壮观，诗人以十分兴奋的心情
2009-11-16 11:17:00
408
原创 爱之永恒之天籁绝音
作者：永远的魔灵 by 郭卫http://hi.baidu.com/icecept http://icecept.jimdo.com Email:icecept@163.com QQ:543375508 以牺牲之因，种轮回之果。为什么惊天动、泣鬼神的爱情都要生离死别，人世间为何这样的痛苦呢？一首天籁绝音给人以无尽的遐想。请大家闭上眼睛，倾听这首天
2009-11-16 11:14:00
353
原创 爱之永恒
作者：永远的魔灵 by 郭卫http://hi.baidu.com/icecept http://icecept.jimdo.com Email:icecept@163.com QQ:543375508 上帝来到了地球，发现地球上死寂沉沉，便用泥巴捏了一些动物，放到地上向他们吹了口气，竟然活了。上帝又动手按自己的模样捏了一个男人和一个女人，上帝对男人说：“你将是地
2009-11-16 11:11:00
302
VB.net_2010程序集
2016-10-07
VB抢30游戏—益智
2012-03-16
整点报时最新修改版
2011-10-03
用coreldraw+制作外发光字
2010-07-23
定制自己的特定程序 by icecept <永远的魔灵>
2010-07-23
采用双重加密技巧的加密记事本
2010-07-23
计算整数分区和winrar分卷字节数
2010-07-23
企业商品管理数据管理
2009-02-02
企业商品管理旧版
2008-05-06
记事本自动保存sendmessage方法.rar
2007-12-13
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人