| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 864 人关注过本帖
标题:[分享]Msflexgrid控件扩展功能问题
只看楼主 加入收藏
那边有朵蘑菇云
Rank: 1
来 自:很……那啥的一个地方
等 级:新手上路
威 望:1
帖 子:390
专家分:0
注 册:2007-9-3
收藏
 问题点数:0 回复次数:3 
[分享]Msflexgrid控件扩展功能问题

MSFLEXGRID控件中的每一个CELL格的内容不是用户可以直接编辑的
通过小技巧可以扩展控件的应用 实现编辑MSFLEXGRID控件数据的功能
Option Explicit
Private Sub MSFlexGrid1_EnterCell()
Text1.Text = MSFlexGrid1.Text
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub

Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer)
text1_keypress KeyAscii
End Sub

Private Sub Text1_Change()
MSFlexGrid1.Text = Text1.Text
End Sub

Private Sub text1_keypress(KeyAscii As Integer)
Dim i
i = 1
End Sub

这样就可以用TEXT来编辑CELL内容了 早上起来无聊自己想的 也做了相应的实验 感觉还行 不知道实用性怎么样 大家给点意见



qt9No1N0.rar (1.98 KB) [分享]Msflexgrid控件扩展功能问题


搜索更多相关主题的帖子: Msflexgrid 控件 分享 
2007-11-03 11:53
那边有朵蘑菇云
Rank: 1
来 自:很……那啥的一个地方
等 级:新手上路
威 望:1
帖 子:390
专家分:0
注 册:2007-9-3
收藏
得分:0 
自己坐板凳~~

身不残 志更不坚
2007-11-03 11:55
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 

实用性比较差..
很多情况没有考虑到.


我的msn: myfend@
2007-11-03 11:55
那边有朵蘑菇云
Rank: 1
来 自:很……那啥的一个地方
等 级:新手上路
威 望:1
帖 子:390
专家分:0
注 册:2007-9-3
收藏
得分:0 
因为CELL是不能直接编辑的 这样某些时候就带来了一些不方便
用这个方法可以把TEXT和CELL联系起来 做同步的处理 在TEXT中输入的内容 及时在CELL中显示
哈哈 一个构想 小方法 多谢你的意见

身不残 志更不坚
2007-11-03 11:58
快速回复:[分享]Msflexgrid控件扩展功能问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.084023 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved