分享

VB实际开发中DataGrid控件应用详细讲解

 阿明哥哥资料区 2022-10-20 发布于上海

VB编程干货

VB编程语言完整知识点总结
VB编程高效学!视频讲解+编程实例来了
用VB编程获取网站输入的用户名和密码

DataGrid控件部分属性讲解

DataGrid 被连接到一个数据库后,可能想要监视用户单击了哪一个单元。可以使用 RowColChange 事件——而不是 Click 事件。如下:
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
'
显示用户所单击的单元的文字、行和列的信息。
Debug.Print DataGrid1.Text; DataGrid1.Row; DataGrid1.Col
End Sub

图片

使用CellText CellValue 方法当一个列使用 NumberFormat 属性设置格式后,CellText CellValue 属性是很有用的。NumberFormat属性不必更改实际的数据格式就可以更改任何包含数字的列的格式。

例如,给定一个网格,其中包含一个名为 ProductID的、包含整数的列。下面的代码将使 DataGrid 'P-0000' 的格式来显示数据。换句话说,尽管在ProductID 字段中所包含的实际数值为 '3',但该网格所显示的值将是 'P-0003'


Private Sub Form_Load()
DataGrid1.Columns('ProductID').NumberFormat = 'P-0000'
End Sub


要返回数据库中所包含的实际值,应使用 CellValue 方法,如下所示:
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Debug.Print _
DataGrid1.Columns('ProductID').CellValue(DataGrid1.Bookmark)
End Sub

图片

注意 上面所用的 CellValue 和下面所用的CellText 值,都需要将Bookmark 属性作为一个参数,功能才正确。相反地,如果要返回该字段的格式化的值,应使用 CellText 方法:
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Debug.Print _
DataGrid1.Columns('ProductID').CellText(DataGrid1.Bookmark)
End Sub

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多