No.2450 Re：コントロール内のテキスト配置　　投稿者：ゆう(U) [01/7/13(金)16：49分]

> ラベルやテキストボックスのコントロール内のテキスト配置ですが

> 縦位置を中央揃えにする方法があれば、教えてください。



残念ですがその様なプロパティ等は存在しません。



文字のサイズ(幅・高さ)でコードで調整するしかないでしょう。



テキストボックスや枠(境界線)有りのラベルコントロールなら、改行・スペース

等で調整する事になります。

※複数行等で計算を十分に考慮する必要があります

　"ABCDEFG" & vbNewLine & "123"

　を半角10文字分の幅で３行分の高さで中央などは無理

　(何処で妥協をするか？)



　枠線と内容を別にすると何とかなるかも・・・





枠(境界線)なしのラベルコントロールなら、AutoSizeで幅・高さが求まりますから

位置を特定する事は簡単に計算で求まりますよね・・・

※TextWidth/TextHeight等もヘルプ参照してみてください

No.2449 Re：Recordsetのソート　　投稿者：ゆう(U) [01/7/13(金)16：29分]

> ソートしたいフィールドのデータが日本語（漢字・ひらがな・カタカナ）の場合

> ふつうの辞書みたいに、読み仮名順にソートしたいと思うのですが、

ソートに必要な「読み仮名」がフィールドに存在するのであれば

SQLの「ORDER BY」で簡単にソートが可能です。



※ひらがな・カタカナは読み仮名ではないのでしょうか？

No.2448 Re：VBからDBの最適化　　投稿者：ゆう(U) [01/7/13(金)16：24分]

●もう少し読みやすくするためにも改行を適宜入れたほうがいいです。



> おはようございます、VBからACCESSにデータを登録しVBのフォーム入力でデータには

> 新規に番号がふられるようになっています。

> ACCESSのレコードにはこれで1,2,3と番号がふられ順番にデータが入って行く訳ですが、

> もしデータを一つ削除した場合当然番号が消え順番が抜けてしまいます。

Accessでも同じですが、最後の番号を削除された場合なら

MDBの最適化で最終番号が使用されている番号になりますが、



途中のデータが削除された場合は欠番になってしまいます。

※MDBの特性からしかたがないと思います



> VBからDBの最適化は可能ですか？

この最適化は「MDBの最適化」ということでしょうか？

※これなら「CompactDatabase メソッド」で可能

それとも上記のような連番号の付け直しですか？

※これなら１件づつレコードの更新をしていけばOK

　ただ、キーになっている場合やリンクテーブル等で問題が

　出ないように十分考えてみてください



> 部分的なVBの構文を教えてもらえたら助かります。

> ちなみにACCESSの最適化はオートNOにしか使えないのですか？

ちょっと質問の意味が分かりません。



データの削除を繰り返すと、MDBが肥大化します。

(データ削除時にMDBの縮小化をしているわけではない)

その削除データで発生した無駄な領域分を抹消し必要分のみの

MDBファイルとするのが最適化の主な目的です。

※オートナンバーの件は単なる付加機能だと思います

No.2447 Re：チェックボックスを使って表示したい　　投稿者：ゆう(U) [01/7/13(金)16：03分]

タイトルは変更せずに、内容の先頭で詫び文なりを書いておくほうが

いいと思います。



フォーム上に表示し、現在の情報を保存していたいということなら、

「ラベルコントロール」を使用してはいかがでしょう。

※ヘルプ「ZOder メソッド」の解説の最後の方の内容に抵触する

　仕様でなければ・・・その際もコンテナー等で解消できますが



サイズを調整(正方形？)しておけば、×をCaptionに表示すれば

チェックボックスに×を表示しているように見えますし、情報は

Captionに保存されているので参照は容易ですよね・・・



×以外に何を表示するにしてもそれなりのフォントを選んで

それらのマークを使えばOKですし・・・

No.2446 コントロール内のテキスト配置　　投稿者：みふ。 [01/7/13(金)10：21分]

いつもお世話になっております。



ラベルやテキストボックスのコントロール内のテキスト配置ですが

縦位置を中央揃えにする方法があれば、教えてください。



よろしくお願いします。

No.2445 VB６のデータ更新について　　投稿者：PLUS [01/7/13(金)10：08分]

UpdateBatchとUpdateのですが、サーバーに接続するときのロックタイプによって違います。

