自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(30)
  • 资源 (8)
  • 收藏
  • 关注

原创 Dosbox安装Windows 95图文教学

用dosbox封装win9x老游戏,特点就是包的体积小,完全绿色,自动挂载光盘镜像. 第一步:准备工作 Dosbox有许多版本,我们采用韩国人ykhwong整合的DOSBox SVN-Daum 20140127版本,这个版本的优点是稳定,支持巫毒卡、支持挂载带音轨CD镜像,可惜不支持同时挂载多个光盘,用热键更换(也许是我没测试出来,知道的大大请赐教)。而最新的20150125版本虽然支持

2016-12-14 15:58:27 14824

原创 DOSBOX 0.74模拟器安装Windows 95

DosBox本身带有5.0版的DOS系统,启动后虚拟一个Z盘存放有Dosbox特有的外部指令,如config.com、imgmount.com等,经测试,可以顺利安装各版本的windows 3.1系统,但是不能安装win95,需要用原版的dos镜像启动才能安装。1. 获取启动盘镜像文件 下载Win95启动软盘镜像文件,名为boot.img,放到DosBox 0.74的目录下。2. 制作硬盘镜像文件

2015-12-05 18:55:03 7854 1

原创 VB6源代码--A*最短路径算法(AStar Shortest Path Finder)

'--------Form1代码--------------Option ExplicitDim Running As BooleanDim Done As BooleanPrivate Sub Game_Loop() Collision_Detection Get_Player_Info Get_Sprite_Info Mons

2015-09-28 15:36:52 1460

原创 VMware workstation虚拟机安装64位操作系统

有时候,我们想用VMware装64位操作系统,例如Win 8 x64或win 2012 server x64 R2,在辛辛苦苦下载了几个G的ISO安装光盘后,发现无法在VMware中安装系统,会弹出下面的报错窗口:遇到此问题,需要到你的主板BIOS中,打开Intel VT设置,以华硕主板为例,开机按F2进入华硕BIOS:按F7进入高级模式:点击“高级”--“处理

2015-09-06 11:19:24 2089

原创 VB6围棋:窗体画线和画圆的应用

Option ExplicitDim qipan(1 To 19, 1 To 19) As Integer '棋盘数组,0:无 1:黑子 2:白子Private Sub Form_Load()Me.AutoRedraw = TrueEnd SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, x As Single,

2015-08-30 16:11:48 2281

原创 VB6获取本机网络适配器信息(网卡名称、IP地址、子网掩码、默认网关等)

Function PrintAll_NICAdapter_information() Dim NIC_Info As String strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") Set colItems = objWMIService.E

2015-08-30 16:09:06 4379

原创 VB6 获取内存、硬盘、CPU使用率信息

Public Function 内存信息() As String Set objWMI = GetObject("winmgmts:\\" & "." & "\root\cimv2") Set colOS = objWMI.InstancesOf("Win32_OperatingSystem") For Each objOS In colOS 总内存 = Ro

2015-08-30 16:06:43 2727

原创 华硕B85M-G主板安装心得

过年前从淘宝订购了一批电脑配件,准备自己动手安装一台电脑。之所以不买现成的台式机,一来是很久没装机手痒了,二来是可以自己选择中意的配件,第三是不想上奸商的当。这是我在淘宝千挑万选后的购买记录: 总价是2759.9元,含快递费7.1元,其中有几样的快递费和店主商量之后取消了。货到的时候我正在出差,回来发现商品都到了,所送的赠品一个不缺,就是不知道能不能顺利拼出一台电脑。 主板电源连接500

2015-08-30 15:59:01 10397

华硕B85M-G主板安装心得

过年前从淘宝订购了一批电脑配件,准备自己动手安装一台电脑。之所以不买现成的台式机,一来是很久没装机手痒了,二来是可以自己选择中意的配件,第三是不想上奸商的当。这是我在淘宝千挑万选后的购买记录:

2015-08-30 15:42:40 1837

原创 win7/8/8.1/10 64位正确安装vb6.0的方法

在64位系统中,按照通常的方法安装VB 6.0,会发现安装到最后一步,安装程序会失去响应。并且重启后没有进一步的设置,而且控制面板的添加/删除程序中也没有VB6的影子。运行VB6环境后,所有的第三方控件无法使用。但是按照下面的方法就不会出现以上问题:工具/原料VB6.0安装包thunder://QUFodHRwOi8vZnRwLmNvZGVwdWIuY29t

2015-08-13 20:30:07 3865

