VB中MsFlexGrid控件的使用细则(收集)
>> 将文本赋值给MsFlexGrid的单元格
MsFlexGrid.TextMatrix(3,1)=”Hello”
>> 在MsFlexGrid控件单元格中插入背景图形
Set MsFlexGrid.CellPicture=LoadPicture(“C:/temp/1.bmp”)
>>选中某个单元
MsFlexGrid.Row=1
MsFlexGrid.Col=1
>>用粗体格式化当前选中单元
MsFlexGrid.CellFontBold=True
>> 添加新的一行
使用AddItem方法,用Tab字符分开不同单元格的内容
dim row as string
row=”AAA”&vbtab&”bbb”
MsFlexFrid1.addItem row
>>怎样来实现MSFlexGrid控件单数行背景为白色,双数的行背景为蓝色?
Dim i As Integer
With MSFlexGrid1
.AllowBigSelection = True ’ 设置网格样式
.FillStyle = flexFillRepeat
For i = 0 To .Rows - 1
.Row = i: .Col = .FixedCols
.ColSel = .Cols() - .FixedCols - 1
If i Mod 2 = 0 Then
.CellBackColor = &HC0C0C0 ’ 浅灰
Else
.CellBackColor = vbBlue ’ 兰色
End If
Next i
End With
>> MSFlexGrid控件如何移到最后一行
MSFlexGrid1.TopRow = MSFlexGrid1.Rows – 1
>>如何判断msflexgrid有无滚动条
Declare Function GetScrollRange Lib "user32" (ByVal hWnd As Long, ByVal nBar As Long, lpMinPos As Long, lpMaxPos As Long) As Long
Public Const SB_HORZ = &H0
Public Const SB_VERT = &H1
Public Function VsScroll(MshGrid As MSHFlexGrid) As Boolean ’判断水平滚动条的可见性
Dim i As Long
VsScroll = False
i = GetScrollRange(MshGrid.hWnd, SB_HORZ, lpMinPos, lpMaxPos)
If lpMaxPos <> lpMinPos Then VsScroll = True
End Function
Public Function HeScroll(MshGrid As MSHFlexGrid) As Boolean ’判断垂直滚动条的可见性
Dim i As Long
HeScroll = False
i = GetScrollRange(MshGrid.hWnd, SB_VERT, lpMinPos, lpMaxPos)
If lpMaxPos <> lpMinPos Then HeScroll = True
End Function
>>程序运行时,想动态增加MSFlexgrid的列数
在第2列后插入一列:
Private Sub Form_Load()
Me.MSHFlexGrid1.Cols = 5
MSHFlexGrid1.Rows = 2
For i = 0 To Me.MSHFlexGrid1.Cols - 1
Me.MSHFlexGrid1.TextMatrix(0, i) = i
Me.MSHFlexGrid1.TextMatrix(1, i) = i
Next
End Sub
Private Sub Command1_Click()
Me.MSHFlexGrid1.Cols = Me.MSHFlexGrid1.Cols + 1
Me.MSHFlexGrid1.ColPosition(5) = 3
End Sub
>> 请教MSFlexGrid中的对齐功能的使用
设置MSFlexGrid1.ColAlignment(index)=n
>>得到MSFlexGrid控件中当前选中的一行
msflexgrid1.row sel就是当前选中行
>> 如何通过代码调节列宽度
msflexgrid1.colwidth(i)=4000
- 浏览: 868603 次
最新评论
-
boz.lee:
总结的不错------百度
数码相机(百度百科)
相关推荐
本资源主要介绍了强大的表格处理控件MSFLEXGRID控件的使用细则及典型的应用实例,以供学习者使用
VB用MSFlexGrid控件模仿Excel表程序
VB6.0中msflexgrid控件的使用,包含了该控件的大部分功能,欢迎下载。
VB中MSFLEXGRID控件网格单元可编辑功能的实现,供大家学习参考
MSFlexGrid连接数据库实例,并且对单元格进行合并,很好的一个实例代码
file:///E:/谢圣东/个人收集/vba编程零碎文件/VB中MsFlexGrid控件的使用细则.doc
关于VB MSFlexGrid控件的使用说明
VB MSFlexGrid网格控件绑定Combox,Check,ListBox等窗体常用元素的实例,利用MSFlexGrid做的单元格输入示例,演示如何在MSFlexGrid单元格中绑定下拉列表、复先框、单选框(Combox,Check,ListBox)等,以方便用户输入和...
一个增强型的VB MSFlexGrid控件,cFlexGridBinder类的示例,是基于 MSFlexGrid 控件进行扩展增强网格编辑功能.这些功能的控制在代码里需要三个简单方法进行控制,你可以选种某个网格按回车进行编辑内容.可以使用 ...
本控件系VB6.0编写,可以直接打印MSHFlexGrid控件(如果控件的数据中有图片,图片也会打印出来)、ListView控件、ADO记录、DAO记录、Datagrid控件、Flexgrid控件的内容,省时省力。对MSHFlexGrid控件的内容,控件...
利用MSFLexGrid控件录入数据,对初学者非常有用
该文件详细介绍了msflexgrid控件的使用 并列举了很多实例
包括vb6.0在win10安装步骤和使用方法
VB代码实现 MSFlexGrid控件打印及预览,可方便使用于数据汇总预览及打印。
VB打印并预览MSFlexGrid控件中显示的内容,代码演示了如何使用MSFlexGrid控件进行打印预览,并包含了初学者所需要的控件操作技巧:MSFlexGrid控件的使用方法。
msflexgrid控件 使用前请通读该资料 对你帮助很大的。
Visual C++中MSFlexGrid控件的功能扩展及其应用
msflexgrid控件里的VC++头文件,在每个函数后面都有相应的注释说明,有助于新人学习
MSFlexGrid 控件 更丰富的数据显示工具