Samples and Downloads (71-79)

	レポートのプリンタを変更して印刷するサンプルデータベース（その１）  　 Access 2000  (10/06/2000)　 レポートのプリンタをコンボボックスから選択して、任意のプリンタに印刷するサンプルデータベースです。ソースコード付きのSetDefaultPrinter.MDB を用意しましたのでダウンロードしてください！ コンボボックスからレポートを選択すると、Windowsのデフォルトプリンタが表示されます Print to Default Destinationボタンをクリックするとデフォルトのプリンタに印刷します 特定のプリンタに印刷するには、プリンタのコンボボックスからプリンタを選択して、Print to Chosen Destinationボタンをクリックします プリンタのコンボボックスには、システムにインストールされている全てのプリンタが表示されます レポートのPrtDevMode, PrtDevNames, PrtMipプロパティを書き替えるには、レポートをデザインモードで開く必要があります。（従って、ＭＤＥ版ではこれらのプロパティを変更できません） アドイン(.mda)を実行時ダイナミックに登録する機能を追加しました ここで紹介するサンプルデータベースでは、ＭＤＥ版でもレポートのプリンタを自由に変更することができます PrinterAddIns.MDAのソースコードは非公開とさせて頂きますのでご了承ください (11/16/2002)
	GIF,JPEG,BMPなどのイメージファイルをフォームにロードするサンプルデータベース  　 Access 2000  (10/04/2000)　 イメージファイルをコモンダイアログから選択してフォーム上に表示するサンプルデータベースです。ソースコード付きのDisplayImage2.MDB を用意しましたのでダウンロードしてください！ Windowsのコモンダイアログから任意のイメージファイルを選択してフォーム上に表示します コマンドボタンImage Pathをクリックするとコモンダイアログが表示されます コモンダイアログのファイルの種類をクリックすると、GIF,JPEG,BMPが表示されますのでファイルのタイプを選択します コマンドボタンSave Image Pathをクリックするとイメージファイルのパス名がテーブルに保存されます コマンドボタンDisplay Saved Imagesをクリックするとテーブルに保存されたイメージをスライドショーのように表示できます WindowsのレジストリをVBAから書き替えて、イメージロード中のメッセージを抑止できます
	Excelオートメーション　サンプルコード集（応用編）  　 Access 2000 / Excel 2000  (10/02/2000)　 オートメーション機能を利用してAccessのデータをExcel経由で編集して印刷するサンプルコード集です。ソースコード付きのAutomatingExcel2.MDB を用意しましたのでダウンロードしてください！ データベースには、以下のサンプルコードが登録されています： クロス集計クエリをワークシートに貼り付けるには ワークシートに作成した表の列合計/行合計を計算するには ワークシートに作成した表に格子型の罫線を引くには(Borders/AutoFormat) ワークシートに印刷タイトル等のページ情報を設定するには ワークシートに作成した表をプレビュー印刷するには
	Excelオートメーション　サンプルコード集（基礎編）  　 Access 2000 / Excel 2000  (10/02/2000)　 オートメーション機能を利用してAccessのデータをExcel経由で編集して印刷するサンプルコード集です。ソースコード付きのAutomatingExcel1.MDB を用意しましたのでダウンロードしてください！ データベースには、以下のサンプルコードが登録されています： AccessからExcelを起動するには(Early Binding方式） AccessからExcelを起動するには(Late Binding方式） 既に起動されているExcelを再使用するには Excelを起動/終了させる関数を作成するには ワークシートのセルに値をセットするには ワークシートに作成した表の合計を計算するには レコードセットをワークシートに貼り付けるには(GetRows) 配列変数の内容をワークシートに貼り付けるには(Array) レコードセットをワークシートに貼り付けるには(CopyFromRecordset)
	得意先テーブルをワードに貼り付けて３５種類の表を作成するサンプルデータベース  　 Access 2000 / Word 2000  (09/22/2000)　 Accessの得意先テーブルをワードに貼り付けて３５種類の表を作成するサンプルデータベースです。ソースコード付きのTransferCustomerstoWord.MDB を用意しましたのでダウンロードしてください！ Accessの得意先テーブルをWordに貼り付けて表を作成します Wordに作成する表のパターンは３５種類の中から選択することができます 得意先テーブルの他に仕入先、商品マスタなど任意のテーブルをWordに貼り付けることができます
	DAOからADOに移行するためのサンプルコード集  　　 Access 2000  (09/18/2000)　 Access 2000のDAOからADOに移行するためのサンプルコード集です。ソースコード付きのMigrateDAOtoADO.MDB を用意しましたのでダウンロードしてください！ DAOからADOに移行するためのサンプルコード集です サンプルデータベースにはDAO/ADO双方のコードが登録されています メニューのオプショングループからDAO/ADOをクリックすると対応するコードが表示されます データベースのオープンからレコードセットの処理まで２７種類のサンプルが登録されています リストボックスからアイテムをクリックするとサンプルコードがVBE上に表示されます ADOのサンプルには、ストアドプロシージャのパラメータ値を設定する方法が３種類登録されています このサンプルデータベースは、ソースコードを表示しますのでMDE版は動作しません
	社員のリレーションシップを階層化して表示するサンプルデータベース  　 Access 2000 / VB 6.0 (09/13/2000)　 コンボボックスから選択した社員のリレーションを階層化してWindowsのエクスプローラ風に表示するサンプルデータベースです。ソースコード付きのTreeViewEmployeeRelationship.MDB を用意しましたのでダウンロードしてください！ コンボボックスから選択した社員を基点（ルート）にした関連図をツリー表示します ツリーの階層は５段階まで可能です ツリーの社員名をクリックすると右側に社員の詳細情報が表示されます 社員の標題をクリックすると降順/昇順に並べ替えします このサンプルデータベースは、Visual Basic 6.0のActiveXコントロールを使用していますのでAccess 2000の他にVB6.0が必要です。
	社員を部署別に階層化して表示するサンプルデータベース  　 Access 2000 / VB 6.0 (09/13/2000)　 社員を部署別に階層化してWindowsのエクスプローラ風に表示するサンプルデータベースです。ソースコード付きのTreeViewEmployee.MDB を用意しましたのでダウンロードしてください！ 左側に会社の組織をツリー構造で表示します 右側に選択した部署の社員一覧（氏名、役職、入社日、生年月日、出身地）を表示します 社員の標題をクリックすると降順/昇順に並べ替えします このサンプルデータベースは、Visual Basic 6.0のActiveXコントロールを使用していますのでAccess 2000の他にVB6.0が必要です。
	データシートの列幅を自動調整するサンプルデータベース  　 Access 2000 (09/05/2000)　 データシート型フォームの列幅を自動調整して表示するサンプルデータベースです。ソースコード付きのAutosizeColumns.MDB を用意しましたのでダウンロードしてください！ データシートの列幅をデータの桁数に合わせて自動調整します。 レコードが移動する度に、データシートの列幅が自動調整されて表示されます。 このサンプルデータベースは、メイン／サブフォームの組み合わせに適用すると効果があります。