テーブル一覧を取得する void __fastcall TForm1::Button1Click(TObject *Sender) { //表示用コントロールをクリア ListBox1->Items->Clear(); ListBox2->Items->Clear(); Variant de = Variant::CreateObject("DAO.DBEngine.36"); //Edit3 に mdbファイル名…