24h購物| | PChome| 登入
2008-03-06 22:56:55| 人氣128| 回應5 | 上一篇 | 下一篇

北爛的程式碼

推薦 0 收藏 0 轉貼0 訂閱站台

a = InputBox(”你愛我媽?”)
Do While a <> ”愛”
MsgBox ”你欠扁媽?不愛!?”
a = InputBox(”你愛我媽?”)
Loop
If a = ”愛” Then

MsgBox ”可是我不愛你耶”

End If














































x = InputBox(”　”, ”　”, 0)

If x Mod 2 = 1 Then

For a = 1 To (x + 1) / 2
For b = 1 To (x + 1) / 2 - a
Print ”　”;
Next b
For c = 1 To a * 2 - 1
Print ”＊”;
Next c
Print
Next a

For d = 1 To (x - 1) / 2
For e = 1 To d
Print ”　”;
Next e

For f = 1 To x - 2 * d
Print ”＊”;
Next f
Print
Next d

Else
MsgBox ”輸入單數”
End If

我要檢舉
台長： 肥肥

您可能對以下文章有興趣

人氣(128) | 回應(5)| 推薦 (0)| 收藏 (0)| 轉寄
全站分類: 不分類

我要回應
鴨子
白痴死了
哈哈哈
2008-03-07 11:33:39
版主回應
我自己也這樣覺得 哈哈哈哈哈
2008-03-07 11:40:01
小黑
我笑了....
2008-03-07 18:47:12
版主回應
哈哈哈 不錯八 這程式
2008-03-11 00:26:52
╰★〝阿爵〞☆╮
我只看的懂上面的= =!!

不過上面的很北覽=ˇ=!!

哈哈哈哈哈XDDD
2008-03-07 22:17:11
版主回應
哈哈哈哈對阿 我超喜歡
2008-03-11 00:27:12
峰×*
a = inputVOX (&quotVOX好貴&quot)

If Tone > 痛

Then Print &quot真的好痛&quot

End If
2008-03-09 00:17:34
版主回應
哈哈哈哈哈哈哈哈
丁丁 你想笑死我 哈哈哈
好北爛 我輸了XDDDDDDD
2008-03-11 00:27:44
正妹~田
層次感咧= =
真是= =
2008-03-11 22:15:40
版主回應
報台的用不出來啦 吼
2008-03-12 19:30:48
否 是 (若未登入"個人新聞台帳號"則看不到回覆唷!)
* 請輸入識別碼：
請輸入圖片中算式的結果(可能為0) 
(有*為必填)
TOP
詳全文