1樓:無跡影
這是乙個開啟窗體的自定義子程式。
呼叫時這樣用:
直接用值。openforms("子窗體名稱")
或用字串變數。
openforms(字串變數)
它就會將值或變數傳遞給給引數strformname,下面就順序說明子程式裡的每個語句。
'這句是判斷strformname的值是否空字串,這是避免傳遞空字串給strformname的做法,因為不可能開啟沒有名字的窗體,if strformname = then
'如果是傳遞的值是空的話就彈出對話方塊作為提示資訊,msgbox的第乙個引數是提示資訊,第二個引數是顯示什麼按鈕跟顯示什麼圖示,這裡的vbcritical表示顯示乙個紅色叉叉的圖示,這裡不給按鈕的引數,說明用預設的按鈕,第三個引數是在對話方塊標題欄顯示的,不寫也可以的。
msgbox "開啟窗體名稱不能空!",vbcritical, "警告"
'既然引數strformname的值是空字元不能開啟,那下面的語句就是退出子程式的語句了,表示這句後面的語句都不會執行了。
exit sub
'結束判斷語句,end if
'開啟變數也主就是引數strformname的值的窗體。
strformname
看你兩次在中問這些東東了,其實不用那麼辛苦的,在vba的視窗中,只要把游標定位在你想了解的函式或語句裡,再按f1就會開啟相關的幫助。
例如:msgbox函式,只要你把游標放在這個函式名稱裡的任一位置再按f1即可顯示。
如果沒有顯示,可能你安裝access時沒有安裝「visual basic for application 幫助檔案系統」,重新裝一下access時有兩個地方都選擇自定義選擇安裝,看到這個時就選擇安裝在本機中,下次開啟access 按f1就能出顯示了(如果你不知道怎麼選擇,可以選擇全部安裝在本機中,現在硬碟大,全部選擇安裝在本機也不會有多大容量的)。
2樓:空無極客
輸入為空時是不能用的意思。明白了嗎?
access用法
access用法
access用法
關於資料庫access的一些問題
ACCESS巨集和VBA的問題,ACCESS 巨集和VBA的問題
vba主要是用在microsoft office中,其中excel,word,ppt用的比較多,他可以把使用者手動,及迴圈操作轉換為程式自動操作,vba其實很好學,也很有意思,我們公司主要做excel vba開發的 下面是一本教你如何用vba在excel開發的書,很不錯的,你可以看看,我是在當當網上...
access中使用sql語句,ACCESS中使用SQL語句
在baiaccess查詢中使用iif switch choose函式可以實現du不同值的zhi選擇 update 學生檔案 dao set 班級 switch mid 學號,4,1 1 計算版機1班 mid 學號,4,1 2 計算機2班 mid 學號,4,1 3 機械權1班 true,access中...
ACCESS轉MYSQL語句問題IIF
select case len name when 2 then left name 1 right name 1 else name end as bname,case len fqname when 2 then left fqname,1 right fqname,1 else fqname ...