語C猜數字遊戲懲罰中的字尾是什麼意思

2021-09-20 06:22:53 字數 5763 閱讀 1204

1樓:天地遊塵

意思就是說要你每句話後面都加上出懲罰者指定的話。

比如說,出懲罰者要你每句話加字尾」喵嗚~「,直到他指定的懲罰時間結束你不管說什麼後面都要加上」喵嗚~「

比如——

【靠在牆上點菸】嘁,真無聊。喵嗚~

一邊兒去別打擾老子休息!!喵嗚~

↑就像這樣...噗,那個喵嗚其實不是你想說的,但是是懲罰所以不管你說什麼都必須加上,直到懲罰時間結束。臉皮後的還好,臉皮薄的你乾脆就不要說話了||| 我覺得字尾一般沒這麼溫柔的xd

當然也有掛簽名一類的,那就是在個性簽名後面加上這個「喵嗚~」直到懲罰時間結束|||

2樓:夏侯侯專

猜數字建乙個文字文件,輸入以下**,字尾改為.frm用vb開啟就可以了

以下是程式原始碼:

version 5.00

begin vb.form form1

borderstyle = 3 'fixed dialog

caption = "猜數遊戲"

clientheight = 3900

clientleft = 45

clienttop = 435

clientwidth = 4680

linktopic = "form1"

maxbutton = 0 'false

minbutton = 0 'false

scaleheight = 3900

scalewidth = 4680

showintaskbar = 0 'false

startupposition = 3 '視窗預設

begin vb.commandbutton command2

caption = "重新開始"

height = 615

left = 2640

tabindex = 2

top = 2760

width = 1095

endbegin vb.commandbutton command1

caption = "確定"

height = 615

left = 840

tabindex = 1

top = 2760

width = 1095

endbegin vb.textbox text1

height = 375

left = 1200

tabindex = 0

top = 2040

width = 2055

endbegin vb.label label9

caption = "戲"

beginproperty font

name = "宋體"

size = 24

charset = 134

weight = 400

underline = 0 'false

italic = 0 'false

strikethrough = 0 'false

endproperty

forecolor = &h000080ff&

height = 615

left = 3720

tabindex = 11

top = 240

width = 615

endbegin vb.label label8

caption = "遊"

beginproperty font

name = "宋體"

size = 24

charset = 134

weight = 400

underline = 0 'false

italic = 0 'false

strikethrough = 0 'false

endproperty

forecolor = &h00808080&

height = 615

left = 3240

tabindex = 10

top = 240

width = 615

endbegin vb.label label7

caption = "數"

beginproperty font

name = "宋體"

size = 24

charset = 134

weight = 400

underline = 0 'false

italic = 0 'false

strikethrough = 0 'false

endproperty

forecolor = &h0000ffff&

height = 495

left = 2760

tabindex = 9

top = 240

width = 615

endbegin vb.label label6

caption = "猜"

beginproperty font

name = "宋體"

size = 24

charset = 134

weight = 400

underline = 0 'false

italic = 0 'false

strikethrough = 0 'false

endproperty

forecolor = &h00ff00ff&

height = 495

left = 2280

tabindex = 8

top = 240

width = 735

endbegin vb.label label5

caption = "入"

beginproperty font

name = "宋體"

size = 24

charset = 134

weight = 400

underline = 0 'false

italic = 0 'false

strikethrough = 0 'false

endproperty

forecolor = &h00ff0000&

height = 615

left = 1800

tabindex = 7

top = 240

width = 855

endbegin vb.label label4

caption = "進"

beginproperty font

name = "宋體"

size = 24

charset = 134

weight = 400

underline = 0 'false

italic = 0 'false

strikethrough = 0 'false

endproperty

forecolor = &h0000ff00&

height = 735

left = 1320

tabindex = 6

top = 240

width = 735

endbegin vb.label label3

caption = "迎"

beginproperty font

name = "宋體"

size = 24

charset = 134

weight = 400

underline = 0 'false

italic = 0 'false

strikethrough = 0 'false

endproperty

forecolor = &h00ffff00&

height = 735

left = 840

tabindex = 5

top = 240

width = 735

endbegin vb.label label2

caption = "歡"

beginproperty font

name = "宋體"

size = 24

charset = 134

weight = 400

underline = 0 'false

italic = 0 'false

strikethrough = 0 'false

endproperty

forecolor = &h000000ff&

height = 615

left = 360

tabindex = 4

top = 240

width = 495

endbegin vb.label label1

caption = "我這兒有1~10的整數,你猜猜看他是多少......"

height = 375

left = 480

tabindex = 3

top = 1320

width = 3855

endend

attribute vb_name = "form1"

attribute vb_globalnamespace = false

attribute vb_creatable = false

attribute vb_predeclaredid = true

attribute vb_exposed = false

dim x as integer, y as integer, z as integer

dim cishu as integer

private sub command1_click()

if cishu = 3 then msgbox "已經猜3次了,這個數是" & x: exit sub

y = val(text1.text)

if text1.text = "" or not isnumeric(text1.text) then

msgbox "輸入有誤!請重新輸入數字", 48

text1.text = ""

text1.setfocus

exit sub

end if

cishu = cishu + 1

select case x - y

case is < 0

z = msgbox("你猜數大了,請重猜。注意:你只有三次機會", 48 + 1)

text1.text = ""

text1.setfocus

case is > 0

z = msgbox("你猜數小了,請重猜。注意:你只有三次機會", 48 + 1)

text1.text = ""

text1.setfocus

case else

z = msgbox("恭喜你猜中了!", 1)

end select

end sub

private sub command2_click()

cishu = 0

randomize timer

x = int((rnd * 10) + 1)

end sub

private sub form_load()

cishu = 0

randomize timer

x = int((rnd * 10) + 1)

end sub

**結束

卓7358/

歡迎來我空間

希望採納

猜數字遊戲猜數字的遊戲規則

以前寫過乙個,當然,沒做介面的,要做介面自己可以做 include include include using namespace std int main char gues new char 4 unsigned int a 0 unsigned int b 0 unsigned int tim...

語C群裡面的國王遊戲應該怎麼玩,語C群裡面的國王遊戲應該怎麼玩

首先,確定 復參加遊戲的制人數。然後私聊給玩的 bai人編號du。國王就是寫劇本的人,國王zhi會寫乙個dao劇本,當中的人物用編號代替 國王事先不知道編號 等人物號碼發好,劇本也寫好時,就可以開始玩了。被發到號的人就按照劇本裡的劇情開始扮演。大概就是這樣,希望可以幫到你。有什麼不理解的可以追問。國...

python猜數字遊戲,求幫忙找錯誤並改正

這個是典型的異常處理,try except 這樣,有異常會重新要求輸入,程式不會中斷 肯定的,因為你用int做了強制型別轉換,如果輸入的不是int型別就會報錯,其實可以加個檢測,如果輸入不符合int型別自動忽略或者重新輸入就好了 def panduan a input input for i in ...