vb程序錯在哪了,vb程式錯在哪了???

2022-10-16 03:20:02 字數 1249 閱讀 9954

1樓:匿名使用者

把case a = "紅色"

改為case "紅色"

最後乙個label1.backcolor = rbg(255, 255, 0)

rbg改為rgb

private sub command1_click()dim a as string

a = form1.text1.text

select case a

case "紅色"

label1.backcolor = rgb(255, 0, 0)case "綠色"

label1.backcolor = rgb(0, 255, 0)case "藍色"

label1.backcolor = rgb(0, 0, 255)case else

label1.backcolor = rgb(255, 255, 0)

end select

end sub

2樓:匿名使用者

select case a

case "紅色"

label1.backcolor = rgb(255, 0, 0)case "綠色"

label1.backcolor = rgb(0, 255, 0)case "藍色"

label1.backcolor = rgb(0, 0, 255)case else

label1.backcolor = rgb(255, 255, 0)

end select

3樓:

private sub command1_click()dim a as string '可以去掉a = form1.text1.text  '可以去掉select case form1.

text1.text '為什以要用變數,可以直接把text1放在這

case "紅色"

label1.backcolor = rgb(255, 0, 0)case "綠色"

label1.backcolor = rgb(0, 255, 0)case "藍色"

label1.backcolor = rgb(0, 0, 255)case else

label1.backcolor = rbg(255, 255, 0)

end select

end sub

4樓:追逐柏拉圖

具體報錯內容是什麼?太久沒程式設計我對具體語法也不敢叫死準了。

按姓名查詢錯在哪了 c語言

精彩的合併!不過,我發現查詢中有。乙個小錯誤 if strcmp search student,student i name 0 break 這裡break的位置錯了,應放到if的括號中,這造成你無論找不找得到都輸出 沒有這位學生!且只能找到第乙個學生,還有if strcmp search stud...

1 0 99999的悖論錯在哪裡

這不是悖論,而是事實,無限迴圈小數和 1 嚴格相等,不是無限趨近,而是完全相同,你可以認為 他們是同乙個數的兩種寫法而已。這兩者相等,是實數的構造過程直接決定的,而嚴格的證明過程也繞不開構造實數的兩種方法,戴德金分割和柯西序列法,並且他們是等價的。網上常見的證明方法,比如什麼 1 1 3 3 均不是...

python中錯誤,但不知道錯在哪

我在python2.5的idel環境下試了一下,發現應該是輸入符號的問題,我複製執行時發現錯誤在 和 上,更改後就出正確的結果,你可以試試看,要不然就是真的安裝環境有問題。樓主最好把錯誤資訊貼上來。沒有錯 要麼是你python環境沒設好,要麼是你謄的時候打錯了。是不是就是一陣黑過去,什麼也沒看到啊?...