求助:请各位帮忙修改关于IF的代码

zhongbaba

报表中有一控件[类型]，现想当[类型]为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

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

zhongbaba

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

用ADO或DAO的

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

只要一句就可以了

sgrshh29

me.标签86.caption = me.类型, 岂不直接了当。

andymark

楼上，说得对，这段时间都在用ADO。想的只是ADO，呵呵

qhp-soft

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