摘要: 第一位内涵的就是:没有对象 找到对象,却发现是别人的对象 不能加载也不能卸载...这到底是什么对象 哈哈哈~ 阅读全文
posted @ 2017-07-21 06:27 JustXIII 阅读(256) 评论(0) 推荐(0) 编辑
摘要: 算法图示: 运行效果: 详细代码: 阅读全文
posted @ 2017-07-21 06:25 JustXIII 阅读(933) 评论(0) 推荐(0) 编辑
摘要: 如上图,当进行连续判断的时候,即使第一个已经不符合条件了,后面的依然会计算.这点一定要记住,除非你所有的函数都有必要执行,否则会导致效率降低. 减代码不一定能提高效率,对于IIF和连续判断写法,貌似很多人都不知道funcA,funcB,funcC都会执行 代码如下,有兴趣的可以去试试 or 是否也像 阅读全文
posted @ 2017-07-21 06:23 JustXIII 阅读(1089) 评论(0) 推荐(0) 编辑
摘要: 通过执行一段VBS代码来操控窗体内的控件也可以使用AddObject方法添加自己的类,那么在动态VBS代码中也一样可以使用在增加程序扩展性或是有脚本化需求的时候,这个方法还是不错的. >>>运行效果如下图<<< 阅读全文
posted @ 2017-07-21 06:21 JustXIII 阅读(1506) 评论(0) 推荐(0) 编辑
摘要: 根据网络资料整改,来源未知,已调试通过. 测试代码: 阅读全文
posted @ 2017-07-21 06:18 JustXIII 阅读(722) 评论(0) 推荐(0) 编辑
摘要: 上面只是读取出来,如果要写入操作,也可以: 阅读全文
posted @ 2017-07-21 06:16 JustXIII 阅读(1323) 评论(0) 推荐(0) 编辑
摘要: VB里面用WINSOCK进行一对多连接的TCP连接时,经常需要群发消息给所有已连接的客户端.代码类似如下: 运行上面的代码发现,有时只有最后一个WINSOCK的客户端收到了消息,其他都没有收到. PS:郁闷了好久,意外的发现当点击以下暂停,然后再点击运行,其他客户端又收到了消息... 网络上没有搜到 阅读全文
posted @ 2017-07-21 06:13 JustXIII 阅读(1096) 评论(0) 推荐(0) 编辑
摘要: Option Explicit Private Type RGBA R As Byte G As Byte B As Byte A As Byte End Type Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As ... 阅读全文
posted @ 2017-07-21 06:05 JustXIII 阅读(709) 评论(0) 推荐(0) 编辑
摘要: 一共就下面的两个模块,调用只使用到mWSProtocol模块,所有调用函数功能简单介绍一下: 建立连接后就开始握手,服务端用Handshake()验证,如果是客户端自己发送握手封包接收数据,先用AnalyzeHeader()得到数据帧结构(DataFrame)然后再用PickDataV()或Pick 阅读全文
posted @ 2017-07-08 01:14 JustXIII 阅读(7479) 评论(11) 推荐(2) 编辑
摘要: 关于这个问题,网络上有各种解决的办法,关闭防火墙,HTTP/HTTPS切换,改端口... ...但我都试了没有用。本来一直用的好好的,突然就出现了这个问题,而且在几分钟前都是正常的。下面来说说我都干了什么:有两个封面图片,分别是1.jpg和2.jpg,客户发来两张图片让我替换掉。而原来的图片我觉得不 阅读全文
posted @ 2017-07-04 05:21 JustXIII 阅读(10854) 评论(1) 推荐(1) 编辑
摘要: short.MaxValue 32767 short.MinValue -32768 int.MaxValue 2147483647 int.MinValue -2147483648 long.MaxValue 9223372036854775807 long.MinValue -9223372036854775808 float.Epsilon 1.401298E-... 阅读全文
posted @ 2017-06-27 16:41 JustXIII 阅读(6794) 评论(0) 推荐(0) 编辑
摘要: ushort (*)泛型修饰符 abstract from 子句 from 子句 from 子句 *枚举关键字enum的默认类型为int,若需要其它类型,自行限定:public enum Option : byte { UnKnow,Normal,Low,High } 阅读全文
posted @ 2017-06-21 22:09 JustXIII 阅读(531) 评论(0) 推荐(0) 编辑
摘要: 清空数组>>>Array.Clear [去MSDN查看] 初始化数组>>>Initialize [去MSDN查看] 只是用于初始化,如果数组子项已经被初始化,那么不会改变它的值.(删除下面代码 x[1] = 6; 试试) 动态修改数组大小>>>Array.Resize [去MSDN查看] 处理流程是 阅读全文
posted @ 2017-06-19 18:30 JustXIII 阅读(65276) 评论(0) 推荐(2) 编辑
摘要: 最近遇到三个人问关于VB写网页服务器的问题,所以今天抽时间写一下,演示其实没有多复杂。 代码里自定义的方法只有四个,没有公共变量绕来绕去,该注释的也都注释了。 想扩展更复杂的功能,就需要自己补脑HTTP协议。 新建一个VB工程,界面及控件如下: 文本框控件名不变,两个按钮的Name分别是 启动服务  阅读全文
posted @ 2017-06-14 10:30 JustXIII 阅读(988) 评论(0) 推荐(0) 编辑
摘要: 我知道你为啥点进来,所以不要犹豫了,立刻马上果断创建控制台项目,直接复制下面精干短小而又强大的代码运行: 输入'x'回车,看效果: 如果触发事件的时候,想传递点参数怎么办?看来你是一个要求很高的人!请删掉上面的代码,复制下面的进去运行看看: 效果: 然而还有一些道友有着更高更骚的要求,比如使用了很多 阅读全文
posted @ 2017-06-14 06:16 JustXIII 阅读(21979) 评论(5) 推荐(5) 编辑
摘要: 将上面保存到文本文件,后缀改成*.reg,然后双击添加进注册表. 使用效果: 阅读全文
posted @ 2016-06-21 01:43 JustXIII 阅读(2157) 评论(0) 推荐(0) 编辑
摘要: 效果: 调用方法: 源码: 阅读全文
posted @ 2016-06-12 15:00 JustXIII 阅读(825) 评论(0) 推荐(0) 编辑
摘要: 下面是对象遍历,其实我也用不上 阅读全文
posted @ 2016-04-22 07:04 JustXIII 阅读(609) 评论(0) 推荐(0) 编辑
摘要: 2017/07/08 - 最新的封装模块在:http://www.cnblogs.com/xiii/p/7135233.html,这篇可以忽略了 早就写好了,看这方面资料比较少,索性贴出来.只是一个DEMO中的,没有做优化,代码比较草.由于没地方上传附件,所以只把一些主要的代码贴出来. 这只是服务端 阅读全文
posted @ 2016-01-28 10:03 JustXIII 阅读(8287) 评论(26) 推荐(2) 编辑
摘要: //转自网络,先留个底1.获取Return返回值//存储过程//Create PROCEDURE MYSQL// @a int,// @b int//AS// return @a + @b//GOSqlConnection conn = new SqlConnection(C... 阅读全文
posted @ 2016-01-27 05:49 JustXIII 阅读(5058) 评论(0) 推荐(0) 编辑