户外羽绒服排行榜,它才是女人最好的嫁妆!

Public Function Encrypt(src As String) As String -----加密
Dim i As Integer
Dim aStr As String
Dim num1, num2 As Double
For i = 1 To Len(src)
aStr = aStr + CStr(Asc(Mid(src, i, 1)))
Next
num1 = Val(aStr)
num2 = Int(num1 * num1 / 3) + num1
If num2 = 0 Then
Encrypt = “”
Else
Encrypt = CStr(num2)
End If
End Function
户外羽绒服排行榜,它才是女人最好的嫁妆!

我的出场方式很特别,都是下冬天,

算是你们的寒冬第一个礼物。

我见过10°、0°、-3°、-38°,

也见过在各种户外运动的你。

爱你就像是天上掉下的馅饼,

看着开心并心疼着。

我跟在你身边一般只有3-4个月,

第一次遇到你们,仍然在寒冷到来的第一天。

每次约会中,

你都被众人羡慕,故意靠近着,

我有点害羞也有点开心。

– 思凯乐户外
在这里插入图片描述
在这里插入图片描述
在这里插入图片描述
在这里插入图片描述
在这里插入图片描述
在这里插入图片描述
在这里插入图片描述

没有更多推荐了,返回首页

私密
私密原因:
请选择设置私密原因
  • 广告
  • 抄袭
  • 版权
  • 政治
  • 色情
  • 无意义
  • 其他
其他原因:
120
出错啦
系统繁忙,请稍后再试

关闭