仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 898|回复: 8
打印 上一主题 下一主题

[学习教程] MYSQL教程之Access中怎样设定鼠标指针?

[复制链接]
萌萌妈妈 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:46:04 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
“通过有能力的DBA的一个简单计划,MySQL可以达到令人难以想像的运行速度,”一位资深DBA如此表示。MySQL中没有多余的功能来拖累CPU或占用内存。access|鼠标指针
Access中怎样设定鼠标指针?



成绩:

怎样设定鼠标指针?



办法一:

PrivateDeclareFunctionalxSetCursorLib"user32"Alias"SetCursor"(ByValhCursorAsLong)AsLong
将指定的鼠标指针设为以后指针
PrivateDeclareFunctionalxGetCursorLib"user32"Alias"GetCursor"()AsLong
猎取今朝选择的鼠标指针的句柄


PrivateSubMouseType()
获得摆布形光标的值
Screen.MousePointer=9设屏幕鼠标为9(摆布型鼠标)。
lngMouseOne=alxGetCursor()前往摆布型鼠标在WINDOWS(200098XP)的值。
Screen.MousePointer=7设屏幕鼠标为11(沙漏)。
lngMouseTwo=alxGetCursor()前往摆布型鼠标在WINDOWS(200098XP)的值。
Screen.MousePointer=0重设屏幕鼠标为0(ACCESS自断定)。
blTextout=False
blTextlook=False
EndSub






办法二:


任意找一个.cur文件copy到mdb文件不异的目次
PrivateDeclareFunctionCopyCursorLib"user32"Alias"CopyIcon"(ByValhcurAsLong)AsLong
PrivateDeclareFunctionLoadCursorFromFileLib"user32"Alias"LoadCursorFromFileA"(ByVallpstrCurFileAsString)AsLong
PrivateDeclareFunctionGetCursorLib"user32"()AsLong
PrivateDeclareFunctionSetSystemCursorLib"user32"(ByValhcurAsLong,ByValidAsLong)AsLong
PrivateConstOCR_NORMAL=32512


DimlngMyCursorAsLong
DimlngSystemCursorAsLong


PrivateSubcmdMyCursor_Click()变动指针款式
DimstrCurFileAsString
strCurFile=CurrentProject.Path+"Cursor.cur"
可随便挪用其他的.cur鼠标款式文件,以到达显现各类指针的目标
lngMyCursor=LoadCursorFromFile(strCurFile)
lngSystemCursor=GetCursor()
lngSystemCursor=CopyCursor(lngSystemCursor)
SetSystemCursorlngMyCursor,OCR_NORMAL
Text1.SetFocus
Text1.Text="鼠标指针已设定为您要的形态"
cmdMyCursor.Enabled=False
cmdSystemCursor.Enabled=True
EndSub


PrivateSubcmdSystemCursor_Click()恢复体系指针款式
SetSystemCursorlngSystemCursor,OCR_NORMAL
Text1.SetFocus
Text1.Text="鼠标指针已恢复为体系形态"
cmdMyCursor.Enabled=True
cmdSystemCursor.Enabled=False
lngSystemCursor=0
EndSub

PrivateSubForm_Close()
IflngSystemCursor0ThenSetSystemCursorlngSystemCursor,OCR_NORMAL
EndSub

PrivateSubForm_Unload(CancelAsInteger)
IflngSystemCursor0ThenSetSystemCursorlngSystemCursor,OCR_NORMAL
EndSub



DBaaS系统其实具有更大的市场机遇:像其他云服务一样,DBaaS意味着更短的销售周期,更少的启动费用,持续不断的收入,也意味着比之前更多的客户。
活着的死人 该用户已被删除
沙发
发表于 2015-1-19 23:08:19 | 只看该作者
原理很简单,对要求长时间计算某一时间点的报表生成和防用户操作错误很有帮助。但是比起Oracle10g的闪回技术还是细粒度不够。可惜!
小女巫 该用户已被删除
板凳
发表于 2015-1-28 15:03:47 | 只看该作者
记得在最开始使用2k的时候就要用到这个功能,可惜2k没有,现在有了作解决方案的朋友会很高兴吧。
不帅 该用户已被删除
地板
发表于 2015-2-5 21:47:41 | 只看该作者
大侠们有推荐的书籍和学习方法写下吧。
灵魂腐蚀 该用户已被删除
5#
发表于 2015-2-13 18:30:33 | 只看该作者
原理很简单,对要求长时间计算某一时间点的报表生成和防用户操作错误很有帮助。但是比起Oracle10g的闪回技术还是细粒度不够。可惜!
飘飘悠悠 该用户已被删除
6#
发表于 2015-3-4 01:06:09 | 只看该作者
varchar(max)\\\\nvarchar(max)类型的引入大大的提高了编程的效率,可以使用字符串函数对CLOB类型进行操作,这是一个亮点。
萌萌妈妈 该用户已被删除
7#
 楼主| 发表于 2015-3-11 15:07:29 | 只看该作者
你觉得我的非分区索引无法对起子分区,你可以提醒我一下呀!没有任何的提醒,直接就变成了非分区表。不知道这算不算一个bug。大家也可以试试。
老尸 该用户已被删除
8#
发表于 2015-3-19 00:52:05 | 只看该作者
作了些试验,发现使用CLR的存储过程或函数在达到一定的阀值的时候,系统性能会呈指数级下滑!这是非常危险的!只使用几个可能没有问题,当一旦大规模使用会造成严重的系统性能问题!
分手快乐 该用户已被删除
9#
发表于 2015-3-27 00:09:28 | 只看该作者
但换公司用MSSQL2K感觉自己好像根本就不了解MSSQL。什么DTS触发器以前根本没用过。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-5-3 16:57

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表