当前位置:编程学习 > VB >>

VB编程问题

在窗体上一个按扭单击后要使窗体旁的文本框内显示事先准备好的大篇文字,需要怎么弄,而且文字只能看不能修改
追问:来自手机问问那段文本要事先写在哪里呀
答案:'可以先把text1的ScrollBars设为3,MultiLine设为true ,不然长文本显示就有问题
Private Sub Command1_Click()
    Dim s As String
    s = "c:\123.txt"
    If Dir(s) <> "" Then '是否有文件存在
        Open s For Input As #1
        Text1 = StrConv(InputB(LOF(1), 1), vbUnicode)
        Close #1
    Else
        MsgBox "未找到文件:" & s
    End If
End Sub
Private Sub Form_Load()
    Text1.Enabled = False
End Sub
为了经验!谢谢

上一个:VB编程问题
下一个:vb编程代码

CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,