:L
说我呢？
技术？
来点技术打劫！！

Public Sub 打劫()
  Dim you As 被打劫者, I As 打劫者
  If 有IP卡 Or 有IC卡 Or 有IQ卡 Then
     you = 统统交给我! And 告诉我密码
  Else
     you = 别动!老实点!
     If you = 乱动 Then
        I = 砍you
     End If
  End If
End Sub


  

我也来支持一下

Public Sub 打劫()
  Dim you As 打劫者, I As 警察, A As 被打劫者
  If A 有IP卡 Or 有IC卡 Or 有IQ卡 Then
     you = 统统交给我! And 告诉我密码
         I = 警察别动！
  Else
     you = 别动!老实点!打劫的！
     I = 警察！放下刀！
     If you = 拿起刀 Then
        I = 开枪击毙 you
     End If
  End If
End Sub