此主题相关图片如下:tm截图未命名.jpg
![dvubb 图片点击可在新窗口打开查看](UploadFile/2013-5/201351613342818501.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