Office中国论坛/Access中国论坛

标题: 求助:请各位帮忙修改关于IF的代码 [打印本页]

作者: zhongbaba 时间: 2006-4-19 17:57
标题: 求助:请各位帮忙修改关于IF的代码
报表中有一控件[类型]，现想当[类型]为A时，报表的标签名为A，[类型]为B时，报表的标签名为B，如此累推，我不大会写代码，以下的代码对吗？

If [类型] = "A" Then

标签86.Caption = "A"

If [类型] = "B" Then

标签86.Caption = "B"

If [类型] = "C" Then

标签86.Caption = "C"

If [类型] = "D" Then

标签86.Caption = "D"

End If

盼各位帮忙修改，谢谢！

作者: andymark 时间: 2006-4-19 18:10
标签86.Caption = RS.Fields ("类型")

作者: zhongbaba 时间: 2006-4-19 18:18
If [类型] = "A" Then 标签86.Caption = RS.Fields ("类型")

If [类型] = "B" Then 标签86.Caption = RS.Fields ("类型")

If [类型] = "C" Then标签86.Caption = RS.Fields ("类型")

If [类型] = "D" Then标签86.Caption = RS.Fields ("类型")

End If

是这样吗?

作者: andymark 时间: 2006-4-19 18:29
用ADO或DAO的

标签86.Caption = RS.Fields ("类型")

只要一句就可以了

作者: sgrshh29 时间: 2006-4-19 19:11
me.标签86.caption = me.类型, 岂不直接了当。

作者: andymark 时间: 2006-4-19 19:15
楼上，说得对，这段时间都在用ADO。想的只是ADO，呵呵

作者: qhp-soft 时间: 2006-4-19 20:06
If [类型] = "A" Then 标签86.Caption = "A"

If [类型] = "B" Then 标签86.Caption = "B"

If [类型] = "C" Then 标签86.Caption = "C"

If [类型] = "D" Then 标签86.Caption = "D"

后面不用加 END IF

_____________________________________________________

如有必要发邮件至: qhp_soft@126.com

-----
论坛是我们成长的家园，我们要共同爱护好、建设好这个家园。同时欢迎大家光临我
的主页：http://www.qhpsoft.com

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)