VBA Excel用户表单输出到Txt文件

Question

我正在尝试创建一个用户输入并打印到文本文件的用户表单。我知道VBA脚本函数可以打印，存储字符串等。但我是userforms的新手。如何将输入和输出限制为文本文件？添加到同一个文件？

输入和输出：

我需要有各种各样的

主要特点：

1. 限制条目：XXXX表示只输入4个字符（记事本文件只能是某些字符长

2. 多个条目：在向文本文件输入一组记录后，将存储其值并允许其他输入。此外，新条目必须写入下一行的同一文件

3. 空格如果留空：如果XXXX留空，则应打印四个“”。

如果你有部分或全部这些答案，我想听听你的意见！

---------------------------使用添加代码编辑---------------- -------------

Private Sub Userform_Initialize()

'Fill Eggs
With Eggs
    .AddItem "Eggs"
End With

End Sub

Private Sub CreateList_Click()

Dim myFile As String, myString As String
myFile = "C:\Reformatted.txt"
Open myFile For Output As #1

Dim fourChars As String * 4
fourChars = Milk.Value

myString = Eggs.Value + Milk.Value + Bread.Value

Print #1, myString

Close #1
Shell "C:\Windows\Notepad.exe C:\Reformatted.txt", 1

End Sub

所以上面的代码启动了这个屏幕：

Answer 1

TextBox具有MaxLength属性。默认设置为0，不限制字符输入 要将条目限制为特定数字，只需将此属性的值更改为该数字。

现在用空格替换XXXX（如果没有输入或少于4），请在评论中提出建议。

Dim fourChars As String * 4
fourChars = TextBox1.Value
MsgBox Len(fourChars) ' will always return 4