易語言計算源碼
1. 在易語言中用一個編輯框一個按鈕如何做個加減乘除都有的計算器。就源碼
復制代碼即可 下面附圖片
.版本 2
.程序集 窗口程序集1
.子程序 _按鈕1_被單擊
.局部變數 i, 整數型
.局部變數 n, 文本型, , "0"
.如果真 (尋找文本 (編輯框1.內容, 「+」, , 假) > 0)
n = 分割文本 (編輯框1.內容, 「+」, )
編輯框1.內容 = 編輯框1.內容 + 「=」 + 到文本 (到數值 (n [1]) + 到數值 (n [2]))
.如果真結束
.如果真 (尋找文本 (編輯框1.內容, 「-」, , 假) > 0)
n = 分割文本 (編輯框1.內容, 「-」, )
編輯框1.內容 = 編輯框1.內容 + 「=」 + 到文本 (到數值 (n [1]) - 到數值 (n [2]))
.如果真結束
.如果真 (尋找文本 (編輯框1.內容, 「*」, , 假) > 0)
n = 分割文本 (編輯框1.內容, 「*」, )
編輯框1.內容 = 編輯框1.內容 + 「=」 + 到文本 (到數值 (n [1]) × 到數值 (n [2]))
.如果真結束
.如果真 (尋找文本 (編輯框1.內容, 「×」, , 假) > 0)
n = 分割文本 (編輯框1.內容, 「×」, )
編輯框1.內容 = 編輯框1.內容 + 「=」 + 到文本 (到數值 (n [1]) × 到數值 (n [2]))
.如果真結束
.如果真 (尋找文本 (編輯框1.內容, 「/」, , 假) > 0)
n = 分割文本 (編輯框1.內容, 「/」, )
編輯框1.內容 = 編輯框1.內容 + 「=」 + 到文本 (到數值 (n [1]) ÷ 到數值 (n [2]))
.如果真結束
.如果真 (尋找文本 (編輯框1.內容, 「÷」, , 假) > 0)
n = 分割文本 (編輯框1.內容, 「÷」, )
編輯框1.內容 = 編輯框1.內容 + 「=」 + 到文本 (到數值 (n [1]) ÷ 到數值 (n [2]))
.如果真結束
目前代碼只支持兩個數字之間的加減乘除運算,如果需要多個數字的計算,自己按套路改良一下吧
2. 在易語言中計算公式
計算式很簡單,你想讓人幫你全部寫,啥分都沒有,懶得寫。
保留小數點後兩位就用
四捨五入 (, ) 這個命令就好了
其他的 計算都很簡單,自己寫吧
3. 易語言怎麼做源碼
首先你要去下一個 易語言
http://www.dywt.com.cn/pdown.htm 這是 易語言官方地址
用它你就可以編寫自己想要的程序了 也就是所謂的 源碼 了
把程序 編譯 就是 所謂的 軟體了
(表達的比較白話了 見笑了)
4. 易語言源碼大全
下載地彎橘址埋知團在 圖片猛世里
5. 易語言源碼是什麼
就是 文件名.e的文件 用這個文件 可以修改程序的功能 界面等 把它改寫成你自己的程序 如果你想學習易語言推薦去赤血學院 學習一下 哪裡成套的視頻教程 可以讓你快速入門。
6. 求易語言計算器的源代碼
http://www.5a5x.com/06/201210/10277346.html
7. 用易語言做一個簡單的計算器,如下圖,求源碼
.版本2
.程序集窗口程序集_啟動窗口
.程序集變數局部_待加減乘除,整數型
.程序集變數局部_點加減乘除,文本型
.程序集變數局部_到小數,雙精度小數型
.子程序_按鈕1_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「1」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「1」)
.如果結束
.子程序_按鈕2_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「2」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「2」)
.如果結束
.子程序_按鈕3_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「3」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「3」)
.如果結束
.子程序_按鈕4_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「4」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「4」)
.如果結束
.子程序_按鈕5_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「5」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「5」)
.如果結束
.子程序_按鈕6_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「6」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「6」)
.如果結束
.子程序_按鈕7_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「7」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「7」)
.如果結束
.子程序_按鈕8_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「8」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「8」)
.如果結束
.子程序_按鈕9_被單擊
.如果(編輯框1.內容≠「0」)
編輯框1.加入文本(「9」)
.否則
編輯框1.內容=「」
編輯框1.加入文本(「9」)
.如果結束
.子程序_按鈕0_被單擊
.判斷開始(編輯框1.內容=「0」)
返回()
.默認
編輯框1.加入文本(「0」)
.判斷結束
.子程序_按鈕C_被單擊
編輯框1.內容=「」
.子程序_按鈕加_被單擊
.判斷開始(局部_點加減乘除=「.」)
編輯框2.內容=「」
編輯框2.內容=「+」
局部_到小數=到數值(編輯框1.內容)
編輯框1.內容=「」
.默認
編輯框2.內容=「」
編輯框2.內容=「+」
局部_待加減乘除=到數值(編輯框1.內容)
編輯框1.內容=「」
.判斷結束.子程序_按鈕減_被單擊
.判斷開始(局部_點加減乘除=「.」)
編輯框2.內容=「」
編輯框2.內容=「-」
局部_到小數=到數值(編輯框1.內容)
編輯框1.內容=「」
.默認
編輯框2.內容=「」
編輯框2.內容=「-」
局部_待加減乘除=到數值(編輯框1.內容)
編輯框1.內容=「」
.判斷結束
.子程序_按鈕乘_被單擊
.判斷開始(局部_點加減乘除=「.」)
編輯框2.內容=「」
編輯框2.內容=「*」
局部_到小數=到數值(編輯框1.內容)
編輯框1.內容=「」
.默認
編輯框2.內容=「」
編輯框2.內容=「*」
局部_待加減乘除=到數值(編輯框1.內容)
編輯框1.內容=「」
.判斷結束
.子程序_按鈕除_被單擊
.判斷開始(局部_點加減乘除=「.」)
編輯框2.內容=「」
編輯框2.內容=「/」
局部_到小數=到數值(編輯框1.內容)
編輯框1.內容=「」
.默認
編輯框2.內容=「」
編輯框2.內容=「/」
局部_待加減乘除=到數值(編輯框1.內容)
編輯框1.內容=「」
.判斷結束
.子程序_按鈕等於_被單擊
.判斷開始(局部_點加減乘除=「.」)
.判斷開始(編輯框2.內容=「+」)
編輯框1.內容=到文本(局部_到小數+到數值(編輯框1.內容))
'局部_點加減乘除=「」
.判斷(編輯框2.內容=「-」)
編輯框1.內容=到文本(局部_到小數-到數值(編輯框1.內容))
'局部_點加減乘除=「」
.判斷(編輯框2.內容=「*」)
編輯框1.內容=到文本(局部_到小數×到數值(編輯框1.內容))
'局部_點加減乘除=「」
.判斷(編輯框2.內容=「/」)
編輯框1.內容=到文本(局部_到小數÷到數值(編輯框1.內容))
'局部_點加減乘除=「」
.默認
.判斷結束
.判斷(編輯框2.內容=「+」)
編輯框1.內容=到文本(局部_待加減乘除+到數值(編輯框1.內容))
.判斷(編輯框2.內容=「-」)
編輯框1.內容=到文本(局部_待加減乘除-到數值(編輯框1.內容))
.判斷(編輯框2.內容=「*」)
編輯框1.內容=到文本(局部_待加減乘除×到數值(編輯框1.內容))
.判斷(編輯框2.內容=「/」)
編輯框1.內容=到文本(局部_待加減乘除÷到數值(編輯框1.內容))
.默認
.判斷結束.子程序_按鈕點_被單擊
編輯框1.加入文本(「.」)
局部_點加減乘除=「.」
源代碼
提取碼:wrmg