其他回答(共7条)

• 

  2018-07-25 14:56 连伟杰 客户经理

  在文本框中输入身份证号的前17位，就可求得完整的18位身份证号：
  Private Sub Command1_Click()
  Dim a, b
  a = Array(7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2)
  b = Array("1", "0", "X", "9", "8", "7", "6", "5", "4", "3", "2")
  s = Trim(Text1.Text)
  For i = 1 To 17
  c = Asc(Mid(s, i, 1)) - 48
  x = x + c * a(i - 1)
  Next i
  x = x Mod 11
  MsgBox ("合法的18位身份证号是：" & Left(s, 17) & b(x))
  End Sub
• 

  2018-07-25 14:53 连伯才 客户经理

  目前没有什么渠道
  除非你拿着对方手机的话，并且知道支付密码的话，支付宝可以
• 

  2018-07-25 14:47 黄登盛 客户经理

  让银行给你查.
• 

  2018-07-25 14:44 粱俊薇 客户经理

  银行可以查询出来的。
• 

  2018-07-25 14:41 齐晓岚 客户经理

  复制银行卡
• 

  2018-07-25 14:38 符育明 客户经理

  这是银行的安全措施，目的也是为了保证储户的财产安全，因为没有身份证，如何证明你就是本人呢？有的老大爷被吞卡了，不知道怎么办，回家找儿子商量去了；这时候如果旁边有人打电话说自己的卡被吞了，银行就把卡取出来给他吗？换一个角度想通了就好，总比财产有所损失好吧
• 

  2018-07-25 14:35 齐昆明 客户经理

  你好！银行卡有密码的，骗子不知道密码就不能取钱。对你没什么影响。
  但如果你的银行卡密码过于简单比如6个8、6个1、123456，就很容易被猜出，又或者密码正好是自己的生日，那就可以通过身份证号码获知，所以你一定要马上更换密码。