VB
可西哥
暂不公布
展开
-
VB中的乱序函数
将C++的函数稍改了一下,以适合在VB里用。 从1-max中随机选择n个,放在数组arrT()最前面Public Sub RndSel(max As Integer, ByVal N As Integer, arrT() As Integer) Dim p As Integer Dim i As Integer Dim tmp As Integer I原创 2007-05-17 15:43:00 · 1877 阅读 · 1 评论 -
走迷宫算法
从起点问题的提出: 在游戏地图中,如何寻找一条从起点到终点的最短行路线路?数据表达:使用M*N大小的byte数组 来表示地图,每个位置的状态用0表示可走,1表示墙,2表示起点,3表示终点,128表示路径;行走规则有两种:4方向行走规则:只能从当前点向上,下,左,右 这4个方向行走;8方向行走规则:可以从当前点向上,下,左,右,左上,左下,右上,右下,这8个方向行走;行走方向编码:原创 2007-11-07 23:52:00 · 12360 阅读 · 17 评论 -
让光标在各文本框内自由移动的函数
这是一个早期写的函数,用于解决技术群里一个网友提出的问题.他的问题是这样的,在一个VB窗体中,有多个文本框,用户需要在文本框里输入一些值,为了使用方便,最好是能使用键盘来控制光标落,以便在这若干个文本框之间漫游,即,如果光标移到了文本框的开头,此时按下左箭头,则光标移到上一个文本框中;反之,如果光标在文本框的结束位置,此时按下右箭头,则光标移动下一个文本框中.我给出的解决方式是原创 2007-11-23 00:17:00 · 1836 阅读 · 0 评论 -
函数表达式解析器
函数表达式解析器 最早是在02年写的,当时刚学完数据结构里的栈,于是就着书上的例子实现了一个简单的后缀表达式分析器,可以解析简单的表达式,也可以画一些简单的图像。 之前的程序只能识别+-*/^这几个运算,并且只能认x这个变量,其它的就不行了。于是将运算扩展到三角函数,以及LOG,EXP,同时将变量扩展到多个,不限定哪个变量一定要有,反正设置变量的值,就可以计算表达式的值,如果没有原创 2008-04-28 13:39:00 · 1510 阅读 · 3 评论 -
通用支付网关正式上线
忙了有一阵了,构思的"通用支付网关接口"正式完成,虽然只完成了网银和支付宝的,但整体的思路基本上清析并固定下来了, 其实这个通用接口并没有什么特别.目前的网上支付平台很多,它们之间都有一些共性的东西,比如签名,通知,接口地址等等,根据这些共性的东西,创建一个基类,然后继承它生成针对某个支付接口的专用类,比如支付宝.这么做的原因是因为在刚有思路的时候,想偷懒不用去重复考虑每个支付原创 2008-08-27 12:51:00 · 830 阅读 · 0 评论