我在我的專案中添加了 Form1.vb,但我無法顯示它。Form1.show 或 Form1.ShowDialog 不起作用,因為它的型別是類。這是錯誤訊息;
bc30109 'form1' 是型別別,不能用作運算式
解決方案一定是這樣想的。
Private Sub Form1Func()
Dim f1 As Object
f1 = Form1
f1.ShowDialog
End Sub
Private Sub OnButtonClick(cmd As Commands_e)
Select Case cmd
Case Commands_e.Export_As_SheetMetal
Form1Func()
Case Commands_e.AboutUs
Application.ShowMessageBox("AboutUS")
End Select
End Sub
uj5u.com熱心網友回復:
在不了解程式中其他操作的更多資訊的情況下,我無法確定為什么要求您為 show 提供引數(可能是命名函式等),但這是確保將表單作為物件呼叫的一種方法:
Dim obj As Object: Set obj = VBA.UserForms.Add("userform1")
obj.Show vbModeless
具體到你的報錯,上面的代碼直接通過vba生成了userform物件。
uj5u.com熱心網友回復:
Private Sub Form1Func()
Dim f1 As New Form1
f1.Show()
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/qiye/515448.html
