2024年11月21日 星期四 首页 编程论坛 技术文档 黑客安全 源代码 应用下载 电子图书 电脑硬件 游戏开发 休闲娱乐 编程网站  
‹‹ 上一主题 | 下一主题 ››
发新话题
打印

[控件] datagrid的光标总是在网格的最后一条数据处,请教高手.

卜卜星

初级程序员

Rank: 2Rank: 2
1# 大中 小发表于 2008-3-30 15:17  只看该作者

datagrid的光标总是在网格的最后一条数据处,请教高手.

我如何才能把光标移至DATAGRID网格的第一条数据处.代码怎样写,又麻烦班竹了.

TOP

卜卜星

初级程序员

Rank: 2Rank: 2
2# 大中 小发表于 2008-3-31 00:41  只看该作者
VB6.0如何把一个ADODC1的DATAGRID1中的一格数据,作为另一个ADODC2的DATAGRID2的数据源,SQL怎写.请高手指教.

TOP

Nothing

管理员

Rank: 9Rank: 9Rank: 9Rank: 9Rank: 9
3# 大中 小发表于 2008-3-31 14:47  只看该作者
可以弄本控件参考手册，看看关于DataGrid这个控件的一些操作
换个头像，看见广告就眼红，直接封ID。

TOP

Nothing

管理员

Rank: 9Rank: 9Rank: 9Rank: 9Rank: 9
4# 大中 小发表于 2008-3-31 14:53  只看该作者
http://www.lihuasoft.net/download/index.php?frmid=7
这里的书应当有对你有用的
换个头像，看见广告就眼红，直接封ID。

TOP

卜卜星

初级程序员

Rank: 2Rank: 2
5# 大中 小发表于 2008-3-31 23:51  只看该作者

谢Nothing的指教，不过小弟确实太菜了,还是做不出来.

Nothing,我已看了控件大全,我也写了一段代码
Private Sub DataGrid1_Click()
    Dim i As Integer
     For i = 0 To 4
         DataGrid1.Col = i
         Form1.Label1(i).Caption = DataGrid1.Text
            If DataGrid1.Col = 0 Then
                Adodc2.RecordSource = "select * from Invoice2 where Invoice_NO= " & DataGrid1.Columns(0).Text & " "
' 写代码更改数据源，内容是Invoice2表里所有数据，条件为nvoice2.Invoice_NO字段的值要与单击DataGrid1的当前行的第一个字段的值相符。
                Adodc2.Refresh
            End If
     Next i
End Sub
但总报错"标准表达式中的数据类型不匹配",请您看看,是不是我的SQL语句的
" & DataGrid1.Columns(0).Text & " 这部份没写好。

TOP

Nothing

管理员

Rank: 9Rank: 9Rank: 9Rank: 9Rank: 9
6# 大中 小发表于 2008-4-1 22:35  只看该作者
Adodc2.RecordSource = "select * from Invoice2 where Invoice_NO='" & DataGrid1.Columns(0).Text & "'"

注意“' ”
换个头像，看见广告就眼红，直接封ID。

TOP

‹‹ 上一主题 | 下一主题 ››
发新话题