如何创建多行输入框

How can I create a multi-line input box

我正在尝试在 VB6 中创建一个输入框,以便我可以在 PROMPT 中包含空格。我试图做与 MSGBOX 相同的事情,但它不允许我做 VBCRLF。这就是我想要做的

This company has more than 1 department.
For Accounting type 1
For Reasearch  type 2

这里是输入框,右边是OK和CANCEL

以下代码将显示多行提示字符串:

Dim ret As String
Dim prompt As String

prompt = "This company has more than 1 department." & vbCrLf & _
    "For Accounting type 1" & vbCrLf & _
    "For Reasearch  type 2"


ret = InputBox$(prompt)