原创 VB.NET 网络通讯示例(客户端)

VB.NET 网络通讯示例(客户端)

2015-08-12 17:07:20 4275 1

原创 VB.NET 网络通讯示例(服务端)

VB.NET 网络通讯示例(服务端)

2015-08-12 17:03:29 3223 1

原创 短小精悍的俄罗斯方块VB.NET源代码

短小精悍的俄罗斯方块VB.NET源代码,共128行

2015-08-12 17:00:09 1525

原创 在VC.NET中调用VB.NET或C#生成的DLL类库

在C++中,想要调用其它语言编写的DLL动态库,原先通常的做法是基于COM组件(Component Object Module)技术编译ActiveX DLL动态链接库,注册(Regsvr32)之后即可在C++中调用。到了DOTNET环境中,上述方法依然有效,因为VC.NET依然支持非托管DLL文件,但是VB.NET/C#编写的DLL类库属于托管代码,就不能用非托管方式调用了。当然,VB.NET或C

2015-08-12 16:54:03 2705

原创 VB.NET通过PID(ProcessID)获得某进程的CPU使用率

查了一些资料,最简单的就是通过.NET提供的性能计数器获取,代码如下:Imports System.DiagnosticsModule Module1 Sub Main() Dim strCPU As String, strMemory As String, PID As UInteger = 0, MyProcess As Process Console.W

2015-08-12 16:45:27 1691

原创 VB.Net之ProcessStartInfo对象应用:启动外部DOS程序,并实时获取运行信息

在传统VB程序中,你可以使用Shell函数启动一个应用程序。当你传送一个数据文件名的时候,VB在相应应用程序中打开这个数据文件。你可以使用一个任选的windowstyle参数控制所启动的应用程序的窗口方式。例如,在VB6中,下面这行代码将启动默认的文本编辑器(通常是记事本)并打开文件"D:\run.txt":returnID = Shell("D:\run.txt", vbNormalFocus)

2015-08-12 16:42:29 3526

原创 VB.NET线程池应用实例

这是一个利用线程池测试局域网中哪些IP地址可以Ping通的例子,原作者文章参见http://hi.baidu.com/xjnzhidao/blog/item/a0cec53c66e062a9d1a2d377.html。原作者提供的代码是控制台代码,博主改为WinForm代码。新建一个WinForm,然后在窗体上放置两个文本框,命名为IpBox1和IpBox2,一个多行文本框和两个按钮,如图:

2015-08-12 16:34:48 1521

原创 VB.NET 输入IP地址的自定义用户控件

VB2010的控件面板上有MaskedTextBox,可将其Mask属性设置为000.000.000.000,即可输入IP地址,但是实际使用中,总觉得与系统中网卡IP地址输入框相去甚远,因此采用四个文本框和四个标签控件(用于显示小数点)组合,制作一个类似的IP地址输入框控件。

2015-08-12 16:26:55 1630

原创 VB.NET 输入IP地址的自定义用户控件(上)

VB2010的控件面板上有MaskedTextBox,可将其Mask属性设置为000.000.000.000,即可输入IP地址,但是实际使用中,总觉得与系统中网卡IP地址输入框相去甚远,因此采用四个文本框和四个标签控件(用于显示小数点)组合,制作一个类似的IP地址输入框控件。

2015-08-12 16:15:49 810

原创 一秒钟检测一个局域网网段--VB.NET通过异步Ping方法测试局域网通断(非多线程)

窗体上放置一个ListBox列表框,一个Button按钮,名字缺省,代码如下:Public Class Form1Private mPingAddresses As List(Of String) Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase

2015-08-07 17:08:51 2062

原创 VB.net调用C++ 6.0 DLL内部函数

VB.net调用C++ 6.0 DLL内部函数动态链接库技术是Windows最重要的实现技术之一,Windows的许多新功能、新特性都是通过DLL来实现的。其实,Windows本身就是由许多DLL组成的,它最基本的三大组成模块Kernel、GDI和User都是DLL。使用动态链接库的优点是显而易见的。将应用程序的一部分功能提取出来做成动态链接库,不但减小了主应用程序的大小,提高了程序运行效率,还使它

2015-08-07 16:51:29 2284

原创 vb.net:DataGridView控件显示数据库字段内容时,根据枚举类型“翻译”成相应字符串

