Enum変数の選択リストを出すには (ID:146400)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

Enumの選択リストが出なくて困っています。

OracleADOクラス内で、System.Data.OracleClientに
Enum定義されているOracleTypeを使用した構造体を
定義しています。しかし、このままではOracleADO.dllを
参照しても、OracleTypeの参照リストが表示されません。

OracleADO内で再定義すれば表示されると思いますが、
再定義はしたくない。

【OracleADO.dllイメージ】
Imports System.Data.OracleClient

Public Class OracleADO

Public Structure Param
        Dim s_Param As String     'パラメータ変数
        Dim s_Otype As OracleType 'Oracleデータ型
        Dim o_Value As Object     '設定値
    End Structure

Public Function Adapter(ByVal SqlCmd As String, Optional ByVal SqlParam() As Param = Nothing) As System.Data.DataTable

〜 (省略) 〜

end Function

end Class

【OracleADO.dll使用側イメージ】
Public Class OracleAccsess

Public WithEvents xDB As New DBclass.OracleADO

Sub adpter_Bind()

Dim sSql As String
        Dim Param() As Spk.DB.ADO.Oracle.Param

sSql = ""
        sSql &= "select * from TEST_dd "
        sSql &= "where DATA2 = @B_DATA2"

ReDim Param(0)
        Param(0).s_Param = "B_DATA2"
        para(0).s_Otype = ( ここで選択リストが表示されない )
        Param(0).o_Value = 211
        xDB.Adapter(sSql, Param)
    End Sub

End Class

使用する側でも、System.Data.OracleClientを参照すれば、
解消するのでしょうが、それもしたくありません。

ほぼ同等の内容が下記にあるのですが、私には意味が分かりません。
http://www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=46185&forum=7&0

以上、宜しくお願いします。

←解決時は質問者本人がここをチェックしてください。

戻る