“海蛇”有人在惊呼。
只见在海底深处游来一条黑色的长长的海蛇,几乎所有的人都在发呆。但是海蛇说了一句让我们胆寒的话“我就是有名的VB字符串,如果你们继续下潜的话,就得想通过我”。
我习惯性的观察着它,因为我知道要打败一个对手,就必须深入的了解对手。
因此我写了一段小CODE来了解它。
-> DimstrAsString
str="Givemea美女"
DimL1AsLong
DimL2AsLong
L1=Len(str)
L2=LenB(str)
Debug.PrintL1,L2->
这个代码运行得很好,完全符合我的想像,在立即窗口中显示了12,24,
Good,于是我准备在窗口中用TextOut把它打印出来,至于为什么我一定要这个函数而不用其它的,你管得着么?所以我写下了于下代码
->DimstrAsString
str="Givemea美女"
DimL1AsLong
DimL2AsLong
L1=Len(st...[ 查看全文 ]