📄 14604.html

📁 以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.

💻 HTML

字号:

<html>
  <head>
    <title>Re: DataGrid控制项的ButtonClick 事件</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: DataGrid控制项的ButtonClick 事件</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by 小v on June 25, 1999 at 08:51:33:<p>
In Reply to: <a href="14575.html">Re: DataGrid控制项的ButtonClick 事件</a> posted by Daniel on June 24, 1999 at 12:32:03:<p>
: 问的清楚些<br>: 我希望在我按下DataGrid的某个储存格时,我想要让特定<br>: 的控制项(如combo)停在那个储存格上供人编辑,并将编<br>: 辑完的结果回写入DataGrid,那我该怎样作呢?<p>在FORM上先放置一个ComboBox(叫做combo1), visible设为False<p>Sub form_load()<br>combo1.additem="1111"<br>combo1.additem="2222"<br>combo1.additem="3333"<br>dbgrid1.columns("栏位一").locked=true '<br>end sub<p>sub dbgrid1_buttonClick(ByVal ColIndex as integer)<br>if dbgrid1.columns(ColIndex).caption="栏位一" then<br>   combo1.text=dbgrid1.text '将dbgrid1的值给combo1<br>   ...将combo1的位置移到适当位置.....<br>   combo1.visible=true '让combobox可看见<br>   combo1.setfocus     '让combobox取得焦点<br>   sendkeys "%{DOWN}"  '自动将combobox下拉<br>endif<br>end sub<p>sub combo1_click()<br>combo1.visible=false  '点选combobox之后将它隐藏<br>dbgrid1.text=combo1.text  '将combobox的值给dbgrid1<br>end sub<p><p><p>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 14604-->
</ul><!--end: 14604-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -