42.txt

VB文章集（含API、窗口、数据库、多媒体、系统、文件、等等）

防止用户编辑文本框控件中的内容
谭 翁 
Visual Basic中的文本框控件允许用户在其中键入文本，以便在程序中使用。相反，程序员可能会希望显示一些文本但不希望用户编辑该文本。本文介绍了如何创建只读的文本框控件的内容。
使一个文本框控件只读
在Visual Basic中，如果文本框控件的MultiLine属性设置为True，文本将会自动地换行到下一行。另外，如果文本框控件的ScrollBars属性设置为3-Both（或者1-Vertical，或者2-Horizontal），用户还能够滚动控件中的内容。
程序员要想实现文本框控件中的文本不可编辑，可将文本框控件中的内容设置为只读状态，这可以通过使用Microsoft Windows 应用程序编程接口（API）的SendMessage函数来实现。SendMessage函数可以用来发送一个EM_SETREADONLY消息到文本框控件中，这将使文本框控件变为只读。
要在程序中使用该SendMessage函数，需要将如下的声明语句包含在项目的通用声明部分中（注意该声明语句需要书写在一行内）：
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal w