首页
电子手办柜
友链
统计
更多
留言
Search
1
《绿皮书》《Green Book》
581 阅读
2
如何用Siri唤醒电脑(by服务器)
428 阅读
3
欢迎使用 Typecho
331 阅读
4
斯人若彩虹,遇上方知有。
277 阅读
5
Remove-Password-on-Excel-VBA-Project(简单绕过VBA项目密码)
265 阅读
默认分类
杂谈
灵魂
代码
登录
Search
标签搜索
python
小冷柠's Blog
累计撰写
77
篇文章
累计收到
5,637
条评论
首页
栏目
默认分类
杂谈
灵魂
代码
页面
电子手办柜
友链
统计
留言
搜索到
45
篇与
的结果
斯人若彩虹,遇上方知有。
2021年03月21日
277 阅读
0 评论
0 点赞
2021-03-21
观看链接https://www.bilibili.com/bangumi/play/ep291708Some of us get dipped in flat, some in satin, some in gloss. But every once in a while you find someone who's iridescent, and when you do, nothing will ever compare.有些人沦为平庸浅薄,金玉其外,而败絮其中。可不经意间,有一天你会遇到一个彩虹般绚丽的人,从此以后,其他人就不过是匆匆浮云。2021-03-21 19:39:29 星期日
2021-03-10
第三人称
昨晚喜欢的男孩子发了新女友的照片,很难过。做个大人真好啊,十分钟就能让自己认清了这个现实,终于不会为难自己,你不想要的我都没有,更何况只是没说出来的几句话而已,那就祝你生活愉快然后平安喜乐,我的缘分或许还是另有安排吧。{music id="502043537" /}
2021年03月10日
108 阅读
0 评论
0 点赞
2021-03-07
Remove-Password-on-Excel-VBA-Project(简单绕过VBA项目密码)
Remove-Password-on-Excel-VBA-Project-master.zip{mtitle}方法{/mtitle}Open the file(s) that contain your locked VBA ProjectsOpen a new Excel fileHit Alt+F11 to view the Visual Basic EditorHit Insert-ModulePaste the code in Module1Close the Visual Basic EditorOpen the Excel file that contain your locked VBA ProjectsGoto MacroOpen Book1!RecoverBytes and Run the MacroOpen Book1!Unprotected and Run the MacroEnjoyOption Explicit Private Const PAGE_EXECUTE_READWRITE = &H40 Private Declare Sub MoveMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Long, Source As Long, ByVal Length As Long) Private Declare Function VirtualProtect Lib "kernel32" (lpAddress As Long, _ ByVal dwSize As Long, ByVal flNewProtect As Long, lpflOldProtect As Long) As Long Private Declare Function GetModuleHandleA Lib "kernel32" (ByVal lpModuleName As String) As Long Private Declare Function GetProcAddress Lib "kernel32" (ByVal hModule As Long, _ ByVal lpProcName As String) As Long Private Declare Function DialogBoxParam Lib "user32" Alias "DialogBoxParamA" (ByVal hInstance As Long, _ ByVal pTemplateName As Long, ByVal hWndParent As Long, _ ByVal lpDialogFunc As Long, ByVal dwInitParam As Long) As Integer Dim HookBytes(0 To 5) As Byte Dim OriginBytes(0 To 5) As Byte Dim pFunc As Long Dim Flag As Boolean Private Function GetPtr(ByVal Value As Long) As Long GetPtr = Value End Function Public Sub RecoverBytes() If Flag Then MoveMemory ByVal pFunc, ByVal VarPtr(OriginBytes(0)), 6 End Sub Public Function Hook() As Boolean Dim TmpBytes(0 To 5) As Byte Dim p As Long Dim OriginProtect As Long Hook = False pFunc = GetProcAddress(GetModuleHandleA("user32.dll"), "DialogBoxParamA") If VirtualProtect(ByVal pFunc, 6, PAGE_EXECUTE_READWRITE, OriginProtect) <> 0 Then MoveMemory ByVal VarPtr(TmpBytes(0)), ByVal pFunc, 6 If TmpBytes(0) <> &H68 Then MoveMemory ByVal VarPtr(OriginBytes(0)), ByVal pFunc, 6 p = GetPtr(AddressOf MyDialogBoxParam) HookBytes(0) = &H68 MoveMemory ByVal VarPtr(HookBytes(1)), ByVal VarPtr(p), 4 HookBytes(5) = &HC3 MoveMemory ByVal pFunc, ByVal VarPtr(HookBytes(0)), 6 Flag = True Hook = True End If End If End Function Private Function MyDialogBoxParam(ByVal hInstance As Long, _ ByVal pTemplateName As Long, ByVal hWndParent As Long, _ ByVal lpDialogFunc As Long, ByVal dwInitParam As Long) As Integer If pTemplateName = 4070 Then MyDialogBoxParam = 1 Else RecoverBytes MyDialogBoxParam = DialogBoxParam(hInstance, pTemplateName, _ hWndParent, lpDialogFunc, dwInitParam) Hook End If End Function Sub unprotected() If Hook Then MsgBox "VBA Project is unprotected!", vbInformation, "*****" End If End Sub
2021年03月07日
265 阅读
0 评论
0 点赞
2021-02-03
诗集
1.夜晚潮湿,地面潮湿,空气寂静,树林沉默。(夜晚潮湿,地面潮湿,空气寂静,树林沉默,今夜我爱你。)——罗伯特.勃莱《你手捧希望而来》2.我不太喜欢山,我喜欢广阔的田野,树林和河。(我不太喜欢山,我喜欢广阔的田野,树林和河,咱们一起去吧。)——王小波写给李银河的信3.你头发乱了哦。(如果我爱你,而你也正巧爱我,你头发乱了的时候,我会笑笑地替你拨一拨,然后,手还留恋的在你发上多待几秒,但是,如果我爱你,而你不巧地不爱我,你头发乱了,我只会轻轻地告诉你,你头发乱了哦。)——树上春树4.人们从诗人的字句里,选取自己心爱的意义。(人们从诗人的字句里,选取自己心爱的意义。但诗句的最终意义是指向你。)——泰戈尔《吉檀迦利》5.你不像任何人。(你不像任何人,因为我爱你。)——聂鲁达《二十首情诗和一首绝望的歌》6.花盛开就是一句,夜漫过就是一篇。黄昏开始书写,黎明是无数的扉页。(花盛开就是一句,夜漫过就是一篇。黄昏开始书写,黎明是无数的扉页。全世界拼成首诗,我爱你当作最后一行。)——张嘉佳7.为什么乌鸦长得像写字台?(爱丽丝:疯帽子,我喜欢你。疯帽子:为什么?爱丽丝:因为乌鸦长得像写字台。疯帽子:为什么乌鸦长得像写字台?爱丽丝:因为我喜欢你没有理由。)——《爱丽丝梦游仙境》8.我从此不敢看观音。(出自黄梅戏《梁山伯与祝英台》中,梁山伯对女扮男装的祝英台起疑,于是有了下面的对白:“英台不是女儿身,因何耳上有环痕?”“耳环痕有原因,梁兄何必起疑云,村里酬神多庙会,年年有我扮观音,梁兄做文章要专心,你前程不想想钗裙。”“我从此不敢看观音。”——《梁山伯与祝英台》9.月遇从云,花遇和风,上的夜空很美。(月遇从云,花遇和风,今晚上的夜空很美,我又想你。)——太宰治10.世界上美好的东西不太多,立秋傍晚从河对岸吹来的风。(世界上美好的东西不太多,立秋傍晚从河对岸吹来的风,和二十来岁笑起来要人命的你。)——节选自宋小君的《下雨和遇见你》
2021年02月03日
80 阅读
0 评论
1 点赞
2020-12-26
Visual Studio Code不受支持
[line]VSC不受支持解决办法[/line]扩展插件中搜寻***Fix VSCode Checksums***Shift+Ctrl+P 运行Fix Checksums apply重启即可
2020年12月26日
227 阅读
0 评论
0 点赞
1
...
7
8
9