RT
解决方案 »
- 有些歌是真正快乐的歌
- 【求助】(rainstormmaster等高手请进):RichTextBox控件中如何获取某一行的高度?
- 求一个简单功能的实现方法?
- 用ShellExecuteEx或ShellExecute调用关联程序打开文件,如何获得关联程序窗口句柄?(急)
- 怎样修改库中表的名字(在线等,成功后马上给分)!!急急
- 高分相送,一共两个问题
- 如何才能得到显示器当前分辨率,又如何才能根据分辨率调整当前FORM中PICTURE的大小,做过此种操作的网友进:)
- 水晶报表数据源的问题
- 只运行一个实例,并激活已存在实例
- 在调试状态下为什么不能掉dll,但编译后可以,有方法让它在调试状态下也能调用吗?
- 十万火急啊!读取剪贴板,并将其中的图文混排信息保存到数据库
- 急需帮忙,我仅有10分了,在先等
接到搂主飞鸽传书
少年特来支持!
对datagrid的操作全部是对recordset的操作你用sql语句去查出第几笔记录,然后用move n,1这样去移动到你想要的记录就可以了
特地从水源赶来up!
DataGrid1.SelBooks.Add rstTmp.Book
End Sub
Dim BookMark As String
Dim lngI As Long
For lngI = 0 To DataGrid1.SelBooks.count - 1
DataGrid1.SelBooks.Remove lngI
Next lngI
BookMark = InputBox("Please input a number!")
'判断输入值的正确没有写。
DataGrid1.SelBooks.Add CLng(BookMark)
End Sub