Serenity

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

Read the rest of this entry »

See this post in: Chinese Version or French Version

Private Sub Command1_Click()
　r = InputBox(”Enter a number please”) ‘ Enter a number to verify
　For i = 2 To r
　　　If Val(r) Mod i = 0 And i <> Val(r) Then ‘ this phase give a condition which is not a prime number
　　　　MsgBox (”The numbered you entered is not a prime number”)
　　　　Exit Sub
　　　End If
　Next i
　MsgBox (”The numbered you entered is not a prime number”)
End Sub

Read the rest of this entry »

我因为人在法国，所以写日志时常要用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)…的按钮，点击它就能在新打开的小窗口中看到所有语言以及其代码。

希望这些能帮到你!!