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
Forms MSAccess 2010表单：使用If和Then语句_Forms_Ms Access_Vba_Ms Access 2010 - Fatal编程技术网
Fatal编程技术网
  • forms/
  • Forms MSAccess 2010表单：使用If和Then语句

Forms MSAccess 2010表单：使用If和Then语句

forms ms-access vba

Forms MSAccess 2010表单：使用If和Then语句,forms,ms-access,vba,ms-access-2010,Forms,Ms Access,Vba,Ms Access 2010,我在MS Access 2010表单上有两个文本字段，分支机构名称和分支机构代码。我需要一个代码或表达式，当我键入分支代码如：9001时，Trafalgar Square会自动显示在分支名称字段中。我有240个分支代码，我需要这样一个代码 请帮忙，因为这是我所在部门的一个自主项目 谢谢。您最好为分支代码创建一个组合框，然后将行源设置为类似以下内容： SELECT Branch_Code, Branch_Name FROM MyTable 然后在AfterUpdate事件上执行以下操作： Pri

我在MS Access 2010表单上有两个文本字段，分支机构名称和分支机构代码。我需要一个代码或表达式，当我键入分支代码如：9001时，Trafalgar Square会自动显示在分支名称字段中。我有240个分支代码，我需要这样一个代码

请帮忙，因为这是我所在部门的一个自主项目

谢谢。

您最好为
分支代码创建一个组合框，然后将行源设置为类似以下内容：


SELECT Branch_Code, Branch_Name FROM MyTable


然后在
AfterUpdate
事件上执行以下操作：


Private Sub txtBranchCode_AfterUpdate()
  If(vba.strings.len(txtBranchCode.value & "") <> 0)then
    txtBrachName.value = txtBranchCode.Column(1)
  Else
    txtBrachName.value = ""
  End If
End Sub



Private Sub txtBranchCode_AfterUpdate（）
如果（vba.strings.len（txtBranchCode.value&“”）为0，则
txtBrachName.value=txtBranchCode.Column（1）
其他的
txtBrachName.value=“”
如果结束
端接头

我想您可以使用它。请尝试一下，并向我们展示您遇到的任何问题的详细信息。请添加您的尝试，StackOverFlow无法回答您这样一个不准确的问题：集体批准问答。我将在明天上班时尝试并分享结果。为什么不只设置txtBranchCode.value=Nz（txtBranchCode.Column（1），“”）？