VB MSFlexGrid控件使用问题
1、自动选中某一行,设置好 selectionmode、backcolorsel、等属性
msfg.row=1: msfg.col=0: msfg.colsel=msfg.cols-1
============================================================
2、.TextMartix(row,col) 的方式 效率上优于 .row: .col : .Text 的方式
============================================================
3、对Up、Down、PgUp、PgDn、Ctr+Up、Ctr+Dn键的响应问题
(1) 正常情况下,按下上述键,表格的焦点行,会自动跳转,并且焦点行,始终在界面上可见
(2) 如果在MSFG的RowColChange 或 EnterCell事件中对MSFG单元格的处理(用到了.row,.col去处理某些问题),这些影响到了上述键的使用,
问题:焦点行会自动跳转,但界面上并不可见-------------应该是MSFG控件本身的问题
解决:可以根据旧焦点行(oldRow),与当前焦点行(curRow),及2者差值(Abs(curRow-oldRow)),手动改变.TopRow属性
参照-----------------------'-----修改表格按键改变行,选中行在界面不可见问题-----If Abs(curRow - oldRow) = 1 Then 'Up ,Down 键If curRow < oldRow ThenIf Not .RowIsVisible(curRow) Then '---------------Up.TopRow = .TopRow - 1End IfElseIf curRow > oldRow And curRow < .Rows - 1 Then '--DownIf Not .RowIsVisible(curRow + 1) Then.TopRow = .TopRow + 1End IfEnd IfElseIf Abs(curRow - oldRow) > 1 ThenIf curRow = .Rows - 1 Then '--------------------------Ctr+Down.TopRow = .Rows - 1ElseIf curRow = .FixedRows Then '--------------------Ctr+Up.TopRow = .FixedRowsElseIf Not .RowIsVisible(curRow) Then ' If curRow > oldRow Then '-------------------------PgDnIf curRow < .Rows - 1 Then.TopRow = oldRowElse.TopRow = .Rows - 1End IfElse '-----------------------------------------PgUpIf curRow > .FixedRows Then.TopRow = curRowElse.TopRow = .FixedRowsEnd IfEnd IfEnd IfEnd If
转载于:https://www.cnblogs.com/xbj-hyml/p/3480208.html
VB MSFlexGrid控件使用问题相关推荐
- VB 设置控件边框颜色(如:List、Text、Picture)
VB 设置控件边框颜色,比如:ListBox.TextBox.PictureBox.ComboBox等等-. 调用方法: 'setBorderColor (控件句柄,颜色值) setBorderCo ...
- VB表格控件总览与例程分析
一.表格控件总览: 在VB开发环境中,表格控件在界面开发元素中占有重要的地位.它不仅有外观整洁.表达形式规范的优点,而且更重要的是它较高的信息表现率(就是相对于其他控件来说能够表达更多的信息),随着信 ...
- 为系统加载右键注册控件选项【VB 注册控件】
做VB的,经常注册和反注册OCX控件和DLL链 但是,每次都要 "开始"--"运行" --"regsvr32 C:\********\******.o ...
- VB让控件可以当标题栏拖动
'运用本段代码可以使任意控件像窗体标题栏一样具有拖动窗体的功能? '先在模块中加入以下代码: Public Declare Function ReleaseCapture Lib "user ...
- 【引用】窗口处理技巧大全 vb(窗体控件)
Vb提供了API函数SetWindowLong和GetWindowLong,可以让我们很容易取得对窗口的操作:通过对窗口属性的操作,可以更改窗口的显示风格.有些看来是正常情况下无法实现的窗口,现在你可 ...
- MSFLEXGRID控件在win7、VS2008下注册
VS2008选择完整安装也找不到MsFlexGrid控件的踪影了.这给我之前使用VC6添加过MsFlexGrid控件的MFC程序移植到vs2008下增加了很多困扰.几经尝试才找到解决方案,记录备忘. ...
- VB DATA控件链接SQL SERVER
VB DATA控件链接SQL SERVER,Data控件在开发中已经很好使用了,我的一个同事在改一个VB程序,需要把ACCESS数据库升迁至SQL SERVER. 但那个VB程序代码每个部分都用DAT ...
- vb透明控件窗体不透明函数
vb透明控件 Public Declare Function SetWindowRgn Lib "user32 " (ByVal hwnd As Long, ByVal hRgn ...
- 教你如何用VB做控件*.ocx
教你如何用VB做控件*.ocx 一个控件有很多事件如:Click.MouseDown.MouseUp.MouseMove等.要触发这些事件都需要你加入代码.在控件的声明处加入Public Event ...
最新文章
- 目标检测--R-FCN: Object Detection via Region-based Fully Convolutional Networks
- C语言:一个涉及指针函数返回值与printf乱码、内存堆栈的经典案例
- 你的设备中缺少重要的安全和质量修复_城市排水管道三类非开挖修复技术汇总...
- linux 进程(一)---基本概念
- Android——Fragment实例精讲——底部导航栏+ViewPager滑动切换页面
- findViewById报空指针异常
- 像人类一样理解言外之意,阿里AI最新研究成果被国际顶会收录
- Orabbix监控oracle
- 关于.NET异常 你应该知道的更多点
- 周杰伦新专辑预售热点传播渠道分析
- 直播活动策划方案怎么做
- java实现mysql拦截_在mybatis执行SQL语句之前进行拦击处理实例
- sql2005 查询分析器 自动换行
- Methyltetrazine-PEG8-DBCO,甲基四嗪--八聚乙二醇-二苯并环辛炔
- python读取excel【二】,循环行与列对应数据
- Qt linguist
- 关于“指定的参数已超出有效值的范围。参数名 utcDate”的解决方案
- 小白兔写话_小学二年级期末写话片段练习 可爱的小白兔
- 今日上新推荐源码,高仿微信社交,高仿拼多多商城
- 期权的隐含波动率—python方法求解
热门文章
- freemarker如何判空容错
- 数据库设计:范式与反范式
- 期末数据结构复习的一点笔记
- The 46th ICPC Asia Jinan Regional Contest,2021,46届济南站热身赛
- Android替换view父节点,android – issue:指定的子节点已经有父节点.您必须首先在孩子的父母上调用removeView()...
- 全局替换资源_BitLocker+VHD替换TrueCrypt及其后继VeraCrypt
- mysql删除十天前数据脚本_前几天手工删除测试数据库并重建的脚本
- 计算机安装时的用户权限,如何设置win10系统使得电脑在安装软件前需要管理员的权限...
- window下的免安装redis
- [leetcode] 96. 不同的二叉搜索树 +[补充] 不同的二叉树,不同形态的二叉树的个数----catalan数