IF ELSE的问题?

yangxiang · 发表于 2006-7-1 23:58:00

我只选择了其中一个复选框，但会显示出三个标签？是不是代码写错了？请指正！

Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
If Forms!个人住房合同!Check68 = True Then
Me.Label25.Visible = True

ElseIf Forms!个人住房合同!Check70 = True Then
Me.Label26.Visible = True

ElseIf Forms!个人住房合同!Check71 = True Then
Me.Label27.Visible = True
Else
Me.Label25.Visible = False
Me.Label26.Visible = False
Me.Label27.Visible = False
End If

End Sub

zhufeng01 · 发表于 2006-7-2 00:06:00

最好用select case

yangxiang · 发表于 2006-7-2 00:14:00

请问语句怎样写？

yangxiang · 发表于 2006-7-2 01:00:00

已搞定！

Select Case Forms!个人住房合同!Check68

   Case Check68 = 0
   Me.Label25.Visible = True

   Case Else
Me.Label25.Visible = False
End Select

Select Case Forms!个人住房合同!Check70
   Case Check70 = 0
         Me.Label26.Visible = True

      Case Else
Me.Label26.Visible = False
End Select

Select Case Forms!个人住房合同!Check71
      Case Check71 = 0
      Me.Label27.Visible = True

  Case Else
Me.Label27.Visible = False

End Select

End Sub

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[其它] IF ELSE的问题?

群介绍
主题无相 (随机显示版	同地区群块其他地区)