再发关于个人收入和家庭收入关系的问题！

xuchunyang　发表于：2010-09-28 16:51:19 　

复制

大家好！

这个问题我在今天上午已经问过，感谢煮江品茶　和 yinyt　的帮助！

我使用的是煮江品茶的代码，但是我在测试时发现：

1.如果我先选择了家庭收入，然后将其删除，那么个人收入就没有选项了

2.如果我对两个收入都进行了选择，然后将个人收入删除，那么家庭收入的选项就不完整

我想能不能这样，

1.两个收入在只选一个时，应该是独立的

2.只有在两个收入都进行选择时，才会判断二者的关系（最好用区间ID进行判断，写IF语句）

谢谢大家！

点击下载此附件

Top

煮江品茶发表于：2010-09-28 19:30:37

在两个组合框的更新后事件中加一句自身的数据源回转即可：

Private Sub 个人_AfterUpdate()
    Dim ssql As String
    ssql = "select * from 区间表 where 区间ID>=" & Me.个人.Column(0)
    Me.家庭.RowSource = ssql
    Me.家庭.Value = Me.家庭.Column(0, 0)
    Me.个人.RowSource = "区间表"
End Sub

Private Sub 家庭_AfterUpdate()
    Dim ssql As String
    ssql = "select * from 区间表 where 区间ID<=" & Me.家庭.Column(0)
    Me.个人.RowSource = ssql
    Me.个人.Value = Me.个人.Column(0, 0)
    Me.家庭.RowSource = "区间表"
End Sub

Top

xuchunyang 发表于：2010-09-29 13:36:47

感谢煮江品茶对我的帮助！

Private Sub 家庭_AfterUpdate()
    Dim ssql As String
    ssql = "select * from 区间表 where 区间ID<=" & Me.家庭.Column(0)
    Me.个人.RowSource = ssql
' Me.个人.Value = Me.个人.Column(0, 0)
    Me.家庭.RowSource = "区间表"
End Sub

这是我对您给我的代码的修改，之所以不要绿色代码，是因为那样会使两个变量总处于变化中。

但是现在仍然存在这样的问题，即我删除家庭收入后，会出现下面的错误提示

我认为，能不能再加一层IF进行判断。当两个变量有一个为空的时候，不对二者的关系进行判断；

当两个变量都不为空时，才执行您写的代码。

谢谢您的帮助！

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

再发关于个人收入和家庭收入关系的问题！