小编NWT*_*Bob的帖子

我有一个With语句来访问我为某些代码开发的结构.结构(我正在工作)男性和女性的两个分支,我正在进入子程序一个整数来指定性别.

粗略地说我有

Type MyDetails
    green As Integer
    black As Integer
    yellow As Integer
    blue As Integer
End Type

Type Genders
    Males As MyDetails
    Females As MyDetails
End Type

Type GlobalData
   RegionName As String
   Ages(0..100) As Genders
End Type

Public Dim PopData As GlobalData

然后在我的子程序中

With PopData.Ages(Cur_Age)
    If Cur_Sex = 0 Then
        ... Do the stuff for males
    Else
        ... Do the exact same stuff but for females
    End If
End With

所以我的问题是,如果我可以通过将一个IIF语句放入WITH块...或类似的东西来摆脱内部IF语句.这主要是一个学术问题,因为代码工作得很好......但是不要因为改变所有.Males的简单差异而不必复制我的所有代码.来.女.在If Cur_Sex = …