注册 登录
编程论坛 VB6论坛

请教批量修改问题

beelin2010 发布于 2012-05-13 14:36, 247 次点击
1.    我试着做批量修改功能,代码:批量修改时不能用for i=1 to grid1.rows -1这样循环吗?
      如何判断从第一行到最后一条呢?现在都是从最后面一行加起的,没有和前面的数据对齐
2.    Private Sub Combo2_Click()  
3.    Dim i As Long
4.    For i = 1 To Grid1.Rows - 1
5.    Grid1.AddItem vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & _
6.    vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & Combo2.Text
7.    Next i
8.    End Sub
只有本站会员才能查看附件,请 登录
3 回复
#2
wube2012-05-13 20:38
抱歉可能我的中文能力不太好,能否重述一次~
批量修改ComBoListGrid1之间的动作关系?
你的代码让我搞不清楚你要做什么~
#3
wube2012-05-13 21:09
如果你的Combo2是最右边那个控件
那你的Combo2.Text怎得出来的?
#4
Artless2012-05-13 23:21
以下是引用beelin2010在2012-5-13 14:36:37的发言:

1.    我试着做批量修改功能,代码:批量修改时不能用for i=1 to grid1.rows -1这样循环吗?
      如何判断从第一行到最后一条呢?现在都是从最后面一行加起的,没有和前面的数据对齐
2.    Private Sub Combo2_Click()  
3.    Dim i As Long
4.    For i = 1 To Grid1.Rows - 1
5.    Grid1.AddItem vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & _
6.    vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & Combo2.Text
7.    Next i
8.    End Sub
1