@MoRanjiang 你这个思路很有道理，AI 可能很难理解（使用相同大于号>小于号<运算符号下）字符串比较和数字比较之间的区别

@steveshi 你是 wifi 对面不一定是啊

特别是对于数学来说，还有很多几何方面的知识，光靠文字把这些东西学明白恐怕是很困难的

对于人来说，学习数学要上数学课，学习语文要上语文课，学习物理要上物理课，学习不同的知识需要针对性的上不同科目的课
但对于目前的 AI 学习来说，显然不会这么去做，就比如 gpt 语言模型，人们试图用一种统一的方式让 AI 学会各种不同领域的知识、认知、逻辑，就会出现局限性

让 AI 学明白初等数学，我觉得得有更加针对性的训练方法

vue 有带 compiler time 的浏览器包，可以在浏览器内享受大部分特性
react 的 jsx 需要进行编译，你要是会用 babel 的那个 standalone 包也可以在浏览器里运行 react
angular 编译时做的事情太多了，基本没什么可能
你要嫌本地安装 npm 、node 麻烦，可以直接用一些 web ide 类的产品

铅酸电池没那么容易自燃的，倒是需要担心担心电池寿命的问题，我的 UPS 长时间没管，断电后直接就寄了（使用说明里说最好定期放电，我没做），换了个电池才好

上海的话，严格意义上走人行道需要推（基本不会管），走斑马线需要推（这个真的会有人管，不过不走斑马线就可以不用推）

@H0H 首先现在这个时间点恶意代码早被删了，而且你用三星应该是安全的(三星这种国际厂商跟安卓版本和系统漏洞补丁推送应该做的还可以)。得是非最新版的安卓才会有问题，国内厂商安卓版本跟的慢，很多人还不爱更新，消费能力优先很多系统不更新的手机也会被用很久，还有鸿蒙这种东西

靠谱的队友，那就是看你的人脉资源了，人脉也是一种资源也有价值，培养人脉也是种能力

@mxT52CRuqR6o5 仔细看了一眼是旧新闻，我白激动了😂

苹果商店的拼多多好像也下架了，反抗还是有一点点的成果的

跟宽带商之间的结算规则有关

完全离线肯定也是可以登陆的，你的情况估计比较特殊，由于墙的原因，似连非连的，就出问题了

我感觉需要确认一下「两个分辨率都是 1920×1080 」这件事，我咋感觉其中一个视频是 1080x1920

除非买到烂尾楼，不然一般不太有后悔，买房这么重要的事情，一般都是深思熟虑后的决定

想做行业标准的话，不搞开放，那就是成心不想好好做
现在的微软在开放方面做的事情真的好多了

发上来格式都没了，我传到 git 上了你可以看一下
https://github.com/nL6DHZc3RhMnC/chatgpt/blob/main/Please%20write%20a%20vbs%20script%20that%20can%20batch%20covert%20xls%20to%20xlsx.md

用 chatgpt 写了一份，简单 review 了一下似乎是没有大问题
关键的那一行 objWorkbook.SaveAs strNewFile, 51 我不太确定 51 是否对应 xlsx 格式
还有就是把 objExcel 提到循环外面来运行效率会更高一些，不然每一次循环都会打开 excel 关闭 excel
还还有就是生成新文件名变量 strNewFile 时，没有利用到 objFSO 简化代码，而是用了 Left&Len 搁那儿截来截去，可读性不是很好

Please write a vbs script that can batch covert xls to xlsx.

```
Option Explicit

Dim objFSO, objFolder, objFiles, objExcel, objWorkbook
Dim strFolderPath, strExtension, strNewExtension, strFile, strNewFile

' set the folder path containing the XLS files
strFolderPath = "C:\Users\Username\Desktop\XLS_Files"

' set the file extension to look for
strExtension = ".xls"

' set the new file extension
strNewExtension = ".xlsx"

' create file system object
Set objFSO = CreateObject("Scripting.FileSystemObject")

' get the folder object
Set objFolder = objFSO.GetFolder(strFolderPath)

' loop through all files in the folder
For Each objFiles In objFolder.Files

' check if file extension matches
If Right(objFiles.Name, Len(strExtension)) = strExtension Then

' create new file name with new extension
strFile = objFiles.Path
strNewFile = Left(strFile, Len(strFile) - Len(strExtension)) & strNewExtension

' create Excel object
Set objExcel = CreateObject("Excel.Application")

' open workbook
Set objWorkbook = objExcel.Workbooks.Open(strFile)

' save as XLSX file
objWorkbook.SaveAs strNewFile, 51

' close workbook and Excel object
objWorkbook.Close False
objExcel.Quit

' release Excel objects
Set objWorkbook = Nothing
Set objExcel = Nothing

End If

Next

' release file system objects
Set objFiles = Nothing
Set objFolder = Nothing
Set objFSO = Nothing

WScript.Echo "All XLS files converted to XLSX."

```