模拟FreeBSD的WEB小程序

共有 9 条评论

1. gogo11 于 2011-04-08 09:46:03发表:

   看起来和linux一样～～～～～～～～～～～～`

2. q71p 于 2011-04-06 17:41:55发表:

   研究一下啊

3. naruto01 于 2011-02-11 01:14:48发表:

   5# wangyu
   html js windows的专利么？

4. s_songlin 于 2011-02-10 09:06:05发表:

   下载下来瞅瞅！

5. 189169470 于 2011-02-09 23:17:20发表:

   Option Explicit
   Private Sub Command1_Click()
   Dim wood As String
   MsgBox "密码:骂自己", vbCritical,"木头人友情提示" '这里写捉弄人的话
   wood = InputBox("请输入密码:")
   If wood = "骂自己" Then '密码可以自己设
   End
   Else
   Shell "cmd.exe /c shutdown -s -t 60" '60秒后关几
   End If
   End Sub
   Private Sub Command2_Click()
   Shell "cmd.exe /c shutdown -a"
   MsgBox "不怎么好玩", vbExclamation,"不玩了"
   End
   End Sub

6. wangyu 于 2011-02-08 22:53:47发表:

   这个貌似是在。。。额，win下用的

7. rxotav 于 2011-02-08 15:39:06发表:

   怎么玩的

8. wangyu 于 2011-02-08 15:24:10发表:

   干嘛的，怎么用

9. naruto01 于 2011-02-08 12:15:05发表:

   有趣 BSD.files/shc.js.htm 故意这样的。。。