题外话:网上关于VB.NET的资料实在太少,难道所有程序员都奔C#去了?不解中.... 很多时候只好看C#的,很吃力...还有一个办法就是看国外网站的资料,更吃力...用户在执行数据库查询操作时,流程一般是:SqlDataAdapter从数据库中获取数据,并将其用Fill方法存储在DataSet中,然后将DataGridView控件的数据源绑定为DataSet,即可将查询结果显示出来,整个过程只需要

2015-08-07 16:39:43 1773

原创 VB.NET读取数据库时多线程显示进度条

VB.net通过ADO.NET连接数据库,或执行查询语句等,都需要等待一段时间,这段时间界面无法操作,程序显示出假死现象,无任何响应,为了不让用户误认为电脑死机,需要显示一个进度条来提示用户。但是问题在于,ADO.NET(包括其它数据库引擎)在执行指令时并不返回实时状态信息,只有在命令执行完毕后,才返回结果。因此,需要通过VB.NET多线程技术,在ADO.NET执行命令期间,显示一个不断变化的进度条

2015-08-07 16:36:21 4120 1

原创 VB.NET 获取ListView被鼠标选中的项的某列内容

Private Sub ListView2_ItemSelectionChanged(sender As Object, e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView2.ItemSelectionChanged If e.IsSelected Then TextBox1.Te

2015-08-07 16:30:01 4587

原创 VB.net遍历搜索Treeview,找到符合字符串条件的节点

ListView,Treeview

2015-08-07 16:27:44 2766 1

原创 vb.net ListView表格控件任意列排序和增加排序小箭头

定义一个clsListviewSorter类

2015-08-07 16:22:39 2686

原创 vb.net侧边栏图形菜单

VB6时代,做侧边栏菜单非常困难,一般都要用到第三方控件,但是在VB.net中,做侧边栏图形菜单非常方便,先看效果: 这是菜单选中效果: 这些菜单都是用Label控件做的,容器是用的Panel控件,用的代码很少,具体做法:1、拖放一个panel控件在窗体左边,设置BackgroundImage属性,加入一张漂亮的背景图,设置BackgroundImageLayout属性,有平铺、居中、缩

2015-08-07 16:06:44 4062

原创 vb.net SplitContainer控件增加自动拆分的小箭头

SplitContainer控件如何在拆分条上实现两个三角按钮,单击这个按钮实现上下两个panel面板自动展开或折叠功能?如图所示: 首先定义一个SplitContainerExt类,代码如下:Public Class SplitContainerExt Inherits SplitContainer Public Sub New() initArrows()

2015-08-07 15:52:47 2539

原创 vb.net读取配置文件

Windows Form应用程序自带App.config文件,利用它可方便的读取配置信息,假设我们开发的应用程序需要连接数据库,从应用角度来说,不能将数据库服务器的IP地址、登录名、登录代码直接写在程序代码里面,否则IP地址有变化就要改程序了。VS平台下的WinForm带有App.config文件,可以用于保存用户的配置信息:<?xml version="1.0" encoding="utf-8"

2015-08-07 15:24:42 2930

vb.net读取配置文件

Windows Form应用程序自带App.config文件,利用它可方便的读取配置信息,这里以数据库配置为例: 上面是App.config文件的内容,如何读取数据库配置信息呢?下面的代码定义了一个过程打开数据库,返回True表示打开成功,返回False表示打开失败:

2015-08-07 15:06:14 263

VB2010网络通讯实例

VB2010网络通讯实例,含服务器和客户端

2013-02-20

vb2010 消方块游戏

很有趣的消方块类游戏,完全源代码,品质不亚于专业游戏。

2012-05-19

VB6英汉小词典,不使用数据库

VB6制作的英汉小词典,不使用数据库技术,词典内容从文本文件读取,现已有4591条词目,可随意添加。界面简洁美观,使用方便。

2012-05-19

PACMAN吃豆人

很经典的PACMAN吃豆人游戏,不过只有一关,完全VB6源代码。

2012-04-18

LED数码管时钟

分解LED数码管图片,根据当前时间,显示数字时钟

2012-04-18

自定义控件:标题上带排序箭头的ListView控件

列标题上带排序箭头的ListView控件,可用鼠标点击列标题来排序,可顺序或倒序,箭头随之改变方向,完全源码。

2012-04-18

VB6键盘模拟电子琴演奏

非常漂亮、专业的电子琴演奏,支持Midi,Wavetable,支持多种乐器音色,逼真的钢琴键,简单的操作,完全VB6源码!

2011-10-13

VB6 模拟石英钟,有指针和刻度

有指针和刻度,年月日数字显示,时间数字显示,界面简洁,代码简单。

2011-06-17

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除