将扫码枪扫描的二维码写入TXT文本文件，然后用RationalDMIS读入为变量后发现开头有乱码，查看编码格式默认是UTF-8，查询MSDN中相关信息发现 WriteAllText 默认是UTF-8格式，用 System.Text.Encoding.ASCII 参数设置为ASCII编码即可正常读入RationalDMIS；
成都创新互联是一家朝气蓬勃的网站建设公司。公司专注于为企业提供信息化建设解决方案。从事网站开发，网站制作，网站设计，网站模板，微信公众号开发，软件开发，微信小程序，十载建站对房屋鉴定等多个方面，拥有丰富的网站营销经验。
将：
My.Computer.FileSystem.WriteAllText("C:\RationalDMIS\Data\bar.txt", TextBox1.Text, False)
改为：
My.Computer.FileSystem.WriteAllText("C:\RationalDMIS\Data\bar.txt", TextBox1.Text, False, System.Text.Encoding.ASCII)
文章标题：VB.netWriteAllText编码格式
本文地址：
http://cdkjz.cn/article/ghjggo.html
