- 博客(14)
- 资源 (44)
- 收藏
- 关注
原创 工业自动化4~20mA信号采集LED大屏动态显示技术方案
工业自动化4~20mA信号采集LED大屏动态显示技术方案实现4~20mA信号转变为0~180°C温度显示在LED大屏上,实时动态显示,北京吉百利公司Cooker车间已实际应用案例;QQ:383268127
2013-12-29 18:55:09
1690
原创 非接触读卡智能LED大屏显示系统方案
非接触读卡,LED大屏智能显示系统方案项目背景:实现IC卡分组管理,根据读取IC卡信息LED大屏显示不同分组的刷卡累加值,同时显示改组的组名汉字信息等;方案1:通信方式为网口+USB口,通过电脑控制的方案; 方案2:开发专用的非接触读卡器,直接驱动LED大屏显示;上面两个方案各有优点,方案1的优点是采用通用“读卡器”和普通电脑,开发专用软件即可实现,开发周期短硬件成
2013-12-29 17:56:36
1430
原创 传令兵走了多少米
一列队伍长100米正在行进,传令兵从排尾走到排头,又从排头走到排尾,这列队伍正好前进了100米,已知队伍的速度和传令兵的速度保持不变!问传令兵走了多少米? 解题思路:1.队伍行进速度,不能为0否则队伍无法行进100米(回答200米的肯定是错了);2.传令兵行进速度应该是队伍的2倍多,否则传令兵就不能在队伍行进100米时返回到队尾,那就是传令兵在队伍不到200米的时候就到达了队头。(
2013-01-06 15:56:29
1292
转载 在vb中使用Iphlpapi.dll获取网络信息
※==================================================================※本连载文章说明:※1、连载首发于《软件报》(http://www.sweek.com)2006年21期(2006年5月22日);※2、此次网上连载采用的是原稿件结构,内容与《软件报》发表略有不同;※3、谢绝除《软件报》及其相关刊物之外的传统媒体部分
2012-05-08 08:45:18
2040
转载 VB随机字母的函数
Function RandABC(N As Long, Optional Model As Long = 1) As String''N是你想要得到字符串的长度''Model是你想得到大写还是小写字母,1--混合大小写,2--大写,3--小写"Dim StrDiaoyong As StringConst StrHunhe = "ABCDEFGHIJKLMNOPQRSTUVWXYZa
2012-05-08 08:37:49
2190
转载 VB后台获得按键,并执行自己的函数(非钩子及热键)
VB后台获得按键,并执行自己的函数(非钩子及热键)作者:丹心 QQ:121877114答案不太麻烦,一个TIMER控件即可 Option Explicit '按钮事件 Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As IntegerPublic Sub shift
2012-05-08 08:35:37
1910
转载 VB阳历转阴历
Option ExplicitDim WeekName(7), MonthAdd(11), NongliData(99), TianGan(9), DiZhi(11), ShuXiang(11), DayName(30), MonName(12)Dim CurTime, curYear, curMonth, curDay, curWeekdayDim GongliStr, Weekda
2012-05-08 08:30:19
1461
转载 VB利用资源文件进行工作
利用资源文件进行工作资源文件允许将应用程序特定版本的全部文本和位图收集到一起。这可以包括常数声明、图标、屏幕文本,以及可能在本地化版本之间或在修订版本或特定的配置之间发生变化的其它材料。向工程中添加资源可以使用资源编译器外接程序创建资源文件。编译过的资源文件带有 .res 扩展名。每个工程只能包含一个资源文件。资源文件实际上是由一系列独立的字符串、位图或者其它项目组成的,其中每一项
2012-05-08 08:28:26
627
转载 VB控件注册 - 利用资源文件将dll、ocx打包进exe文件
很多时候自定义或者引用控件都需要注册才能使用,但是如何使要注册的dll或ocx打包到exe中,使用户下载以后看到 现在介绍一下使用资源文件,将dll、ocx打包进exe,点击直接注册的例子: 首先,新建一个工程,在“外接程序”->“外接程序管理器”->“VB 6 资源管理器” 添加资源文件,可以讲图标、image等文件添加进去,这里我们添加的是ocx。添加后保存会生成一个
2012-05-08 08:26:18
1166
转载 另一方法转换大小写
''另一方法转换大小写''其实VB本来就有函数''UCASE(STRING) LCASE(STRING)''来实现大小写的转换''我也只是那天偶然看书,发现这样的函数一样能转换大小写Public Function XiaoXie(zimu As String) As StringXiaoXie = Format(zimu, "End Function
2012-05-08 08:24:20
416
转载 生成迷宫的程序
Private Sub form_Click() szx = 5000: szy = 5000: tr = 20: L = 50: mx = szx / L: my = szy / L: Dim A(1001,While Not (X = 2 And Y = 1)If A(X - 1, Y) * A(X, Y - 1) * A(X, Y + 1) * A(X + 1, Y) = 0 T
2012-05-08 08:23:33
503
转载 VB禁止使用 Alt-Tab 或 Ctrl-Alt-Del
禁止使用 Alt-Tab 或 Ctrl-Alt-Del Private Declare Function EnableWindow Lib "user32" (ByVal hWnd As Integer, ByVal aBOOL As Integer) As IntegerPrivate Declare Function IsWindowEnabled Lib "us
2012-05-08 08:22:44
1079
转载 VB快速读取 TextBox 第 N 行的资料
快速读取 TextBox 第 N 行的资料 TextBox 是以 vbCr+vbLf 为分行符号, 如果我们要逐一读取 TextBox 每一行,无非是寻找 vbCr+vbLf 的所在位置, 然后取出每一行的字串, 不过这个方法真的不快,而且如果我们要读取第 N 行资料, 还是要从第 1、2、┅N-1 行逐一读起, 实在麻烦。还好 Windows API 提供有读取 TextBo
2012-05-08 08:21:57
532
转载 VB获取windows各常用目录的函数(模块)
'***********************************************************'**模 块 名 GetFolderS'**作 用 获取WINDOWS特殊目录'**作 者 石陆'**制作日期 2007 / 12 / 4'**修 改'**修改日期'**
2012-05-08 08:20:32
790
十六进制自动生成工具软件
2017-07-06
多Sheet自动整合工具软件
2014-01-10
LED条屏控制卡通信控制协议完整版
2013-07-10
CRC算法-CRCTEST
2013-06-13
pads9.3汉化绿色精简版
2012-09-17
定时关机_自动关机
2012-06-06
MotoHelper_2.0.51_Driver_5.2.0
2012-05-25
A1200E刷机包
2012-05-25
Excel两表比对工具V2.1
2011-12-21
photoshop快速入门
2011-11-11
Excel两表比对工具
2011-10-31
批量删除Excel列
2011-10-31
Excel比对软件使用说明书
2011-05-26
BOM_Than.v5.5
2011-05-04
PCB电路板板材介绍,94HB/94VO/22F/CEM-1/CEM-3/FR-4
2010-07-28
器件封装介绍,常见封装有多图
2010-07-28
Excel两表校对,附件中有使用说明书和样表和帮助
2010-07-28
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人