vb下如何根据窗体中某一文本框的值（如：[审核]）将整体设置成只读或状态者可编辑状态，

vb下如何根据窗体中某一文本框的值（如：[审核]）将整体设置成只读或状态者可编辑状态，

1、你是希望一个控件设置【只读】/【编辑】 状态还是好几个？
2、你设置【只读】/【编辑】 状态的依据是？
3、实现这个目的，有两个方法
方法1：可输入的控件有 locked这个属性，locked=false 可编辑，locked=true 不可编辑
方法2：添加一个可以作为容器的控件（picturebox、frame等），把你需要调整状态的控件放进这个控件内，当这个控件的enable=true 时，控件内的那些控件（需要改变状态的控件）处于可编辑状态；当enable=false 时，控件处于不可用编辑状态
4、实现方法，如果是根据文本框的值去改变这个状态，还不如用combobox控件来实现

private sub text1_mousedown(button as integer, shift as integer, x as single, y as single) 'text的鼠标mousedown事件 text1.locked = true '锁定text文本框内容不被删除 if button = 2 then '判断鼠标右键的使用 msgbox "请不要使用鼠标右键", , "警告" '弹出对话框，禁止右键复制 end if end sub

if text1.text="[审核]" then form1.enabled=false if text1.text="[其他]" then form1.enabled=true

将需要变成“只读”状态的控件放入一个无边框的Panel里面，当Panel的Enable=False时，其上的所有元素均不可操作。