VB中怎样在TEXT文本框输入文本

如题所述

VB中在TEXT文本框输入文本应该不是问题,文本框获得焦点,就可直接在文本框输入文本。

估计问的是如何输入文本文件到文本框。

使用Open语句打开文本文件,逐行读入文本文件。

Private Sub Command1_Click()
    Dim strSj As String
    Dim s As String
    Open "c:\10.txt" For Input As #1
        Do Until EOF(1)
            Line Input #1, s
            strSj = strSj & s & vbCrLf
        Loop
    Close #1
    Text1 = strSj
End Sub追问

你好,我想做成这个效果,可是换不了行啊

请教

追答

换行需要设置文本框的MultiLine 为True

追问

哦,原来如此

温馨提示:答案为网友推荐,仅供参考