Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/ms-access/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vba 未绑定的文本框不重新查询或刷新_Vba_Ms Access_Textbox - Fatal编程技术网
Fatal编程技术网
  • vba/
  • Vba 未绑定的文本框不重新查询或刷新

Vba 未绑定的文本框不重新查询或刷新

vba ms-access

Vba 未绑定的文本框不重新查询或刷新,vba,ms-access,textbox,Vba,Ms Access,Textbox,我有3个未绑定的文本框 textbox1输入一个数字 textbox3输入一个数字 textbox5两个文本框的总和 我把这段代码放在表单\u Current（） 问题是在输入两个数字后，text5不会显示总数 我尝试在Form_Current（）中使用textbox5.requery，但它仍然不起作用。您不应该为此使用Current事件 创建以下子对象： Private Sub Compute_Text5() Text5.value = Val(Text1.value) + Val

我有3个未绑定的文本框

  • textbox1
    输入一个数字
  • textbox3
    输入一个数字
  • textbox5
    两个文本框的总和
我把这段代码放在
表单\u Current（）

问题是在输入两个数字后，
text5
不会显示总数

我尝试在
Form_Current（）
中使用
textbox5.requery
，但它仍然不起作用。

您不应该为此使用
Current
事件

创建以下子对象：

Private Sub Compute_Text5()
    Text5.value = Val(Text1.value) + Val(Text3.value)
End Sub
并向
Text1
和
Text3
添加
AfterUpdate（）
事件，以便在两个文本框中的任何一个的值发生更改时触发计算：

Private Sub Text1_AfterUpdate()
    Compute_Text5
End Sub  

Private Sub Text3_AfterUpdate()
    Compute_Text5
End Sub
您不应为此使用
当前
事件

创建以下子对象：


Private Sub Compute_Text5()
    Text5.value = Val(Text1.value) + Val(Text3.value)
End Sub  


并向
Text1
和
Text3
添加
AfterUpdate（）
事件，以便在两个文本框中的任何一个的值发生更改时触发计算：


Private Sub Text1_AfterUpdate()
    Compute_Text5
End Sub  

Private Sub Text3_AfterUpdate()
    Compute_Text5
End Sub  



Form\u Current（）
和
.Requery
仅对绑定控件有用

您不需要VBA，只需将其用作Text5的控制源即可：


= Val([Text1]) + Val([Text3])



Form\u Current（）
和
.Requery
仅对绑定控件有用

您不需要VBA，只需将其用作Text5的控制源即可：


= Val([Text1]) + Val([Text3])