Foxtable(狐表)用户栏目专家坐堂 → [求助]指定第一列输入的数字累加


  共有4618人关注过本帖树形打印复制链接

主题:[求助]指定第一列输入的数字累加

帅哥哟,离线,有人找我吗?
hwj3551670
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:266 积分:1700 威望:0 精华:0 注册:2013/5/5 17:46:00
[求助]指定第一列输入的数字累加  发帖心情 Post By:2013/5/16 13:36:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:tm截图未命名.jpg
图片点击可在新窗口打开查看
这是这个TEXTBOX1控件写的代码 只能输入一个数字

If e.KeyCode = Keys.Enter Then
    Dim s As String = e.Form.Controls("TextBox1").text
    For i As Integer = 0 To s.Length - 1
        s=s & "  "    
    Next
    s=s.Trim()
    Dim s1 As String =Eval(s)
    Tables(MainTable.Name).Current("数量") = s1 '单行写入的代码
e.Form.Controls("TextBox1").Value = Nothing

   
End If

 

输入20  第一行数量下面的单元格变成20,要是在输入30哪这个单元格下的20就变成30了  。

我想把他们变成想加的 变成50

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
ybil
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:521 积分:4910 威望:0 精华:7 注册:2008/9/2 22:22:00
  发帖心情 Post By:2013/5/16 13:40:00 [只看该作者]

Tables(MainTable.Name).Current("数量")+ = Eval(s)

 回到顶部
帅哥哟,离线,有人找我吗?
hwj3551670
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:266 积分:1700 威望:0 精华:0 注册:2013/5/5 17:46:00
  发帖心情 Post By:2013/5/16 13:42:00 [只看该作者]

太好了图片点击可在新窗口打开查看

 回到顶部