yachong-优快云博客

原创图

图

2008-09-08 13:09:00 427

转载 VB中用API判断数组为空或没有初始化

Private Declare Function SafeArrayGetDim Lib "oleaut32.dll" (ByRef saArray() As Any) As Long API判断数组为空或没有初始化 Private Sub Command1_Click()Dim tmp() As StringIf SafeArrayGetDim(tmp) = 0 ThenMsgBox "数

2007-05-20 12:48:00 2112 1

原创让MSFlexGrid支持滚轮

如果程序里面有多个窗体，每个窗体包含多个MSFlexGrid控件，使用这种办法比单独为每个网格控件编写代码方便一些用文本替换把“MSFlexGrid”替换为“MSHFlexGrid”就可以支持MSHFlexGrid控件了新建一个模块，贴上下面的代码：Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLong

2007-01-26 11:16:00 3955

原创 VB6数据库编程的一点入门经验

很久很久以前写的一段文字，在软盘里放了N年。－－飞利浦的软盘质量不错：）aphismail-job＃yahoo.com.cn偶学VB有两三年的时间了，初学的时候，碰到不少困难，没少在BBS上提问，得到了不少帮助。现在还很多初学者像偶当初那样遇到了各种各样的困难，而且很多是偶当初遇到过的。于是偶动了一个念头，把偶这两年的体会写一点出来，供初学者们参考一下。当然偶没有办法写太多，暂时先把关

2006-06-07 17:29:00 7390

VB6实现XP风格控件

工程里面添加一个资源，不需要额外带一个.manifest文件

2010-09-17

MSFlexGrid网格控件加复选框

并没有真的添加复选框控件，而是使用CellPicture属性实现效果。

2009-05-08

蚜虫的汉诺塔

TURBO C 2.0环境下编写，用直接写屏方式实现图形界面。盘子数目1－9，可以手工完成，也可以自动完成。手工游戏遇到困难时，可以按A键由程序自动完成剩下的部分。写这个程序主要是想实现在任意初始状态下都可以自动完成整个过程，而不是教材上那种只可以从最初始状态开始。

2006-10-29

空空如也

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

TA关注的人

原创 图