1樓:匿名使用者
private sub command9_click()text1 = text1.text & command9.caption
end sub
用字串連線就行了
2樓:angel的
你的按鈕上比如是9
那你就 & 9
是8 就 & 8
text1.text=text1.text & 9text1.text=text1.text & 8簡單易懂
3樓:幫寶適
用label控制元件做顯示
label1屬性:
alignment:1-right jusitfybackcolor:白色
borderstyle:1-fixed single用command控制元件陣列
(複製貼上10個command控制元件caption分別為:0、1、2、3、4、5、6、7、8、9)
按鈕單擊事件**:
private sub command1_click(index as integer)
if label1.caption = "0" thenif index <> 0 then
label1.caption = indexend if
else
label1.caption = label1.caption & index
end if
end sub
4樓:匿名使用者
比如在文字框裡顯示資料
private sub command1_click()text1.setfocus
sendkeys "9"
end sub
要用vb製作計算器,怎麼用命令按鈕做數字將數字輸入到文字框要**?
5樓:匿名使用者
按c鍵text1.text=mid(text1.text,1,len(text1.text)-1)
按cetext1.text="0"
接初始化命令
再次輸入?
你把按ce後,所有的變數,常量都初始化一下就好了
6樓:
可以就是將bai文字框後面增du
加一個數字,就是在文字框內容最zhi後增加命令按鈕dao所顯示的專數字
比如private sub command3_click()text1.text = text1.text & "3"
end sub
或通用的按鈕組屬
private sub command1_click(index as integer)
text1.text = text1.text & indexend sub都行
7樓:匿名使用者
button_click()
類似這樣