您现在的位置： 无忧电子商务网 >> 信息学院 >> 程序开发 >> asp.net >> 正文
<html> <head> <title>Calculator</title> <script language="vb" Runat="server"> dim c as char dim str as string dim len as integer dim Is2 as Boolean dim num1 as double dim num2 as double dim result as double '************************************************** Sub btClick(Sender as Object , E as EventArgs) If(Sender.Equals(btResult)) Then Len = LoadStr.Text.Length() If(Len = 0) Then Exit Sub Len = LoadStr.Text.Length() c = Right(LoadStr.Text,1) str = Left(LoadStr.Text,Len-1) num1 = Val(str) num2 = Val(tbExps.Text) result = num2 Select Case Asc(c) Case 43 result = num1 + num2 Case 45 result = num1
[1] [2] [3] [4] [5] [6] [7] [8] [9] [10] 下一页
在google里搜索更多刚学ASP.Net，学了个简单的计算器
供求信息
论坛热帖
Copyrights 2005-2006 www.51ec.Org All Rights Reserved. 无忧电子商务网 版权所有Email:lijize@126.com QQ:139178413 QQ群：9329650 在线交谈声明：本站部分资料来源于网络及网友提供，本站不保证其真实有效。如侵犯你的权益请与我们联系中国互联网信息产业部ICP备案号：沪ICP备06014039号
相关文章
我来说两句
