求VB大神幫忙寫隨機選數和猜數的VB程式謝謝

2021-05-02 11:22:18 字數 889 閱讀 2482

1樓:設計營地

這個太簡單了自己做吧!

2樓:匿名使用者

我的理解是這樣:

當使用者按 new game (button)的按鈕時, 程式隨機產生乙個1-100 之間的數字, 然後使用者可以在 guesses (textbox) 裡輸入自己猜的數字, 然後當 單擊 enter(button) 時, 如果猜對了,在標籤label1裡顯示"correct!" ,並使得enter(button)按鈕不能使用、使得new game (button)按鈕可用;如果猜的數字大於100,那麼標籤label1裡顯示"too high" ,如果猜的數字小於1,那麼標籤label1裡顯示"too low" 。為了便於使用者使用該程式,要求程式每次啟動後,文字框獲得焦點。

程式不難,但是不知道翻譯得對不對?

3樓:匿名使用者

在窗體加文字框、標籤、new game 按鈕為command2,確定按鈕為command1

option explicit

dim a%

private sub command1_click()label1.visible = truea = text1.text

if a = label1.caption thenmsgbox "恭喜你!答對了"

else

msgbox "對不起!答錯了"

end if

end sub

private sub command2_click()label1.visible = falsetext1.text = "": label1.caption = ""

randomize

label1.caption = int((100) * rnd + 1)

end sub

求大神幫忙看看上面寫的什麼字,求大神幫忙看看上面寫的什麼字

正確答案 筆端欲掃千軍氣 詩思橫飛百尺臺。乙個字乙個字分開,看看寫字的能不能認出來。筆端欲掃千軍氣 詩思橫飛百尺臺。求大神幫忙看看上面刻著什麼字!江月松風 心香 x乙以敬 最後一方印的字刻反了 中間的是 心香其他的要看印出來的陽文 印章內容是 修己以敬 心香江月松風 求大神幫我看看這個上面寫的什麼字...

求大神幫忙寫一段串詞急,求大神幫忙寫一段串詞急一共二十個節目,串詞不用寫很多

純正原創,竭盡所能,心力交瘁,乙個字 累!1 他們是萌芽的種子,夢想長成參天大樹 他們是幼稚的雛鷹,夢想飛翔藍天 他們是一群可愛的安琪兒,正在瀟灑的向我們展示迷人的魅力和美麗的風采。下面請欣賞學前班小朋友帶來的 天使 走秀。2 藍天是白雲的家,樹林是鳥兒的家,海洋是魚兒的家,一年級同學也有 小朋友的...

求大神寫一首我愛秦利的藏頭詩,求大神幫忙寫一手藏頭詩,姜依彤,我愛你。如有所得感激不盡。

我憑闌干日向西,愛把漁竿伴鷺鶿。秦淮有水水無情,利門名路兩何憑。我見樓版船壯心權 目,愛向無明羅剎窟。秦時明月漢時關,利塵名網死當拋。我昔初在昭陽時,愛君雙檉一樹奇。秦城老翁荊揚客,利觜迎人著不得。我憑闌干日向西,愛捉狂夫問閒事。秦淮有水水無情,利門名路兩何憑。我見樓船壯心目,愛來沙島遺銀屋。秦川秦...