VBA -如何根据调用sub的sub来确定IF语句的结果？

Sub Main()
    Dim result As Boolean
    result = CheckCondition() ' 调用CheckCondition函数获取结果
    
    If result Then
        ' 如果结果为True，则执行某些操作
        MsgBox "条件满足！"
    Else
        ' 如果结果为False，则执行其他操作
        MsgBox "条件不满足！"
    End If
End Sub

Function CheckCondition() As Boolean
    ' 在这里编写判断条件的逻辑
    ' 可以根据调用Sub的Sub来确定条件的判断逻辑
    
    If SomeOtherSub() Then
        CheckCondition = True
    Else
        CheckCondition = False
    End If
End Function

Sub SomeOtherSub()
    ' 在这里编写其他操作的逻辑
    ' 可以根据需要进行一些计算、判断等操作
End Sub