1樓:匿名使用者
private sub form_load()text1 = 0
text2 = 0
end sub
private sub text1_change()if isnumeric(text1) thentext3 = text1 * text2else
'msgbox "請輸入數字!"
text1 = 0
end if
end sub
private sub text2_change()if isnumeric(text2) thentext3 = text1 * text2else
'msgbox "請輸入數字!"
text2 = 0
end if
end sub
2樓:徐小暈
private sub textbox1_change()if textbox2 <> "" thentextbox3.value = textbox2.value * textbox1.
value
end if
end sub
private sub textbox2_change()if textbox1 <> "" thentextbox3.value = textbox2.value * textbox1.
value
end if
end sub
3樓:
private sub 單價或數量文字框_change()
金額文字框.text=.....
end sub
4樓:楓葉卡了
textbox3.value = textbox2.value * textbox1.value
excelvba窗體三個文字框textbox1、textbox2、textbox3,textbox3的數值=textbox2*textbox3,編碼怎麼寫?
5樓:匿名使用者
在textbox2的代
碼區寫入專:屬
private sub textbox2_change()textbox3.value = textbox2.value * textbox1.value
end sub
用vba如何顯示把textbox3的值設定為textbox1+textbox2的值,並且保證1和2中間有空格?textbox2後面是回車?
6樓:朱仕平
private sub commandbutton1_click()if textbox3.text = "" thentextbox3.text = cdbl(textbox1.
text) + cdbl(textbox2.text)
textbox1.text = ""
textbox2.text = ""
else
textbox3.text = cdbl(textbox1.text) + cdbl(textbox2.text) + cdbl(textbox3.text)
end if
end sub
excel vba 窗體中textbox計算問題
7樓:匿名使用者
你可以使用
textbox1=val(textbox2)+val(textbox3)+val(textbox4)
因為textbox沒有指定屬性,預設代表 textbox.text,所以他們相加就是字串相加了。
vba,如何用for……next語句,把textbox1、textbox2、textbox3中的資料分別寫入a1、a2、a3單元格?
8樓:匿名使用者
為何非要for語句?難道你很多文字框?很多的話你應該用控制元件陣列。
9樓:匿名使用者
樓上正解沒有問題啊
樓主你要是用excel就不應該用那麼多文字框啊直接用excel的單元格多好
你看看引用吧
像ole automation
forms 2.0 object library這些都勾上
vba 給textbox1一個值 textbox2立即出現另一個值(值的**是工作表中,如textbox1等於a1 則textbox等於a2)
10樓:匿名使用者
一般利用textbox的change事件,如下:
private sub textbox1_change()
if textbox1.value = sheets("工作表名稱").cells(1,"a") then textbox2.
value = sheets("工作表名稱").cells(2,"a")
end sub
sheets("工作表名稱")這裡的工作表名稱就是值的**工作表顯示的名稱,一般新建的工作表顯示為sheet1,sheet2,sheet3...
cells(1,"a")表示第一行,第「a"列的單元格,也就是a1單元格,以此類推...
就知道樓主是想在a列裡面查詢匹配資料,然後在textbox2裡面顯示出來。借上面同志的附件,給你改一個快得!!
ACCESS窗體中組合框的數值怎麼設定?在屬性中怎麼操作
在表結構設計檢視中,選中該欄位,在下部可以看到 常規 和 查閱 選中查閱,可以看到下面的顯示控制元件型別為 文字框 將其改為 組合框 然後看 行 型別 行 型別 選擇 值列表 在行 裡填入你要選擇的所有內容,用 分隔 行 型別 選擇 表 查詢 在行 裡填入查詢語句,如 select 欄位名 from...
簡歷中it技能怎麼寫,簡歷中IT技能怎麼寫
1 it技能就是你會的計算機知識。從精通程度上可以分為精通 熟練 瞭解等 從所學內容上,把你學過的語言 用過的工具 掌握的技術都寫上,按條理分類寫。2 it技能,比如 熟練操作計算機,熟練使用各類辦公軟體,如word excel等。使用作圖軟體製作 其他的一些常用軟體操作水平,區域網組建 管理能力,...
在ExcelVBA中怎麼寫if函式
如果要寫公式,就直接用雙引號括起來即可,如 內 range a1 if p9 0,0,p9 100 p9 t9 u9 如果想直 接得到值容 if range p9 0 thenrange a1 0 else range a1 range p9 100 range p9 range t9 range ...