小吳 VBQA 程式設計討論

目前有以下兩單位text1(text)、HScroll1(HScrollbar,max=100,min=0) ^^^^^^ 　　　　　(兩物件or兩控制項吧?) 你的意思是當Change HScroll1時，HScroll1的新的數值會 顯示在Textbox1中是吧?不太懂你的意思 Private Sub HScroll1_Change() Text1.Text = HScroll1.Value End Sub

不知道您的意思~ 是不是這樣滴 Text1.Text=CStr(HScroll1.Value)

程式碼沒錯，問題是你把程式碼寫在哪個 event？ 應該是 change 跟 scroll 兩個 event 都要寫 Private Sub HScroll1_Change() Text1.Text = HScroll1.Value End Sub Private Sub HScroll1_Scroll() Text1.Text = HScroll1.Value End Sub

謝謝大家，我下次會把問題說清楚點的，謝謝大家。