Function daxie(ByVal M) y = Int(Round(100 * Abs(M)) / 100) j = Round(100 * Abs(M) + 0.00001) - y * 100 f = Round((j / 10 - Int(j / 10)) * 10) ...
利用此函数可以剔除字符串中的汉字内容。（本代码中添加了对于中文计算符号的转换）'该函数不需要单独采用符号来注明汉字。 Function Sp(ByVal Num) Dim n, Chs For n = 1 To Len(Num) '先替换一些常用的计算符号，满足中英文混排。 If Mid(Num, n, 1)...
1、取得最后一行Range("A65536").End(xlUp).Row '取得A列的最后一行2、取得url网址的内容文本到strTextM1里面With CreateObject("MSXML2.XMLHTTP") ...
Function DaXie(ByVal Num) ' 人民币中文大写函数 Application.Volatile True Place = "分角元拾佰仟万拾佰仟亿拾佰仟万" Dn = "壹贰叁肆伍陆柒捌玖" D1 = "整零元零零零万零零零亿零零零万" If Num < 0 Then ...
'ilaoyao-编译于无锡WYJ工程用。 '输入自定义符号，例如"【】"，rsymbo输入时需要带双引号 Function gs(ByVal Num, rsymbo) As String Application.Volatile True 'If IsError(Trim(Str(Num))...
适用于win7,8,10系统，xp系统账户太脆弱了。办法：利用osk屏幕键盘（7,8）或者 sethc.exe（粘滞键，8,10）工具：winpe或者win7或者win8的修复启动盘方法：1、用winpe或者win7或者win8的修复盘进入系统（个人觉得如果是修复win7或者win8的话还是用对应的系统修复盘...
现在基本上不用chrome了，存放做个记录！解决以下几个问题： 自己动手做便携版的Chrome用 低版本的Chrome，并且清除版本太旧的提示 便携版Chrome有时候出现的一个图标bug 一、 自己动手做便携版的Chrome1、 Chome的便携版其实很简单，两个方法：A：下载一个你想要的版...
推荐系统1709或者1703以及以前的，1709以后没用过LTSC以及LTSB分支一、服务 1、Windows更新服务1）两个服务：一个显示名称为WindowsUpdate（名称wuauserv），另一个显示名称为Update OrchestratorService（名称UsoSvc）。进注册表HKEY_L...
解压软件三剑客中，7zip（官网：https://www.7-zip.org/）和Bandizip（官网：http://www.bandisoft.com/）应该是值得推荐的，免费、纯净、轻量、本地化，自带便携版，支持X86和X64。Bandizip也支持MAC平台。WinRAR（官网：https://www...
使用企业策略禁止FF的自动更新，更新前关闭FF， 用记事本或者Notepad++编辑一个新文件，输入以下内容： { "policies": { &n...