1樓：匿名使用者
你在計算按鈕上雙擊，在其click事件中輸入**a=thisform.text1.valueb=thisform.
text2.valuen=thisform.optiongroup1.
valuedo case
case n=1
thisform.text3.value=a+bcase n=2
thisform.text3.value=a-bcase n=3
thisform.text3.value=a*bcase n=4
thisform.text3.value=a/bendcase
thisform.refresh
2樓：
設計步驟如下(借鑑)：
(1)建立應用程式使用者介面。
選擇“新建”表單，進入表單設計器，增加一個文字框控制元件textl、一個標籤控制元件label1和一個命令按鈕組commandgroup1,並將命令按鈕組的buttoncount屬性改為16。
(2)設定物件屬性如下表所示：
commandgroup1中各按鈕的屬性設定
物件 屬性 屬性值 說明
command1～command10 caption 依次改為：1、2、3、4、5、6、7、8、9、0
fontbold .t.
command11～command10 caption 依次改為：.、=、+、-、*、/
fontbold .t.
(3)編寫程式**。
①編寫commandgroup1的click事件**：
if thisform.tag=.t.
thisform.text1.value=allt(right(str(this.value),1))
thisform.tag=〃 〃
else
a=thisform.text1.value
thisform.text1.value=a+allt(right(str(this.value),1))
endif
②編寫“.”按鈕command11的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃.〃
③編寫“=”按鈕command12的click事件**：
a=thisform.text1.value
thisform.tag=.t.
④編寫“+”按鈕command13的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃+〃
thisform.tag=〃 〃
⑤編寫“-”按鈕command14的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃-〃
thisform.tag=〃 〃
⑥編寫“*”按鈕command15的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃*〃
thisform.tag=〃 〃
⑦編寫“/”按鈕command16的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃+〃
thisform.tag=〃 〃
vf編寫簡易計算器
3樓：
設計步驟如下(借鑑)：
(1)建立應用程式使用者介面。
選擇“新建”表單，進入表單設計器，增加一個文字框控制元件textl、一個標籤控制元件label1和一個命令按鈕組commandgroup1,並將命令按鈕組的buttoncount屬性改為16。
(2)設定物件屬性如下表所示：
commandgroup1中各按鈕的屬性設定
物件 屬性 屬性值 說明
command1～command10 caption 依次改為：1、2、3、4、5、6、7、8、9、0
fontbold .t.
command11～command10 caption 依次改為：.、=、+、-、*、/
fontbold .t.
(3)編寫程式**。
①編寫commandgroup1的click事件**：
if thisform.tag=.t.
thisform.text1.value=allt(right(str(this.value),1))
thisform.tag=〃 〃
else
a=thisform.text1.value
thisform.text1.value=a+allt(right(str(this.value),1))
endif
②編寫“.”按鈕command11的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃.〃
③編寫“=”按鈕command12的click事件**：
a=thisform.text1.value
thisform.tag=.t.
④編寫“+”按鈕command13的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃+〃
thisform.tag=〃 〃
⑤編寫“-”按鈕command14的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃-〃
thisform.tag=〃 〃
⑥編寫“*”按鈕command15的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃*〃
thisform.tag=〃 〃
⑦編寫“/”按鈕command16的click事件**：
a=thisform.text1.value
thisform.text1.value=a+〃+〃
thisform.tag=〃 〃
4樓：咎蘿醜山彤
簡單的計算器吧
通過鍵盤輸入數
實現+-
*/功能
在表單裡建
六個命令按鈕+-
*/=c(清零)
一個文字框
寫**右鍵
**對form1初始化
過程為init
public
a,b,c,d
d=0文字框**
text1
過程lostfocus
c=thisform.text1.value命令按鈕+（command1）
過程click
a=cc='0'
thisform.text1.value=cb='+'
命令按鈕-(command2)
過程同上
a=cc='0'
thisform.text1.value=cb='-'
乘法的a=c
c='0'
thisform.text1.value=cb='*'
除法的a=c
c='0'
thisform.text1.value=cb='/'
等號的if
b='+'
d=val(a)+val(c)
c=str(d)
thisform.text1.value=dendif
ifb='-'
thisform.text1.value=val(a)-val(c)endif
ifb='*'
thisform.text1.value=val(a)*val(c)endif
ifb='/'
thisform.text1.value=val(a)/val(c)endif
清零的thisform.text1.value='
'完成了不知道好使不
如何利用巨集替換函式在vf裡製作簡易計算器
5樓：匿名使用者
1.建表單
2.建2個文
du本框 text1，text2
3.建1個命令按鈕
zhidao command1
4.在表單版 init 中寫入權：
thisform.text2.value = 05. 在命令按鈕 command1 的 click 中寫入：
local ccmd
ccmd = "thisform.text2.value = " + alltrim(thisform.text1.value)
&ccmd
6.執行表單
7.在 text1 中輸入 1+2*3/4+(5+6)+7^88.按 command1 按鈕
9.text2 中顯示結果 5764814.50
計算器後面多出幾個零怎麼清除啊，計算器0 後面有個加號怎麼刪除
計算器的shift mode 數字3 等號就可以清零了。補充 一般由運算器 控制器 儲存器 鍵盤 顯示器 電源和一些可選外圍裝置及電子配件，通過人工或機器裝置組成。現代的電子計算器能進行數 算的手持電子機器，擁有積體電路晶片，但結構比電腦簡單得多，可以說是第一代的電子計算機 電腦 且功能也較弱，但較...
簡便計算怎麼做，怎麼做用簡便計算？
1 56 bai99 56 56 99 56 1 56 99 1 56 100 5600 利用乘法分 du配律計算 2 4800 25 4 4800 25 4 4800 100 48一個zhi數分別 除以兩dao個數等於這一個數除以這專兩個數的屬乘積 3 35 125 8 35 125 8 35 1...
電腦計算器16進位制轉換10進位制怎麼用
把計算器的計算模式切換成程式設計師模式，首先選擇16進位制計算模式，輸入需轉換的數值，然後選擇10進位制模式，10進位制的值就出來了。卡西歐計算器二進位制十進位制十六進位制怎麼轉換 開機 按選單設定鍵 選擇3 x平方右側四個鍵分別代表dec十進位制，hex16進位制，bin2進位制，oct8進位制 ...