visual basic這套程式我6年前在課堂學過(我非資訊系)
之後我就忘記如何寫程式了
如今我想用個VB寫出一個小算式
公式如下

使用VB寫出小算式


不知道有沒有高手會這種
謝謝各位
文章關鍵字
cock207 wrote:
visual bas...(恕刪)


簡單到不想浪費時間寫耶...呵~~~

開玩笑啦...

但就算寫了...網路上來歷不明的程式你敢用嗎...?

還是你只想知道 code 而已...?
重點是用途是甚麼?
普通計數用倒不如用Excel/OO.O Calc好了
我幫你一下吧
按妞里的代碼如下:

dim a as integer,b as integer,c as integer,d as integer,e as integer,
a=val(text1)
b=val(text2)
c=val(text3)
d=val(text4)
e=val(text5)
text7=(a*b+c*d)/(a+e)

希望能幫到你吧
alanitoku wrote:
簡單到不想浪費時間寫...(恕刪)


+1
反而會讓人很懶
可是關鍵就在樓上...
主要就是要在textbox打上VAL
把文字轉成值
知道這部之後應該就沒問題了

hellen94912 wrote:
我幫你一下吧
按妞里的代碼如下:

dim a as integer,b as integer,c as integer,d as integer,e as integer,
a=val(text1)
b=val(text2)
c=val(text3)
d=val(text4)
e=val(text5)
text7=(a*b+c*d)/(a+e)

希望能幫到你吧



靠你寫的程式加上
頻著以前的映像
是成功沒錯
只要輸入2位數字
是演算成功
但是不知為何只要輸入3位數字以上
就會出現錯誤

我看程式碼錯誤地方是
text7=(a*b+c*d)/(a+e)
這一行


還有
這一行程式碼
dim a as integer,b as integer,c as integer,d as integer,e as integer,
尾巴多一個逗點
我把逗點去除之後...就ok
不知道是不是你多打低...

hellen94912 wrote:
我幫你一下吧
按妞里的代碼如下:

dim a as integer,b as integer,c as integer,d as integer,e as integer,
a=val(text1)
b=val(text2)
c=val(text3)
d=val(text4)
e=val(text5)
text7=(a*b+c*d)/(a+e)

希望能幫到你吧




靠你寫的程式加上
頻著以前的映像
是成功沒錯
只要輸入2位數字
是演算成功
但是不知為何只要輸入3位數字以上
就會出現錯誤

我看程式碼錯誤地方是
text7=(a*b+c*d)/(a+e)
這一行


還有
這一行程式碼
dim a as integer,b as integer,c as integer,d as integer,e as integer,
尾巴多一個逗點
我把逗點去除之後...就ok
不知道是不是你多打低...
文章分享
評分
評分
複製連結

今日熱門文章 網友點擊推薦!