那种熟悉的感觉和熟悉环境与气氛

近来上层地震,被某人叫去谈话,出来之后才发现,那种感觉似曾相识,我曾经经历过这样的事情,我曾经被询问式地要对某件事情表态?我曾经被问及对某些人的看法?

一切都好像多年前曾经发生过的一样,但我实在想不起来,到底在何时何地,到底在何时何地?!

不过这大概没有太大的关系,既然潜意识之中有了这样的经验,事实上我觉得我的对答是很如流的,一没有昧着自己的良心,二,也对得起几方面的人。

不过我还是希望能够努力地想起来,我脑海中的曾经的经验来于何时。

是的,假如冥冥中的主宰没有干涉这些小事情的话,我想,它们确实曾经类似地发生过。

Dual Photography

看完这个短片,技术的进步还真是神速。

大概不久的将来,那些赌神赌圣之类的大片都会把这种技术用上去的,嘎嘎,将灯打在对手的牌上,反射到对手的脸上,从脸上的细微变化分析牌的特点。

Tender is the Night

昨晚开始没睡好,于是起来看《夜色温柔》。

Dick Diver是一个比较有趣的人,不过遇上Nicole 算是一生的不幸。

他确实没融进那个上流社会,让自己变得庸俗,再庸俗,他让上流社会都觉得他超水准了,当然不是从财富上而论。

不过Dick真的爱Nicole么?或许那种爱只是一个美丽的误会。

那么Rose-mary呢?

忘尽心中情

忘尽心中情

遗下爱与痴

任笑声送走旧愁

让美酒洗清前事

四海家乡是

何地我懒知

顺意趋寸心自如

任脚走尺躯随遇

难分醉醒玩世就容易

此中胜负只有天知

披散头发独自行

得失唯我事

昨天种种梦

难望再有诗

就与他永久别离

未去想那非和是

未记起从前名字

牙痛

国庆长假的最后一天在家里吃饭的时候,觉得土塘虱味道不错,多吃了几口,不小心被鱼刺扎了口腔,然后回来深圳上班,没留神,加上一周吃了两次胜记海鲜,结果牙齿开始发作,右边痛完就左边痛,最后两边一起痛,!!!

可怜的p,最后要用花旗参茶来好好侍候它们。

word中全角符号转半角

最近无聊做文档,跟领导建议不要用word做,没被采纳,无奈文档给洋人看,全角符号要改半角,于是仿照现成例子写个macro:

Sub 字母数字符号全角转半角()

‘ 字母数字符号全角转半角 Macro

‘ 宏在 2005-10-14 由 ZhengRC 创建

Dim qjsz, bjsz As String, i As Integer ‘定义qjsz(全角数字)、bjsz(半角数字)为字符串型,i为整数型

qjsz =

0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ,./<>?;':

[]{}\|=-+_)(*%$#@!`~& 

bjsz =

0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ,./

?;’:

[]{}\|=-+_)(*%$#@!`~

Selection.WholeStory

For i = 1 To 95 ‘循环10次

    With Selection.Find

        .Text = Mid(qjsz, i, 1) ‘mid函数:返回文本字符串中从指定位置开始的特定数目的字符,每次取一个数字

        .Replacement.Text = Mid(bjsz, i, 1) ‘将用于替换的相应位置的半角数字

        .Format = False ‘保留替换前的字符格式

        .Execute Replace:=wdReplaceAll ‘用半角符号替换全角符号

    End With

Next i

End Sub