BatchOptimisticで接続した場合、レコードへの更新をしようとしてUpdateメソッドをコール（複数回可）
してもサーバーのデータは更新されません。
その後UpdateBatchメソッドをコールしたとき初めて反映されるのです。
ロックタイプがBatchOptimisticでなければ、Updateメソッドを呼び出した時点で更新されます。
ここでUpdateBatchを使ったらどうなるのか…？試したことなくてわかりません。

うろおぼえで回答しているので、間違ってたらどなたかフォローお願いします。

No.2444 Recordsetのソート　　投稿者：みさ [01/7/13(金)10：05分]

おはようございます。Recordsetのソートについて質問です。



ソートしたいフィールドのデータが日本語（漢字・ひらがな・カタカナ）の場合

ふつうの辞書みたいに、読み仮名順にソートしたいと思うのですが、

こういったことは実現できるのでしょうか？



できるのであれば、どなたかヒントでも構いませんので教えて下さい。

No.2443 テキストボックス　　投稿者：初心者 [01/7/12(木)22：51分]

はじめまして。テキストボックスにあらかじめ文字列が入っている状態で

入力不可でカット、ペーストも不可にして、コピーだけができる方法ってありますか。

（自作の右クリックメニューからのコピー）

試行錯誤しながらやっているんですが解決方法が見つかりません。

お願いします。

No.2442 Windowsドライバーによる縦倍角印刷　　投稿者：anela44 [01/7/12(木)16：44分]

どうしても縦倍角の印字方法が分かりません。

ご存じの方教えてください。

OSはWin2000、印刷ツールはDataReportを使用しております。

No.2441 プログラム上からTextBoxコントロールを貼付　　投稿者：山田 [01/7/12(木)14：30分]

はじめまして、ＶＢを初めて半年の初心者です。

教えて頂きたい事がひとつあるのですが？

プログラム上からフォームにテキストボックスとかコマンドボタン等のコントロールを新たに貼り付ける

事は可能なのでしょうか？

どのようにすればできるのでしょうか？

ご存知の方よろしくお願いします。

No.2440 VBからDBの最適化　　投稿者：ハロ [01/7/12(木)10：05分]

おはようございます、VBからACCESSにデータを登録しVBのフォーム入力でデータには
新規に番号がふられるようになっています。ACCESSのレコードには

これで1,2,3と番号がふられ順番にデータが入って行く訳ですが、もしデータを一つ削除した場合
当然番号が消え順番が抜けてしまいます。VBからDBの最適化は可能ですか？
良い方法があったら教えて下さい（ToT;）部分的なVBの構文を教えてもらえたら助かります。
ちなみにACCESSの最適化はオートNOにしか使えないのですか？

No.2439 言葉足らずですみません　　投稿者：北風 [01/7/12(木)9：31分]

花ちゃん　さんへ

解答いただきながら、ご返事しないですみません。

日付の件は解決できました。逆引きヘルプ等も参考にして解決できました。有難うございます。



×マークは、とりあえずFORM上に表示し保存したいのですが。

No.2438 ＲＥ：チェックボックスを使って表示したい　　投稿者：花ちゃん [01/7/12(木)9：24分]

>チェックボックスを利用して、×を表示したいのですが。

今一つ意味が理解できないのですが　×をForm等に表示したいという事でしょうか？？



それと　前回の　”Formに日付を入れたいのですが”の件は解決されたのですか？？

No.2437 チェックボックスを使って表示したい　　投稿者：北風 [01/7/12(木)9：00分]

VB6です。

初心者ですよろしくお願いいたします。

チェックボックスを利用して、×を表示したいのですが。

No.2436 ＲＥ：コンパイルエラーについて　　投稿者：花ちゃん [01/7/12(木)0：56分]

Open fstrTmpFile For Input As #filenum

これは、コードから貼付されたものでしょうか？

fstrTmpFile　この f は　strTmpFile　はファイル名だけで Path が通っていないので
Path & strTmpFile で一度試して見ては

No.2435 コンパイルエラーについて　　　　投稿者：VB初心者 [01/7/11(水)22：46分]

VB初心者です。そこで解らないことがあるんですが・

  よろしくお願い致します



 テキストファイルを 開くやり方が分かりません



 サンプルコードは 以下のようになりますが



コンパイルエラーが出て実行できないのです。

エラーメッセージは「ランタイム 53エラー と ファイルが見つかりません。」と出ます。

しかしエラーが出る個所は Open fstrTmpFile For Input As #filenum なのです。



ちょっとソースの修正を よろしくお願いいたします



