我用下面方法来移动ComboBox1控件ComboBox1.Move .Left + .CellLeft, .Top + .CellTop, .CellWidth
由MSFlexGrid1_Click来触发.1.为什么ComboBox1不能准确的定位要每个单元格内,总是偏上?
2.如果在MSFlexGrid控件内容很多,需要向下翻页显示时,ComboBox1又偏下?有没有其它方法解决?
由MSFlexGrid1_Click来触发.1.为什么ComboBox1不能准确的定位要每个单元格内,总是偏上?
2.如果在MSFlexGrid控件内容很多,需要向下翻页显示时,ComboBox1又偏下?有没有其它方法解决?
解决方案 »
- 还有谁准备买房?
- 哪有Visual Basic 2005简体中文专业正式版下载?
- vb查询出的结果集如何导入access中?
- 出什么样的笔试题目可以考察一个人对VB的熟悉程度?我已经没分了,可以免费帮忙吗?
- 有没有从vb源码中获得工程结构信息的工具?
- 急!本地机上安装VB客户端程序,怎样访问(更新)网站空间里的Access数据库?
- 要多少分就给多少分
- 困扰了我很久的问题:为什么SQL server的datetime类型总是默认1900-1-1?
- 在vb中如何打印出access表格数据
- Word VBA(或VB+引用Microsoft Word 9.0 Object Library)的高手请进!
- 为提示 VBA 函数 (Lcase,Mid等)不能用?
- 请问如何获取某个控件滚动条的宽度?
With MSFlexGrid1
lcol = 1
.Col = 1
lrow = 1
.Row = 1
MSFlexGrid1_RowColChange
End With
End SubPrivate Sub MSFlexGrid1_RowColChange()
With MSFlexGrid1
lcol = .Col
lrow = .Row
Check1.Visible = True
Check1.Height = .CellHeight
Check1.Width = .CellWidth
Check1.Left = .CellLeft + .Left
Check1.Top = .CellTop + .Top
End With
End SubPrivate Sub MSFlexGrid1_Scroll()
With MSFlexGrid1
If .RowIsVisible(lrow) And .ColIsVisible(lcol) Then
Check1.Visible = True
Check1.Height = .CellHeight
Check1.Width = .CellWidth
Check1.Left = .CellLeft + .Left
Check1.Top = .CellTop + .Top
Else
Check1.Visible = False
End If
End With
End Sub
不然用API调整了COMBO高度!