求助:窗体上文本框计算结果赋值给另一文本框问题(谢谢帮助解决)

hljthzbc

各位版主好:
大家好:
  我又遇到了新的问题了还得求助于各位版主和大家了.
刚才我提的问题,自己已经解决了一半,就是--简称数量/规格简称=产销数量,已经可以实现了,但新的问题又出现了,就是不在简称数量和规格简称里输入数据,直接在产销数量文本框里输入不了数据了,一输入就没有了
请版主看看我这个附件的窗体上的计算,怎么输入不了数据了,前一个问题解决了,后一个又出现了

liwen

Private Sub 产销数量_AfterUpdate()
Me.销售金额 = Me.[产销数量] * Me.[销售单价]
result = GetDXJE(Val(销售金额))
'Me.result = Me.销售金额
' Me.产销数量 = Me.[简称数量] / Me.[规格简称]  '这样赋值，那输入的当然就无效了。
End Sub