加法计算公式

时　间:2014-03-17 18:00:41
作　者:张军军   ID：34951  城市：乌鲁木齐
摘　要:求大神指教
正　文:

Option Compare Database
Private Sub Command45_click()
共计.Value = Val(数值一.Value) + Val(数值二.Value) + Val(数值三.Value) + Val(数值四.Value) + Val(数值五.Value) + Val(数值六.Value) + Val(数值七.Value) + Val(数值八.Value) + Val(数值九.Value) + Val(数值十.Value)
End Sub
Private Sub Command29_click()
Text30.Value = 共计.Value
End Sub
Private Sub Command32_click()
Text33.Value = 共计.Value
End Sub
Private Sub Command35_click()
Text36.Value = 共计.Value
End Sub
Private Sub Command26_click()
Text27.Value = 共计.Value
End Sub
Private Sub Command42_click()
Text43.Value = (Text30.Value + Text33.Value + Text36.Value + Text27.Value)
End Sub

Access软件网官方交流QQ群 (群号:54525238) 　　　　　　Access源码网店