vb中mshflexgrid中单元格输入数字

newly88 2012-05-19 11:06:16
我想在mshflexgrid单元格的某一列弄成可以输入数据的,可以吗?还有把某两个单元格合并成一个,网上看了很久都没解决,各位高手帮帮忙啊,谢谢
...全文
234 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
fzx4936 2012-05-20
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 的回复:]
只能通过textbox的方法吗?网上好多都事这么说的,我还是想问问,因为我有一列的要输入,这样有点复杂
[/Quote]
可编辑的表格应该都是用text跟随的方法制作的,这个没什么难的
只是当处于最右列时需要用GetScrollRange判断当前表格是否有下拉条,有下拉条时text的宽度要-300
worldy 2012-05-19
  • 打赏
  • 举报
回复
mshflexgrid本身不能输入数据,要输入数据,可以添加一个textbox控件,在mshflexgrid的rowcochange事件中添加代码移动textbox控件使其和当前单元格重合(遮住当前单元格),并将当前单元格内容拷贝到textbox控件,然后在textbox控件中编辑,在textbox的change事件中,将数据回写回单元格。

合并数据:
MSHFlexGrid1.MergeCells = xxx
这样,如果相邻行或列的数据如果相同,则和起来显示

xxx值,具体为
flexMergeNever 0 不显示。包含相同内容的单元不分组。这是缺省设置。
flexMergeFree 1 自由。包含相同内容的单元总是合并。
flexMergeRestrictRows 2 限制行。只有行中包含相同内容的相邻单元(向当前单元左边)才合并。
flexMergeRestrictColumns 3 限制列。只有列中包含相同内容的相邻单元(向当前单元上方)才合并。
flexMergeRestrictBoth 4 限制行和列。只有在行中(向左)或在列中(向上)包含相同内容的单元才合并。

worldy 2012-05-19
  • 打赏
  • 举报
回复
Private Sub MSHFlexGrid1_KeyPress(KeyAscii As Integer)
With MSHFlexGrid1
.Text = .Text & Chr(KeyAscii)
End With
End Sub

这个简单代码只能输入,编辑控制会很麻烦
newly88 2012-05-19
  • 打赏
  • 举报
回复
[Quote=引用 3 楼 的回复:]
不然,你就处理keypress事件
[/Quote]
能说具体一点吗,我是初学,刚才看了一下keypress事件,还是不太懂,谢谢啦
worldy 2012-05-19
  • 打赏
  • 举报
回复
不然,你就处理keypress事件
newly88 2012-05-19
  • 打赏
  • 举报
回复
只能通过textbox的方法吗?网上好多都事这么说的,我还是想问问,因为我有一列的要输入,这样有点复杂
功能强大的免费VB打印控件(2010年5月7日修改),改正了原打印控件存的在缺陷,增加了VSFlexGrid表格的打印功能。 本控件系VB6.0编写,可直接打印VSFlexGrid表格、MSHFlexGrid表格的内容,并提供多种打印方式,分栏打印、横向跨页打印、工资条样式打印(可以把显示为0或空的内容不打印)。本控件还可直接打印ListView控件、ADO记录、DAO记录、Datagrid控件、Flexgrid控件的内容 可完全按照VSFlex表格、MSHFlexGrid表格的显示进行打印,如果VSFlex表格、MSHFlexGrid表格有图片,图片也会打印出来,如果有单元格合并,打印出来的结果单元格也是合并的。 控件提供textout函数输出文本内容,cellout函数输出一个单元格(与textout函数的区别是有边框),此两个函数都具有自动换页功能,即如果输出的文本大于1页,可以自动增加新页并打印到下一页。 控件还提供了输出图片的功能,使用CellOutPicture可能打印图片。 本控件可以打印眉页和页脚,还可以将打印的内容(包括图片)保存为本控件专用的报表格式文件,以便以后打开预览并打印(但不能更改页面格式)。 控件均以VB的内置单位TWIPS为计量单位,您可以使用本控件的cmtotwips方法将厘米换算成VB的twips,用mmtotwips将毫米换算成twips。 本次提供两个版的打印控件,简化版VB打印控件(有控件的源代码)与复杂版VB打印控件(功能更多,不提供源代码) 本控件附有VB使用实例,具体使用方法请参照实例。 如有疑问或建议,请联系 myyouping@hotmail.com myyouping@139.com

7,764

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