具体方法为：（1）若身份证号为15位，则根据第15位数字来判断，若为偶数则性别“女”，否则为“男”；（2）若身份证号为18位，则根据第17位数字来判断，若为偶数时则性别为“女”，否则为“男”。

图1

①接收用户输入  ②比较用户的输入和待猜数是否相等，相等则输出“猜对”，否则转向①继续执行，直到猜对为止。能表示此过程的流程图是（    ）

Private Sub Command1_Click()

Dim x As Integer, m As Integer

m = 3

For x = 1 To 5

   If m > 3 Then m = m + 2 Else m = m - 1

Next x

Text1.Text = Str(m)

End Sub

      PRIVATE SUB FORM-------CLICK()

      S=0

DIM I AS INTEGER, S AS INTEGER

      FOR I= 2 TO 100 {#blank#}1{#/blank#}

           S=S+{#blank#}2{#/blank#}

      NEXT I

      PRINT S

      END SUB