怎麼寫VBA窗體中textbox3的值等於textbox1 te乘以textbox2的值的語句

2022-12-31 17:05:36 字數 2664 閱讀 4940

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 ...