vb6.0 dategrid 问题

Z_Cell 2017-09-14 08:48:42

用dategrid的时候鼠标点中某行并不会有任何反应点列表头或者最左边的一列直接清空dategrid的数据是怎么回事
源码如下：
sql = "select book.bookID,book.bookname,book.bookauthor,book.bookpress,book.booktype,book.bookexist,book.booklend from book where " & char
rs.CursorLocation = adUseClient
rs.Open sql, conn, adOpenKeyset, adLockOptimistic
If char = "" Then
a = MsgBox("请输入查询信息!", vbOKOnly, "警告")
End If
Set DataGrid1.DataSource = rs
DataGrid1.ReBind
DataGrid1.Refresh
VB初学者，轻喷.

...全文

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

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

zdingyun 2017-09-15

打赏
举报

回复

代码不完整，SQL语句写的含糊，无法判断。 char代表啥？

vb6.0开发。修改连接语句就能支持access ；.sql支持mysql和mssql。仓储的增删差改和报表打印都有。用了dategrid 和MSHFlexGrid。帮人随便做的，只实现以上功能。别的没了。哦对了，有用户登陆和分级用户管理。

【VB】DateGrid自适应行高 Datagrid行高设置在属性 Rowhight这里设置，默认行高211.3532。那么我们可以根据该列显示内容的字数来计算需要的行高。比如：现在有一个DataGrid，默认字体，列宽度3800（这个在右键-属性-布局那里查看），这种列宽的情况下，一行大约21个字。 1、将该列需要显示的数据库（比如是Info）按该列字符数倒序排列，得到该列的最多字符数。函数：LEN(INFO) 2、需要的DataGrid最大高度就是 Rowhight=(LEN(INFO)/21)*2

如何用同一个DataGrid显示不同的数据表；如何用DataGrid显示主表/明细表的内容；如何用DataGrid分页显示或编辑数据表的记录。这些技巧在开发数据库程序中很实用。 DataGrid是VB.NET中重要的数据感知控件，它不仅可以把数据库的记录以表格形式显示出来，而且可以表格形式编辑数据库的记录，所以，它在数据库编程中应用非常广泛。那么,在VB.NET数据库编程中DataGrid控件有哪些使用技巧呢？这就是我今天要谈的内容。

'添加列名 Dim dt As New DataTable dt.Columns.Add(New DataColumn("列名1")) dt.Columns.Add(New DataColumn("列名2")) dt.Columns.Add(New DataColumn("列名3")) '从数据库中提取出来DataTalbe显示到DataGridView修改列名 dgv.DataSource ...

<script type="text/javascript"

1,451

社区成员

41,355

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章