Readygo技术搜索引擎 网络搜索 efish 2008-1-17 7:17:05

怎么在msflexgrid1怎么输入内容？急

楼主windything（风物语）2003-06-30 10:45:52 在 VB / 非技术类 提问

怎么在msflexgrid1怎么输入内容？ 问题点数：40、回复次数：9Top

1 楼rexyudl（隼）回复于 2003-06-30 10:50:49 得分 0

msflexgrid上面漂个文本框！Top

2 楼windything（风物语）回复于 2003-06-30 10:52:59 得分 0

具体怎么做啊，我立即给分Top

3 楼minajo21（大眼睛）回复于 2003-06-30 11:03:50 得分 0

这个控件的本身不能实现，一楼的意思是加一个text来拼凑。Top

4 楼fraser01（王晓栋）回复于 2003-06-30 11:18:59 得分 0

在text1得到回车的时候。  
  with   msflexgrid  
        .textmarry(1,1)=text1  
  end   withTop

5 楼fraser01（王晓栋）回复于 2003-06-30 11:19:51 得分 0

方法比较复杂，代码繁多，不列详细的了。Top

6 楼flc（）回复于 2003-06-30 11:23:12 得分 0

Set   msflexgrid1.Recordset   =   数据源Top

7 楼rexyudl（隼）回复于 2003-06-30 13:32:32 得分 0

在双击msflexgrid控件获取单元格的位置（也就COL，ROW）然后把文本框显示出来这样实际上你是把要填写的内容添到了文本框中。然后你在把文本框中的内容写到点中的单元里就好了！Top

8 楼westseason（西城时代）回复于 2003-06-30 16:20:46 得分 40

msflexgrid孔件的名称为：msflexgrid1  
  上边嵌的那个TextBox框为text14  
  当点击msflexgrid1时，触发事件，处理程序为：  
  If   MSFlexGrid1.Rows   >   MSFlexGrid1.Row   And   MSFlexGrid1.Row   >   0   And   MSFlexGrid1.Col   <>   10   Then  
      MSHFlexGridrow   =   MSFlexGrid1.Row  
      MSHFlexGridcol   =   MSFlexGrid1.Col  
      Text14.Visible   =   True  
  "     Text14.SetFocus  
      Text14.Text   =   MSFlexGrid1.Text  
  Else  
  "     Text14.Visible   =   False  
      Command5.Visible   =   False  
  End   If  
      Text14.Top   =   MSFlexGrid1.CellTop   +   675  
      Text14.Left   =   MSFlexGrid1.CellLeft   +   120  
      Text14.Width   =   MSFlexGrid1.CellWidth  
      Text14.Height   =   MSFlexGrid1.CellHeight      
   
  在text14失去焦点时，也就是输入完成时可以触发输入验证，然后赋值：  
  Dim   i,   j   As   Integer  
  i   =   MSFlexGrid1.Row  
  j   =   MSFlexGrid1.Col  
  MSFlexGrid1.Row   =   MSHFlexGridrow  
  MSFlexGrid1.Col   =   MSHFlexGridcol  
  If   Text14.Text   <>   ""   Then  
      MSFlexGrid1.Text   =   Text14.Text  
  End   If  
  MSFlexGrid1.Row   =   i  
  MSFlexGrid1.Col   =   j  
  Text14.Text   =   ""  
  Text14.Visible   =   False  
   
  这样就可以完成你的工作了：）Top

9 楼moany（长枪大戟）回复于 2003-06-30 17:43:38 得分 0

楼主：FAQ里面就有，自己去看看。Top