エラーについて・・・

解決

ぞうくん  2004-12-16 14:21:19  No: 118338  IP: [192.*.*.*]

'//////変数宣言//////////
Dim objDX As New DirectX8

Dim objDD As DirectDraw8
Dim primDDSurf As DirectDrawSurface8
Dim secDDSurf As DirectDrawSurface8
Dim ddsd1 As DDSURFACEDESC2
Dim ddsd2 As DDSURFACEDESC2
Dim blnit As Boolean

Option Explicit
で、Dim objDX As New DirectX8でエラーがでるのですが・・・
「ユーザ定義型は定義されていません」とでます・・・
どなたかご教授お願い致します

編集 削除
nanashi  2004-12-16 14:23:50  No: 118339  IP: [192.*.*.*]

参照設定とかしてますか？

編集 削除
ぞうくん  2004-12-16 22:12:21  No: 118340  IP: [192.*.*.*]

すみません、参照設定とはなんのことですか？
あまり知識がないためわかりません・・・
ご教授お願い致します

編集 削除
聖 羅樹  URL  2004-12-17 09:28:36  No: 118341  IP: [192.*.*.*]

VBのプロジェクトを開いて、メニューから
『プロジェクト(P)』⇒『参照設定(N)...』を選択して下さい。
そこで必要なものを選択すればOKです。
DirectX8に関しては
『DirectX 8 for Visual Basic Type Library』を選択すればいいのですが、
他は分かりませんでした。
一応調べては見たのですが。

編集 削除
z  2004-12-17 09:34:43  No: 118342  IP: [192.*.*.*]

VBを起動してF1キーを押したあと、「参照設定」で検索するとわかりませんか？

エラーは、DirectX8をNewしようとしたが見つからないといった感じの意味です。
参照設定とは、その名のとおりプロジェクトで参照するライブラリを設定します。
（この場合、DirectX8クラスが存在するライブラリを指定します）

編集 削除
ぞうくん  2004-12-17 23:22:07  No: 118343  IP: [192.*.*.*]

nanashiさん、聖  羅樹さん、zさん、ご指導ありがとうございます。皆さんのご意見を、自分なりにまとめてみると、
「DirectX8をNewしようとしたが見つからない」
                  ↓
「参照設定で『DirectX 8 for Visual Basic Type Library』を
選択すればいい」
という結論に至ったのですが・・・
いかがでしょうか？私事により、明日から三日ほどPCができないの
で試すことが出来ないのが残念なのですが・・・
近いうちに試してみます

編集 削除
LESIA  2004-12-18 06:07:54  No: 118344  IP: [192.*.*.*]

例えば
Dim blnit As
まで入力すると、標準でBooleanがAsの候補の一覧に現れるので、
それを選択すると、
Dim blnit As Boolean
のようになりますが、そのAsの候補の一覧に新しい項目を追加するのが
参照設定です。

したがって
Dim objDX As
まで入力して、DirectX8が候補の一覧に含まれていればOKという事に
なります。
もし、一覧にふくまれていなければ、参照設定するものが間違っている
という事になります。

編集 削除
ぞうくん  2004-12-22 13:50:56  No: 118345  IP: [192.*.*.*]

ありがとうございます。
みなさんの助言のおかげで、やっと解決しました。
また、何か機会があったら教えてください。
本件については、本当にお世話になりました。

編集 削除