国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

半米陽光 作品

半米陽光(65921751) 22:56:26
Sub ff()
Dim s As String, arr

s = "┴┬┴┬／￣＼＿／￣＼" + vbCrLf + _
"┬┴┬┴▏　　▏▔▔▔▔＼ 這" + vbCrLf + _
"┴┬┴／＼　／　　　　　　﹨ 地" + vbCrLf + _
"┬┴∕　　　　　　?。　　。?方" + vbCrLf + _
"┴┬▏　　　　　　　　●　　▏ 不" + vbCrLf + _
"┬┴▏　　　　　　　　　　　▔█◤ 錯(cuò)，" + vbCrLf + _
"┴◢██◣　　　　　　 ＼＿＿／" + vbCrLf + _
"┬█████◣　　　　　　　／　 讓我用來踩踩！ 　" + vbCrLf + _
"┴█████████████◣" + vbCrLf + _
"◢██████████████▆▄" + vbCrLf + _
"◢██████████████▆▄" + vbCrLf + _
"█◤◢██◣◥█████████◤＼" + vbCrLf + _
"◥◢████　████████◤　　 ＼" + vbCrLf + _
"┴█████　██████◤　　　　　 ﹨" + vbCrLf + _
"┬│　　　│█████◤　　　　　　　　▏" + vbCrLf + _
"┴│　　　│&單翼Angel~%??在此！借貴寶地一踩！ 　▏" + vbCrLf + _
"┬∕　　　∕　　　　／▔▔▔＼　　　　 ∕" + vbCrLf + _
"*∕＿＿_(dá)／﹨　　　∕　　　　　 ＼　　／＼" + vbCrLf + _
"┬┴┬┴┬┴＼ 　　 ＼_　　　　　﹨／　　﹨" + vbCrLf + _
"┴┬┴┬┴┬┴ ＼＿＿＿"
arr = Split(s, vbCrLf)
For i = 0 To UBound(arr)
    For j = 1 To Len(arr(i))
         Cells(i + 1, 1).Value = Cells(i + 1, 1).Text & Mid(arr(i), j, 1)
    Next
Next
MsgBox s

End Sub

**********************************

Sub ff()
Dim s As String

s = "踩踩　 踩踩踩　 踩踩踩　　踩踩踩? ? 踩踩踩踩踩" + vbCrLf + _
"踩踩　踩踩踩　 踩踩踩　 踩踩踩　　 踩踩踩踩踩踩" + vbCrLf + _
"踩踩　　踩踩　　 踩踩　　 踩踩　　 踩踩踩踩踩踩" + vbCrLf + _
"踩踩　　　　　　　　　　　　　　　　　 踩踩踩" + vbCrLf + _
"　　　　 踩踩踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"　　　踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"　踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"　踩踩踩踩踩踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"　踩踩踩踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"　　踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"　　　踩踩踩踩踩踩踩" + vbCrLf + _
"　　　踩踩踩踩踩踩" + vbCrLf + _
"　　　踩踩踩踩踩踩" + vbCrLf + _
"　　 踩踩踩踩踩踩" + vbCrLf + _
"　 　 踩踩踩踩踩踩" + vbCrLf + _
"　　 踩踩踩踩踩踩踩" + vbCrLf + _
"　　踩踩踩踩踩踩踩踩" + vbCrLf + _
"　踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"　踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
"　踩踩踩踩踩踩踩踩踩踩" + vbCrLf + _
" 踩踩踩踩踩踩踩踩踩"

MsgBox s
End Sub