φ(..) ビボ~6 φ(..)

主にAccess、VBAに関する備忘録

2011-10-05から1日間の記事一覧

テーブルが存在するかどうか

OpenSchema メソッド '/* '/* テーブルの存在有無 '/* '/* 引数: テーブル名 '/* 戻値: True 有/ False 無 '/* Private Function fnExistTable(pTbName As String) As Boolean Dim bExist As Boolean Dim rs As New ADODB.Recordset Set rs = Con.OpenSchem…