企业🤖AI智能体构建引擎,智能编排和调试,一键部署,支持私有化部署方案 广告
<p><span style="font-weight:700;"><span style="font-size:16px;">EditBox&nbsp;属性</span></span></p> <p><span style="line-height:1.78571;">这个属性返回或设置一个值</span>,它指定对象的文本框属性</p> <p class="label" style="font-size:12px;">语法</p> <p><span class="emp"><i>object</i></span>.<b>EditBox</b>[ =&nbsp;<span class="emp"><i>Access.TextBox</i></span>]</p> <p><span style="font-weight:700;"><span style="font-weight:700;">EditBox</span></span>属性的语法包含下面部分:</p> <table class="MsoNormalTable" border="1" cellpadding="0" style="width:650px;"><tbody><tr><td width="29%" valign="top"><p class="MsoNormal"><span style="font-weight:700;"><span style="font-size:9pt;font-family:宋体;">部分</span></span><span style="font-size:9pt;font-family:宋体;"></span></p> </td> <td width="71%" valign="top"><p class="MsoNormal"><span style="font-weight:700;"><span style="font-size:9pt;font-family:宋体;">描述</span></span><span style="font-size:9pt;font-family:宋体;"></span></p> </td> </tr> <tr><td width="29%" valign="top"><p class="MsoNormal"><span class="emp"><i><span style="font-size:9pt;">object</span></i></span><span style="font-size:9pt;font-family:宋体;"></span></p> </td> <td width="71%" valign="top"><p class="MsoNormal">对象表达式,其值是“应用于”列表中的一个对象。</p> </td> </tr> <tr><td width="29%" valign="top"><p class="MsoNormal"><span class="emp"><i><span style="font-size:9pt;"><i>Access.TextBox</i></span></i></span><span style="font-size:9pt;font-family:宋体;"></span></p> </td> <td width="71%" valign="top"><p class="MsoNormal">一个Access对象的文本框属性</p> </td> </tr> </tbody> </table> <p class="MsoNormal">&nbsp;</p> <p class="label" style="font-size:12px;">说明</p> <p>这个属性包含较多的内容。可以使用Access中文本框的属性</p> <p>示例是控件标签是否允许修改。</p> <p><span style="font-weight:700;"></span><span style="font-weight:700;"></span><span style="font-weight:700;"></span><span style="font-weight:700;"></span><span style="font-weight:700;"></span></p> <pre class="prettyprint lang-vb">Private Sub CmbLabelEdit_AfterUpdate() &nbsp; &nbsp; TreeView0.LabelEdit = Nz(Me.CmbLabelEdit, 0) &nbsp; &nbsp; If TreeView0.LabelEdit = tvwAutomatic Then &nbsp; &nbsp; &nbsp; &nbsp; Set TreeView0.EditBox = Me.TxtTreeEdit &nbsp; &nbsp; End If End Sub </pre> <div><br /> </div>