See this post in : English Version or French Version
 Private Sub Command1_Click()
　r = InputBox(“请输入您要判断的数字”)
　For i = 2 To r
　　　If Val(r) Mod i = 0 And i <> Val(r) Then ‘这里给出了非质数的条件
　　　　MsgBox (“此数为非质数”)
　　　　Exit Sub
　　　End If
　Next i
　MsgBox (“此数为质数”)
End Sub

很久很久以前，有一棵又高又大的苹果树。一位小男孩，天天到树下来，他爬上去摘苹果吃，在树荫下睡觉。他爱苹果树，苹果树也爱和他一起玩耍。
后来，小男孩长大了，不再天天来玩耍。一天他又来到树下，很伤心的样子。苹果树要和他一起玩，男孩说：“不行，我不小了，不能再和你玩，我要玩具，可是没钱买。”苹果树说：“很遗憾，我也没钱，不过，把我所有的果子摘下来卖掉，你不就有钱了？”男孩十分激动，他摘下所有的苹果，高高兴兴地走了。然后，男孩好久都没有来。苹果树很伤心。
有一天，男孩终于来了，树兴奋地邀他一起玩。

最近这两天太累了！
计算机的projet把我的脑汁榨尽了；为了选课，我去上了所有能听的课，累得不行；还要去餐馆打工！唉!
 留学生的生活真的值得让人羡慕吗？可能是我们身在福中不知福吧

BIO HAZARD OFFICIAL NOVEL－THE BEGINNING 
生化危机官方小说－．全新翻译版 ALL RIGHTS RESERVED BY 
（C）CAPCOM Co., Ltd , 1996 , 1998 原著：有贺博之 
译者：幽冥之海
【第一章 生化危机】每当深夜，电话铃声突然响起而将我惊醒的时候，我就知道，又有一个前一天还生龙活虎的人死了。像这样的事情总是一而再、再而三地发生，有时候我真希望是打错电话的，就像有次一个醉得七荤八素，把我当成是她多年不见的旧情人的女人打来的一样，或者，像上次那个我一接起电话他就占着线，劈哩啪啦说了一长串葡萄牙文的白痴也行。 
我有这种被称为「深夜铃声恐惧症」的症状，已经整整五年了，从五年前的某天凌晨，我在两点的时候接到州警的通知说我的父母意外死亡的那天开始。他们开着休旅车，在公路上被一辆大卡车追撞，肇事者随即逃逸无踪，然而，他们的车子却变成了一堆废铁，法医甚至不得不用牙医资料来辨认尸体的身分。 
他们被撞得血肉模糊。 
哪怕是我后来加入了S.T.A.R.S【特殊战略与救援小组，浣熊市（RACOON CITY）警局用以处理暴力犯罪及灾难救援的特种部队】，每当黎明来临前的那几个小时电话突然响起的时候，我仍然会吓得浑身发毛，许多残酷的案子是在夜晚发生的，大部分的民众都在睡梦中，也因此这类案件通常都没有目击者，一桩暴力犯罪也许要好几个小时之后才被发现，所以常常当我到达现场的时候，尸体早已经冰冷僵硬的像块木板了。 
是啊，当电话铃声在深夜响起的时候，还是赌它是件坏事的好。 
就像半个小时以前，当我正梦到自己是个摇滚巨星，而我身边被一群狂热的女歌迷包围着，却被比利的电话吵醒的时候一样，他是我在念书时的死党，通常我接到老朋友的电话总是非常高兴，即使是像这样的深夜也完全不介意，但这通电话可是非比寻常，除非他们现在连棺材里也配备手机，你知道吗？ 
比利早在三个月以前就已经去世了！ 
我这个死党原本即将升任高阶研究员，他是隶属于本地一家名字叫安布雷拉(Umbrella)的大型企业，大约三个月以前，他被调到芝加哥去加入某个神神秘秘的研究计画，启程那天，他搭乘安布雷拉公司的专机准备离开浣熊市，一切看起来就像是次再普通不过的飞行，然而，当飞机起飞后一个小时，便在飞航管制中心的雷达上失去了踪影，与机上的通讯也同时中断。 
飞机就这么消失了。 

我因为人在法国，所以写日志时常要用3种语言交替：
中文是为了和大家共享一下我在法国的留学生活啦，还有就是以我的外文水平写不出来的东西…
英文是为了写博客赚钱啦，顺便能提高一下英语水平，学金融这是必备工具啊；
法文啊，这是我在这边的生活工具嘛…
好了，废话不多说，以下的code是我刚刚学来的，还没有深入研究:
进入你wordpress管理界面，然后进入主题编辑器，打开主页面模板，在
<?php if (have_posts()) >
和
<?php while (have_posts()) : the_post();:?>
之间插入如下代码：

<?php if ($_SERVER["HTTP_ACCEPT_LANGUAGE"]=”zh-cn”) > –识别浏览器的语言是否为 zh-cn
<?php else >
<?php if (is_home()) {query_posts(‘category_name=en’);}?> –若不是 zh-cn, 在首页只显示” en “种类的日志
<?php endif ;?>

如果你不知道其他语言的代码是什么，进入IE的internet选项，在常规标签的最下方有一个语言按钮，单击它会打开一个新的小窗口，让你进行语言首选项的设置，你会看到有一个添加(A)…的按钮，点击它就能在新打开的小窗口中看到所有语言以及其代码。
希望这些能帮到你!!