Private Sub sFileSearch()

       

    Dim i As Long

    Dim strFolder()       As String    

    Dim lngFileMax        As Long      

    Dim lngFolderMax      As Long      

    Dim strTmpFile        As String    

    Dim strTmpPath        As String   

    Dim SearchFileName    As String

          For i = 1& To lngFolderMax

            strTmpFile = Dir$(strFolder(i) & SearchFileName, vbDirectory Or vbHidden Or vbSystem)

        While strTmpFile = "." Or strTmpFile = ".."  

            strTmpFile = Dir$  

        Wend

        While strTmpFile <> ""

             

                 filenum = FreeFile

        

   Open fstrTmpFile For Input As #filenum

   

No.2434 パスワード付きの共有ファイルのオープンの仕方　　投稿者：かげ [01/7/11(水)18：51分]

あるファイルサーバーにパスワード付きの共有ファイルとしてtext.mdbというファイルが置いてあります。

このtest.mdbをネットワーク経由でオープンさせたいのですが、「権限がありません」というエラーに

なってしまいます。しかし共有のパスワードをなしにするか、ネットワークコンピューターで一度

test.mdbをオープンさせるとＶＢでもオープンさせることができます。



パスワード付きの共有ファイルとなっているmdbをオープンさせる方法をご存知の方がおりましたら是非

教えてください。よろしくお願いします。



現在私は以下のコードでmdbのオープンをさせています。



ネットワークパス　\\filesv\test\test.mdb

データベースパスワード　1111

共有パスワード　2222



Set Db1 = DBEngine.Workspaces(0).OpenDatabase("\\filesv\test\test.mdb", False, False, ";pwd=1111")

No.2433 複数GIFファイルの印刷　　投稿者：桜 [01/7/11(水)11：22分]

初めまして、VBを初めて使用するものです。



400dpi位のgifファイルを複数（3ファイル）、

縦に並べて、A4サイズで印刷したいのですが、

可能でしょうか？



複数のgifファイルをA4の指定位置に

マッピングできるでしょうか？



何かアドバイスがありましたら教えて下さい。

宜しくお願い致します。

No.2432 ＲＥ：続：エクセル小数点以下１桁表示　　投稿者：みふ。 [01/7/11(水)9：44分]

花ちゃんさん、回答ありがとうございました。



xlSheet.Range("A1").NumberFormatLocal = "###,###.0"



で、四捨五入されることなく表示できました。

ありがとうございました。

No.2431 IPアドレスをドメイン名に変換する方法　　投稿者：TOSHI [01/7/11(水)8：31分]

IPアドレスをドメイン名に変換する方法を教えてもらいた

いのですが・・・。お願いします。

No.2430 Re2: ListViewの表示位置を指定したい・・・（修正）　　投稿者：宮田 [01/7/10(火)17：15分]

ごめんなさい、ちょっとソースの修正です。

----(フォームの任意のイベント内)------------------------------------------------------

Dim lngTopIndex As Long



lngTopIndex = [行数]

[リストビュー名].ListItems(lngTopIndex).EnsureVisible

[リストビュー名].ListItems([リストビュー名].GetFirstVisible.Index).EnsureVisible

------------------------------------------------------------------------------------



何度もすいません、ではでは。

No.2429 Re: ListViewの表示位置を指定したい・・・　　投稿者：宮田 [01/7/10(火)16：46分]

ListViewの件、解決しましたので、自己レスします。

どのようにしたかといいますと・・・



----(フォームの任意のイベント内)------------------------------------------------------

Dim lngTopIndex As Long



lngTopIndex = [行数]

ListView1.ListItems(lngTopIndex).EnsureVisible

ListView1.ListItems([リストビュー名].GetFirstVisible.Index).EnsureVisible

------------------------------------------------------------------------------------



