苏格兰之风-CSDN博客

原创对16进制数进行MD5加密

Function MD5(ByVal strSource As String, ByVal Code As Int16) As String Try ' Dim dataToHash As Byte() = (New System.Text.ASCIIEncoding).GetBytes(strSource) D

2014-09-02 15:19:49 2064

原创 VB.net | 如何在程序中执行用户脚本以及进行代数式计算

浏览更多工具栏，点“COM”选项卡，找到 ScriptControl Object 控件，添加，并拖拽一个到窗体上。在工程项目属性中，点“程序集信息（Assembly Information）”按钮，选中“使程序集 COM 可见”。编写代码。代码一般是这样的：s = ScriptControl.Eval("(90-36)*5^2")

2014-04-14 16:13:57 1405

原创 vb.net链接ACCESS在xp下可以，在win7 64位下连接不上

编译-》高级编译器设置-》目标CPU-》x86即可

2013-10-08 09:44:15 1433

原创 VB.NET 多次读取ACCESS 建立树形时出现链接关闭错误

System.Runtime.InteropServices.COMException (0x800A0E7D): 连接无法用于执行此操作。在此上下文中它可能已被关闭或无效。在 ADODB.RecordsetClass.Open(Object Source, Object ActiveConnection, CursorTypeEnum CursorType, LockTypeEnum

2013-08-11 10:25:47 1120

原创 RichTextBox vb.net 关键词高亮

Imports HWND = System.IntPtrPublic Class Form_Rules Private Const WM_SETREDRAW As Integer = &HB Private Shared Function SendMessage(ByVal hwnd As HWND, ByVal wMsg As Integer, ByVal wPa

2013-07-19 11:31:50 1261

原创穷讲究什么....

穷讲究什么....

2013-07-12 14:40:25 695

原创 vb.net做的无窗口应用程序如何实现移动

Imports System.Drawing Imports System.Windows.Forms Public Class Form1 '****************************************** Private oOriginalRegion As Region = Nothing ' 用于窗体移动 Private bFormDragging As B

2013-07-10 16:07:35 1139

原创 MODBUS 浮点数

浮点数保存的字节格式如下：地址 +0 +1 +2 +3内容 SEEE EEEE EMMM MMMM MMMM MMMM MMMM MMMM这里S 代表符号位，1是负，0是正E 偏移127的幂，二进制阶码=(EEEEEEEE)-127。M 24位的尾数保存在23位中，只存储23位，最高位固定

2013-07-09 13:19:43 3889

原创 TCPserver客户端

Imports System.NetImports System.Net.SocketsImports SystemImports System.ThreadingImports System.IOPublic Class ChatServer Implements IDisposable#Region "自定义变量" Priva

2013-06-27 15:22:13 901

vb.net监控文件夹文件变动

磁盘或文件夹监视 FOR VB.NET2008 一个可以监视磁盘或文件夹动作的源代码，可以监视删除、添加、更新等动作。

2012-10-09

VB DDE通讯范例

VB DDE Server and Client 应用Visual Basic 6.0 实现DDE通信此软件包包括Server和Client 使用时要先打开Server然后再启动Client 否则Client就连不上Server了，当然你也可以做一下简单的处理使他们随时保持连接哈具体公能你自己看代码吧这里只是简单的DDE的应用

2012-02-17