maokwen

创建引导菜单以启用/禁用 Hyper-v

创建引导菜单:

bcdedit /copy {current} /d "Windows 10 Pro(without Hyper-V)"

⚠使用此方法会清空 U 盘数据!

好久不用的 U 盘突然电脑认不了了, 用磁盘管理发现被划为了 EFI 分区.

win + R, 输入 Diskpart 打开 Diskpart 工具. 输入:

list disk

安装最新的 Android System Webview
拷贝一份 /System/framework/framework-res.apk 的副本到任意位置
搜索在其中搜索 webview, 将 /android/string/config_webViewPackageName 的值改为 com.google.android.webview
将修改后的文件覆盖回原位置
重启

	Sub MakeXml(iCaptionRow As Integer, iDataStartRow As Integer, sOutputFileName As String)
	'
	' 导出为xml 宏
	'
	Dim Q As String
	Q = Chr$(34)
	Dim NL As String
	NL = Chr$(13)
	Dim TT As String
	TT = Chr$(9)

-Sub hyper()
-  Dim shp As Shape
-  For Each shp In ActiveSheet.Shapes
-    If shp.Hyperlink.Address <> "" Then shp.Hyperlink.Delete
-  Next shp
-End Sub

	import sys

	# hello = "++++++++[>++++[>++>+++>+++>+<<<<-]>+>+>->>+[<]<-]>>.>---.+++++++..+++.>>.<-.<.+++.------.--------.>>+.>++."

	def cleanup(input):
	return ''.join(list(filter(lambda c: c in ['>', '<', '+', '-', '.', ',', '[', ']'], input)))


	class stream(list):
	def expand(self, index):

	if((Test-Path -LiteralPath "HKCU:\SOFTWARE\Microsoft\InputMethod\Settings\CHS") -ne $true) { New-Item "HKCU:\SOFTWARE\Microsoft\InputMethod\Settings\CHS" -force -ea SilentlyContinue };
	New-ItemProperty -LiteralPath 'HKCU:\SOFTWARE\Microsoft\InputMethod\Settings\CHS' -Name 'UserDefinedDoublePinyinScheme0' -Value 'XiaoHe2^*iuvdjhcwfg^xmlnpbksqszxkrltvyovt' -PropertyType String -Force -ea SilentlyContinue;