两个关于msflexgrid的问题

xiaolinsyl 2002-08-14 11:12:01

各位高手，如何调节msflexgrid上数据的字段(列长)宽度，数据输出后它是定死的,导致
长字段不能正确显示；还有如何实现在msflexgrid上,点击任意字段后,就能对该字段的值进行
排序?

小弟在此谢过了

...全文

22 1 打赏收藏转发到动态举报

写回复

用AI写文章

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

vadjra 2002-08-14

打赏
举报

第一个问题不是很明白，根据数据的最大长度设定colwidth()属性不就行了吗？
第二个问题如下：
sub msflexgrid_click()
with msflexgrid
.mouserow=0 鼠标点击第一行
.sort=flexSortGenericAscending 共有7个选项，具体去看MSDN吧
.sort属性对日期型数据排序不正确，需要另外处理
end with
end sub

VB程序运行时对MSFlexGrid单元格数据进行计算

两个比较实用的小程序,分别是从Excel向datagrid和Msflexgrid中导入数据.

本控件系VB6.0编写，可以直接打印MSHFlexGrid控件（如果控件的数据中有图片，图片也会打印出来）、ListView控件、ADO记录、DAO记录、Datagrid控件、Flexgrid控件的内容，省时省力。对MSHFlexGrid控件的内容，控件提供多种打印方式，如多栏打印、分页打印、自动缩放打印、工资条样式打印等功能。控件提供textout函数输出文本内容，cellout函数输出一个单元格（与textout函数的区别是有边框），此两个函数都具有自动换页功能，即如果输出的文本大于1页，可以自动增加新页并打印到下一页。控件还提供了输出图片的功能，使用CellOutPicture可能打印图片。本控件可以打印眉页和页脚，还可以将打印的内容(包括图片)保存为本控件专用的报表格式文件，以便以后打开预览并打印（但不能更改页面格式）。控件均以VB的内置单位TWIPS为计量单位，您可以使用本控件的cmtotwips方法将厘米换算成VB的twips，用mmtotwips将毫米换算成twips。

其中有两个示例,1个是根据GRID做的类,另1个是微软的MSFlexGrid控件的示例

在form窗口中建立两个msflesgrid控件，名称分别为msflexgrid1和msflexgrid2,以及一个text控件，名称为text1,如果程序有超过两个网格控件，则在代码窗口添加相应网格控件的dbclick事件和keypress事件，调用程序的函数即可。