图1
   图2

 程序代码如下：

Private Sub Command1_Click()

  Dim i As Integer

  List1.Clear            '清除列表框内容

End Sub

Private Function f(x As Integer) As Boolean  '自定义函数f,返回值为逻辑型

  Dim j As Integer

  f = True

  For j = 2 To Int(Sqr(x))

    If x Mod j = 0 Then

      f =     ③      '函数返回值

      Exit For           '跳出For循环

    End If

  Next j

End Function

密码强度判断条件如下：密码长度小于6，则强度为“弱”。在密码长度大于等于 6 的情况下，若只出现一种字符，则密码强度为“弱”；若出现两种不同字符，则密码强度为“中”，出现3种以上不同字符，则密码强度为“强”。

Private Sub Command1_Click()

i＝1

____①____

Do While____②____

____③____

j＝j－1 ′④

Loop

Text1.Text＝Str(i)

Text2.Text＝Str(j)

End Sub

Private Sub Command1_Click()

    i＝1

    j＝7

    Do While _______

        i＝_______

        j＝________

    Loop

    Text1.Text＝Str(i)

    Text2.Text＝Str(j)

End Sub

则下列说法正确的是(   )

登录模块

密码广泛应用于日常生活中，我们在登录网站、App、电子邮箱以及银行取款时都要输入“密码”。不少人因密码被盗而导致个人信息泄露，甚至是财产损失。

以下是王林同学设计的一款App的登录模块流程图。