忍者ブログ
ADMIN│NEW ENTRY
C A L E N D A R
03 2025/04 05
S M T W T F S
1 2 3 4 5
6 7 8 9 10 11 12
13 14 15 16 17 18 19
20 21 22 23 24 25 26
27 28 29 30

初心者と学びたい ACCESS VBA解説
専門学生時代にACCESSを学び、現在会社で使用しているシステムがACCESSで作られているので再度勉強中です。（学校ではVBAを全然習わなかったので） これからACCESS VBAを勉強する方一緒に学んでいきましょう
No.58 No.57 No.56 No.55 No.54 No.53 No.52 No.51 No.50 No.49 No.48
2025-04-24(Thu)
[PR]
×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。



.
2025-04-24(Thu)　22:09:39│ CM(-) │ TB(-) │EDIT

2009-08-09(Sun)
データベース作成　（DAO)
オブジェクト作成

新規データベースを作成するには

CreateDataBase　を使用します。



createdb.jpg






データベース作成(DAOでの）


Sub makedb()
   
    Dim db As DAO.Database
    Dim dbname As String
    
    '作成したデータベース名を入力
    dbname = InputBox("データベース名を入力して下さい")
   
    Set db = CreateDatabase("C:\" & dbname & ".mdb", dbLangJapanese)
   
    db.Close
    Set db = Nothing
   
End Sub
 

上の例ではインプットボックスに作成したいデータベース名
を入力させ、Ｃドライブに作成しています。

もし作成先に同じデータベース名が存在する場合はエラーが起こるので
注意して下さい

 

PR


.
2009-08-09(Sun)　01:04:56│CM( 0 ) │TB( ) │EDIT

テーブル作成（DAO）← HOME →カレントデータベース名取得

・C O M M E N T
  • この記事へのコメント投稿フォームです。


    • Name:
    Title:
    Mail:
    Url:
    Color:
    ◆ ◆ ◆ ◆ ◆ ◆ ◆ ◆
    Decoration:
    		 Vodafone絵文字 i-mode絵文字 Ezweb絵文字
    Message:
    Pass:
    		 ※編集時に必要です。


    TRACKBACK
    • この記事のURLとトラックバックURLです。
    • 必要に応じてご使用くださいませ。
    この記事のURL▽
    この記事のトラックバックURL▽
    No.58 No.57 No.56 No.55 No.54 No.53 No.52 No.51 No.50 No.49 No.48
    CopyRight (c) 初心者と学びたい ACCESS VBA解説 All Right Reserevd.

    Powered by NinjaBlog. Template by うさねこ.
    忍者ブログ[PR]