月度归档:2005 年十月

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

关于神六

昨天发现东方卫视的新闻其实做得不错,在播报的同时,下方打印之前或者之后的重要新闻。

浏览了一下世界各大新闻社对神六的报道。其他都是一般,美联社的视点比较独特,中国开放如此多的内外媒体,让他们同步报道神六的发射,昭示中国对自己升天技术的强大信心。

不过我想,信心归信心,跟100%的成功率是永远不能划上等号的,至于可能失败之后的危机公关,如何平息公众的各种指责与声音,政府估计也做足的准备。

昨天看一篇文章,说为何致力发展航天而非航母,说的话也不无道理,按照战列舰被淘汰的趋势,航母将来亦并非战争主角,航天技术的提升还是很有必要的。虽然文章有点御笔性质,但观点还是可以的。

神6升空

没什么感觉,正如两年前神5那样,没有什么大喜的感觉。

应该是顺理成章的事情,无论成败。