求教VB编程！（计算器）！！

xiaoshao · 发表于 2009-9-27 11:47:27

我们老师叫用VB编程编写一个计算器，但是VB刚刚学，接触还少，根本就不知道啊！那位高手精通的请给下代码。最好注上解释说明，要易懂的。本人很菜！！！谢谢！

Oo乖咕噜oO · 发表于 2009-9-27 13:53:47

没有学过不能帮上你忙 sorry
这里面一定有人可以帮到你的

xiaoshao · 发表于 2009-9-27 23:46:51

没有学过那就要学啊！！你不说我怎么学啊！！指教下！谢谢！！！

zhulinling · 发表于 2009-9-28 12:11:36

http://www.rsdown.cn/
这个网站有VB教程，我也是新手，也刚刚找到的，不知道能不能帮到你

熊枫 · 发表于 2009-9-28 18:59:08

text1.text=int(text1.text),text1.text=round(text1.text).依次类推！

熊枫 · 发表于 2009-9-28 19:06:15

以上是代码

justforstudy · 发表于 2009-10-2 23:16:04

来几个text 在来几个command

就ok了，比较简单

xiaoshao · 发表于 2009-10-3 01:28:26

能不能仔细点的啊！没有学过不太懂啊！！或者，那里有教程也可以啊。

王梦瑶 · 发表于 2009-10-3 20:13:18

复制0~9
COMMAND1(数字)
  Text1=text1+command1(index).coption
command2(+)
a=text1
text1=""
m="加"
command3(-)
a=text1
text=""
m="减"
command4(*)
a=text1
text1=""
m="乘"
command5(/)
a=text1
text1=""
m="除"
command6(=)
b=text1
if m="加" then
   text1=a+b
elseif m="减"then
   text1=a-b
elseif m="乘"then
   text1=a*b
else
   text1=a/b
command7(退格)
l=len(text1)
if l=0 then
exif sub
end if
text1=mid(text1,1,l-1)

xiaoshao · 发表于 2009-10-21 21:46:46

非常感谢！

账号		自动登录	找回密码
密码			立即注册

[已解决] 求教VB编程！（计算器）！！