SendMessageのAPI、使わなくてもできたんですね。(^^;　どうも、お騒がせしました。

No.2428 ListViewの表示位置を指定したい・・・　　投稿者：宮田 [01/7/10(火)12：21分]

宮田と申します。初めて書込みですがよろしくお願いいたします。



listviewの表示ウィンドウは表示するときに常に先頭から表示されていますよね？

これを任意の位置から表示させたいのですが、方法がわからなくて悩んでいます。



いろいろ調べていたら、リストボックスでSendMessageを使用して実現する方法があるのはわかった

のですが、これをそのままListViewにセットしても動作しないみたいで・・・。

----(モジュール上の定義)--------------------------------------------------------------

Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" _

    (ByVal hWnd As Long, ByVal Msg As Long, ByVal wParam As Long, lParam As Any) _

    As Long

Public Const LB_SETTOPINDEX = &H197

------------------------------------------------------------------------------------

----(フォームの任意のイベント内)------------------------------------------------------

Dim lngTopIndex           As Long

Dim lngWin32apiResultCode As Long



lngTopIndex = [行数]



lngWin32apiResultCode = _

    SendMessage([リストボックス名].hWnd, LB_SETTOPINDEX, lngTopIndex, ByVal CLng(0))

------------------------------------------------------------------------------------

この方法をListViewでも実現するにはどのようにすればいいのでしょうか？



何かご存じの方、すいませんがよろしくお願いします。

No.2427 VB６のデータ更新について。　　投稿者：秀丸 [01/7/10(火)10：49分]

こんにちは。今VB６でデータベースを作っているのですが、

UpdateBatchとUpdateはどうちがうのでしょうか？

No.2426 指定した文字列でフォームをロードしたい　　投稿者：はや [01/7/09(月)18：36分]

指定した文字列でフォームをロードしたいのですが、

どのようにしたらよいのでしょうか？

Dim sForm as String

sForm="From1"

で、このsFormを使用してフォームをロードしたいのです。

どなたか、回答よろしくお願いいたします。

No.2425 指定した文字列でフォームをロードしたい　　投稿者：はや [01/7/09(月)18：35分]

指定した文字列でフォームをロードしたいのですが、

どのようにしたらよいのでしょうか？

Dim sForm as String

sForm="From1"

で、このsFormを使用してフォームをロードしたいのです。

どなたか、回答よろしくお願いいたします。

No.2424 ＲＥ：ＲＥ：Image1をドラッグで移動させたい。　　　　投稿者：VB初心者 Hiro [01/7/08(日)20：12分]

 花ちゃんさんできました。

ありがとうございました。本当に無知な私です・・・

No.2423 ＲＥ：Formに日付を入れたいのですが　　投稿者：花ちゃん [01/7/08(日)14：44分]

日付だけなら

Private Sub Form_Load()

   Label1.Caption = Format$(Date, "gggee年m月d日")

End Sub



時間も表示するならタイマー等を使ってイベントを発生させる必要があります。

ここのＨＰのＶＢ簡易リファレンスの日付・時間関係やヘルプでFormat関数を見ておいて下さい。

特に関連項目の ”日付/時刻表示書式指定文字 (Format 関数)”この辺も

No.2422 ＲＥ：Image1をドラッグで移動させたい。　　投稿者：花ちゃん [01/7/08(日)14：39分]

フォームの宣言セクションに下記の変数を宣言して下さい。



Dim Xsave As Single

Dim Ysave As Single

Dim Y As Single

Dim X As Single

No.2421 Formに日付を入れたいのですが　　投稿者：匿名　北風 [01/7/08(日)10：36分]

ＶＢ初心者です。Ｖer６です

フォーム上に当日の日付を入れたいのですが。教えてください。

No.2420 Image1をドラッグで移動させたい。　　投稿者：VB初心者　Hiro [01/7/08(日)9：45分]

　VB初心者hiroと申します。よろしくお願い致します。



新規フォームにImage1を配置し

２　マウスのドラッグ・アンド・ドロップによる位置指定の場合

　　　　　Private Sub Image1_MouseDown(Button As Integer, Shift_

　　　　　　　　　　　　　　　　　　As Integer, X As Single, Y As Single)

　　　　　　　Xsave = X　　'現在の表示位置を取得

　　　　　　　Ysave = Y

　　　　　　　'コントロールのドラッグを開始します

　　　　　　　Image1.Drag vbBeginDrag　

　　　　　End Sub



　　　　　Private Sub Image1_DragDrop(Source As Control, X As_

　　　　　　　　　　　　　　　　　　　　　　 Single, Y As Single)

　　　　　　　　　Source.Move (Image1.Left + X - Xsave),_

　　　　　　　　　　　　　　　　　 (Image1.Top + Y - Ysave)

　　　　　End Sub

　　

　で実行してみたのですが、Image1が右下にしか移動しません。

上下左右にドラッグで移動させたいのですが、よろしくお願いします。

No.2419 ＲＥ：続：エクセルのセル小数点以下１桁表示　　投稿者：花ちゃん [01/7/07(土)23：09分]

>"###.0"とすると、小数点以下が四捨五入されてしまいます。

これはエクセル単独で実行されても同じです。

四捨五入が自動でされるのがいやなら、データを切り捨てて下さい。

やり方はエクセルの関数 ＲＯＵＮＤＤＯＷＮ関数を使う方法と 
元のデータを１０倍して整数だけ求め１０で割る

=ROUNDDOWN(123.456,1)

= Fix(123.456 * 10) / 10

ROUNDDOWN関数はエクセルのヘルプで、Fix関数 Int関数はＶＢのヘルプで調べて下さい。

No.2418 続：エクセルのセル小数点以下１桁表示　　投稿者：みふ。 [01/7/07(土)17：34分]

たびたびすみません。

花ちゃんさんの方法で試してみましたが、

"###.0"とすると、小数点以下が四捨五入されてしまいます。

四捨五入せずに表示するにはどうすればよいですか？

回答お願いします。

No.2417 ＲＥ：エクセルのセル　小数点以下１桁表示　　投稿者：花ちゃん [01/7/07(土)0：07分]

xlSheet.Range("A1").NumberFormat = "###,###.0"



これでどうでしょう

No.2416 inetコントロールで・・・　　投稿者：gen [01/7/06(金)23：13分]

inetコントロールを使ってNTからUNIXサーバーにFTPでファイル転送する際に、
転送前・転送後のファイル名・サイズ・更新日といった形で

ログをとりたいのですが、転送前のファイルの最終更新日を取得する方法が分かりません。

inetのExecuteでLSやSIZEコマンドを使ってファイル名とサイズは取得できるのですが・・・
どなたか良い方法おしえてください。

No.2415 エクセルのセル　小数点以下１桁表示　　投稿者：みふ。 [01/7/06(金)21：56分]

いつもお世話になっております。



エクセルのセルに小数点以下１桁で表示させたいのですが、

どうすればよいでしょうか？



どなたか回答お願いします。

No.2414 ファイルリストボックスのアイコン表示　　投稿者：おーちゃん [01/7/06(金)19：20分]

またまたお世話になります。



このたび、固定のフォルダーのアクセスにしたくて、

コモンダイアログを使わずに、ファイルを選択したいのです。



そこで、ファイルリストボックスにすると、ファイル名だけが表示され、

アイコンが無い状態にしかなりません。



コモンダイアログのようにファイル名の横にアイコンがつくやり方を

模索中です。

（エクセルや、テキストファイル）



どなたか、貴重なご意見お待ちしております。。。

No.2413 RE:DBファイルの最適化について　　　　投稿者：megu [01/7/06(金)18：03分]

Rabbitさんありがとうございます。

おかげで解決しました。

これからも宜しくお願いします。

No.2412 RE:DBファイルの最適化について　　投稿者：Rabbit [01/7/06(金)16：57分]

動作しないＰＣには、DAO360.DLLが無いのではありませんか？

C:\Program Files\Common Files\Microsoft Shared\DAOの配下にDao360.Dllがあるか確認してください。

No.2411 RE:DBファイルの最適化について　　投稿者：Rabbit [01/7/06(金)16：57分]

動作しないＰＣには、DAO360.DLLが無いのではありませんか？

C:\Program Files\Common Files\Microsoft Shared\DAOの配下にDao360.Dllがあるか確認してください。

No.2410 DBファイルの最適化について　　投稿者：megu [01/7/06(金)14：57分]

ACCESS2000のmdbファイルをVB6のコードで最適化するプログラムを作って
他のマシンでも使えるようにしたのですが、一部のマシンでうまく動きません。

具体的にはwin98が入っている一部のマシンでのみエラーが出るのですが、何故なのでしょう？

エラー内容は「ActiveXコンポーネントはオブジェクトを作成できません」というエラーです。



ちなみに作成したプログラムを共有フォルダーに入れて他のマシンではそのショートカットを使用しています。



エラーの出るマシンにはVBが入っていないので、ランタイムやDLLが足りないのかと思い、

デストリビューションウイザードでパッケージを作って一度そのマシンにインストールしてから

DLLを全て残す設定にしてアンインストールしてみましたが、ダメでした。

プログラムの仕様の時点でおかしかったのかとも思いましたが、今更変えられず困っています。

エラーの出る原因だけでも思い当たる方がいれば教えていただきたいのですが...



コードはこんな感じです。宜しくお願いします。



Tempfile = Left("\\マシン名\フォルダー名\ファイル名.mdb", _
      Len("\\マシン名\フォルダー名\ファイル名.mdb") - 4) & ".bak"

DBEngine.CompactDatabase "\\マシン名\フォルダー名\ファイル名.mdb", Tempfile, , , ";PWD=PASSWORD;"　/ 
*ここでエラーが出る*/

Kill "\\マシン名\フォルダー名\ファイル名.mdb"

Name Tempfile As "\\マシン名\フォルダー名\ファイル名.mdb"

No.2409 ReRe:VBとOfficeXP　　投稿者：ふに〜 [01/7/06(金)12：56分]

ゆー太郎さんありがとう

現状、XPがないものでなんとも・・・

客先で動かないって事だったもので・・・

なんとか頑張ってみます。

No.2408 re:VBとOfficeXP　　投稿者：ゆー太郎 [01/7/06(金)12：11分]

内容が漠然すぎて、誰も答えられないと思いますよ。

(逆に自分に質問されて、相手に聞き返せずに答えられるか考えてみてください。)



まず、実際にプログラムのどの位置でどんなエラーが出るのか、

デバッグしてエラーの出る個所を特定して、それで分からない所

があれば、再度質問してみてください。

No.2407 VBとOfficeXP　　投稿者：ふに〜 [01/7/06(金)11：48分]

VBのプログラムがOfficeXPをインストールしてある端末でエラーになることがあります。

VBのプログラミングの仕方でかわるのでしょうか？

何か知っている事があればよろしくお願いします。

No.2406 VB6での削除　　投稿者：ともみ [01/7/06(金)11：30分]

はじめまして。VB６でデータベースを作りはじめたＯＬです。

レコードセットを削除するとき、rs.Deleteというふうにレコードセットを取得して

削除しようとすると多段階でのエラーが発生しましたとなって、削除できません。

でも最初は出来てたんです。なぜでしょう？削除後はカレントレコードちゃんと移動してるし、

レコードセットも削除可能な状態で取得していのですが、わかりません。

No.2405 UNIXサーバー、クライアントがNT！　　投稿者：ショウヤン [01/7/06(金)10：52分]

はじめまして。初心者ＰＧです。

↑の題名の環境でクライアントのVBからサーバーの中にあるＣシェルを（パラメーター付きで）
起動できるでしょうか？ＡＰＩを使えばできるという話を聞いたことがあるのですが・・・。
なんていうAPIでしょう？

昨日一日調べたんですけど分からなかったので、分かる方、よろしくお願いします。。

No.2404 re:VB5とACCESS2000　　投稿者：ゆー太郎 [01/7/05(木)20：01分]

Dataコントロールを使っていないのであれば、

参照設定でDAO3.6を使えば VB5でもAccess2Kのmdbは使えます。

（Dataコントロールは VB6SP3以降でないと2Kに対応してません。）



Access2Kのメニューバー

[ツール]-[データベースユーティリティ]-[データベースの変換]-[Microsoft Accessの旧バージョンの・・・]

で変換出来ません？(そゆことではなく？)

取りあえず、 DAO3.6を使用しているか確認してみてください。

No.2403 re:MACとの互換性について　　投稿者：ゆー太郎 [01/7/05(木)19：50分]

Windowsと MacOS は全然別物です。

Windowsエミュレーターを使わない限り、VBのソフトは動きません。

（それでも動作する保証はないです）

もしかしたら、Mac用にBasic言語はあるかもしれませんが、

少なくとも MSは出していません。

(Mac用Officeは出しているので、VBAは使えるかも)



Windowsでも Mac でも動くアプリケーションなら、

JAVA言語なんか良いかもしれませんよ。

No.2402 VB5とACCESS2000　　投稿者：Mr.K [01/7/05(木)19：30分]

B5（ＳＰ３）でACCESS97のmdbを使って運用していたのが

ACCESS2000にver-upすることになり問題が出ました。



VB5のままでACCESS2000のmdbを使って運用することは可能なのでしょうか？

また、対処法は？？



やりたいことは、ACCESS2000を使ってVBの中でデータを97形式に変換できないか？

と思ってます。





' @@@ 2000 => 97 へ変換 @@@

DoCmd.TransferDatabase acExport, "jet3.x", _

TEMPLATE_PATH & "sampl.mdb", actable, "uriage", "uriage2"



↑のように変換させようと思ったのですが

「jet3.xは組み込みのデータベースの種類でないか、この操作ではサポートされていない種類です」

と言うメッセージが表示されました。

No.2401 MACとの互換性について　　投稿者：VB初心者 [01/7/05(木)18：32分]

VBで作成したソフトをMACで起動させることができるのでしょうか。

MAC版VBってあるのでしょうか。

VBレスキュー(花ちゃん)
Visual Basic6.0　 VB6.0