vb如何读取记事本内容批量建文件夹？

Question

如图所示，一直报错，有没有更好的方法，或者帮我改下 ，

Answer 1

记事本 录入 md 1 md 2 md 3 保存为任意文件名.bat 保存以后双击 就会建 1 2 3三个文件追问

用vb，我要问的是代码，你说的什么东西？

Answer 2

大概看了下代码，你把数据操作与界面（textbox）绑定起来是不对的

不应该依赖于任何界面元素。

建议把后面那个封装为一个方法，参数是text，前面调用后面的方法

判断每行的内容是否符合格式要求

创建文件夹之前判断路径是否合法

Answer 3

Option Explicit
Private Sub Command1_Click()
Dim strLine As String
Open App.Path & "/t.txt " For Input As #1
Do Until EOF(1)
Line Input #1, strLine
Text1.Text = Text1.Text & strLine & vbCrLf
Loop
Close #1
End Sub
Private Sub Text1_Change()
Dim name As String
Dim router As String
name = Text1.Text '把text文本的内容赋值给name
router = "D:\" & name
If Dir(router, vbDirectory) = "" Then '判断是否已经存在同名的文件夹
MkDir router
Else
MsgBox "D盘已经存在以" & name & "命名的文件夹！"
End If
End Sub
试试这个