Re: [請益] 程式幫忙修改,謝謝~

看板Visual_Basic作者 (B.r)時間19年前 (2005/05/15 19:55), 編輯推噓2(202)
留言4則, 3人參與, 最新討論串2/2 (看更多)
※ 引述《dilutetarget (邁向幸福的擁抱吧~)》之銘言: : 不好意思我只是個初學者,如果問題太笨或是太簡單還請見諒~ : [視窗圖]http://img124.echo.cx/img124/2497/11go.jpg
: [程式碼] dim a as integer dim b as integer : Private Sub cmdend_Click() : End : End Sub : Private Sub cmdrun_Click() : m = Val(txta.Text) : n = Val(txtb.Text) : total = m + n : txtshow.Text = total : End Sub : Private Sub hsb1_Change() : a = hsb1.Value b = hsb2.Value text3 = a + b : End Sub : Private Sub hsb2_Change() : b = hsb2.Value a = hsb1.Value text3 = a + b : End Sub : 這小段程式與物件屬性無誤可執行。 : 不過實際上的題目卻是: : 數字A與數字B的值為0~100,而其值是水平捲軸產生並顯示其值 : 於文字方塊內,同時將二數之何顯示text3文字方塊(也就是"A+B="之後的那個方塊)內~ : 因為"執行"那個commandbutton是我自己加入的,來測試自己的程式碼是否正確~ : 如果沒有那個button而要使和直接顯示於text3的話,請問程式該怎麼改呢? : ...麻煩各位了,文章蠻長的,謝謝! -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 192.83.195.244

192.83.195.244 05/15, , 1F
這樣子試試看!!也就是在每次hsb變換時都計算一遍
192.83.195.244 05/15, 1F

210.58.156.43 05/15, , 2F
沒必要用變數吧?
210.58.156.43 05/15, 2F

61.229.71.109 05/15, , 3F
對啊,沒必要用變數
61.229.71.109 05/15, 3F

192.83.195.244 05/15, , 4F
哦!!直接hsb1.Value + hsb2.Value吧!!
192.83.195.244 05/15, 4F
文章代碼(AID): #12XpYkHD (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #12XpYkHD (Visual_Basic)