Private Sub CommandButton1_Click()
    If InputBox("请输入密码") = "12345" Then
End Sub
以上代码不用输入密码，或输入任意数字都可以进入，怎么设置必须与密码相符才能进入？
请帮忙修正

你只写了条件 要做什么样的事情呢  是跳转的当前页面吗？

你這有幾個問題
一。你只找IF...THEN不打END IF不會有錯？
二。你要在IF里面做什么動作對了是打開窗體from2.show
三。你InputBox如果你輸入錯誤會出錯建議不要使用。

Private Sub CommandButton1_Click()
    If InputBox("请输入密码") = "12345" Then
         进去
     else
         出来
    end if
End Sub