返回列表 上一主題 發帖

[發問] 如何計算checkbox "有打勾"的個數??

[發問] 如何計算checkbox "有打勾"的個數??

請問如何計算checkbox 有打勾的個數呢?
假設有checkbox1~5
只勾了1.3
那要如何做計算呢??

煩請各位前輩解答 感謝 :)

回復 1# rick4615
  1. Private Sub cbCal_Click()
  2.   Dim iI%
  3.   Dim ctl As Control
  4.   
  5.   iI = 0
  6.   For Each ctl In Me.Controls
  7.     If TypeName(ctl) = "CheckBox" Then
  8.       If ctl.Value Then iI = iI + 1
  9.     End If
  10.   Next
  11.   MsgBox "共有 " & iI & "個 CheckBox 被打勾"
  12. End Sub
複製代碼
如何計算checkbox有打勾的數量.zip (6.51 KB)

TOP

回復 2# luhpro


感謝大大的幫忙 :D

TOP

        靜思自在 : 話多不如話少,話少不如話好。
返回列表 上一主題