MYSQL教程之Access中怎样设定鼠标指针？
“通过有能力的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意味着更短的销售周期，更少的启动费用，持续不断的收入，也意味着比之前更多的客户。 原理很简单，对要求长时间计算某一时间点的报表生成和防用户操作错误很有帮助。但是比起Oracle10g的闪回技术还是细粒度不够。可惜！ 记得在最开始使用2k的时候就要用到这个功能，可惜2k没有，现在有了作解决方案的朋友会很高兴吧。 大侠们有推荐的书籍和学习方法写下吧。 原理很简单，对要求长时间计算某一时间点的报表生成和防用户操作错误很有帮助。但是比起Oracle10g的闪回技术还是细粒度不够。可惜！ varchar(max)\\\\nvarchar(max)类型的引入大大的提高了编程的效率，可以使用字符串函数对CLOB类型进行操作，这是一个亮点。 你觉得我的非分区索引无法对起子分区，你可以提醒我一下呀！没有任何的提醒，直接就变成了非分区表。不知道这算不算一个bug。大家也可以试试。 作了些试验，发现使用CLR的存储过程或函数在达到一定的阀值的时候，系统性能会呈指数级下滑！这是非常危险的！只使用几个可能没有问题，当一旦大规模使用会造成严重的系统性能问题！ 但换公司用MSSQL2K感觉自己好像根本就不了解MSSQL。什么DTS触发器以前根本没用过。
页:
[1]