接着昨天,为了用户的需求,写好了VBA代码,但问题又来了,如果用户禁用宏怎么办,就达不到想要的效果了。那么怎么才能强制启动宏文件呢?测试了在关天,代码如下:PrivateSubWorkbook_BeforeClose(CancelAsBoolean)ThisWorkbook.IsAddin=TrueEndSubPrivateSubWorkbook_Open()ThisWorkbook.IsAddin=FalseEndSub这里比较关键的有两个事件,一个是工
系统 2019-08-12 09:27:33 2254
题目传送门1/*2双拓扑排序:抄的,以后来补3详细解释:http://blog.csdn.net/u012774187/article/details/407369954*/5#include6#include7#include8#include9#include10#include11#include12#include
系统 2019-08-12 09:27:16 2254
单点登录系统的类别:就目前比较流行的应用来看,单点登录系统主要分为三种类型:一种是基于oauth协议的网络令牌(我是这么叫的),一种是基于WebService或者简单Http协议实现的Passport机制,还有一种是以openid框架形成的通用账号登录机制。其中,基于oauth协议主要应用在网站外部,比较知名的有GoogleAccount、FacebookConnect和新浪微博链接等;Passport的应用主要是针对同一网站内不同架构不同平台,知名产品则
系统 2019-08-12 09:27:01 2254
使用fifo的好处有:1:串口的数据发送的数据量较大时,使用fifo可以大大降低MCU的开销。(有点类似串入并出的cput处理模型,本质上还是串行收发)2:在某些特殊场合,例如制定较复杂的协议时,可以使用fifo特性来做协议简化,比如一包数据包含8个字节,(并且fifo设置的长度为8),这样相当于把uart转换为类似CAN/以太网模型,这样信息可扩展性得到了质的提高,当然,这里需要同步协调。fifo分析拓展:1.如果要用中断来处理接收到的数据,就是说,接收
系统 2019-08-12 09:26:56 2254
1.尽量使用事务处理更新数据库VB的事务处理包括以BeginTrans开始,以CommitTrans或Rollback结尾的多条数据库操作指令。事务处理除了能很好的保证数据库的完整性以外,同时能大大提高数据库批量更新的效率。这是因为如果数据库更新操作没有使用事务处理,则每次Update操作都会引起数据库写盘一次。使用事务处理后,更新只在内存缓冲区内进行,执行CommitTrans时才将所有修改一次写回到磁盘中。使用事务处理要注意一下几点:(1)事务处理要有
系统 2019-08-12 01:52:14 2254
--测试数据DECLARE@tTABLE(IDchar(3),PIDchar(3),Namenvarchar(10))INSERT@tSELECT'001',NULL,'山东省'UNIONALLSELECT'002','001','烟台市'UNIONALLSELECT'004','002','招远市'UNIONALLSELECT'003','001','青岛市'UNIONALLSELECT'005',NULL,'四会市'UNIONALLSELECT'006
系统 2019-08-12 01:51:31 2254
花了一个月的功夫,终于完成了自己的音频处理平台,这个平台有基本的实时录音功能、播放功能、同时实时显示波形。以后所有的算法仿真都不用针对一小段语音文件了,可以实时处理,实时显示处理后的效果。根据当前项目需要加上了KTV功能,一边伴奏,一边显示歌词,一边录音。后期集中精力,研究各种音频开发算法。音频处理平台
系统 2019-08-12 01:33:26 2254
一:玩树莓派(RaspberryPi):二:用firefoxOS或者ubuntu的手机至于ubuntu的电脑,已经用上一段时间了。准备彻底放弃windows,拥抱开源三在GitHub上拥有至少一个开源项目一定要做的事(备忘)
系统 2019-08-12 01:33:11 2254
//根据传入的checkbox的选中状态设置所有checkbox的选中状态functionselectAll(obj){varallInput=document.getElementsByTagName("input");//alert(allInput.length);varloopTime=allInput.length;for(i=0;i
系统 2019-08-12 01:33:03 2254
SelectdistinctcasewhenBranchCourseIdisnullthenTb_Client.ThreePhaseKindelseBranchCourseIdendBranchCourseId,Tb_Client.*fromTb_ClientinnerjoinTb_Class_ClientonTb_Client.id=Tb_Class_Client.clientIdinnerjoinTb_Classontb_class_client.cl
系统 2019-08-12 01:32:25 2254