---

MinimumSizeプロパティ

適用対象

OraParameterオブジェクト

OraParamArrayオブジェクト

説明

OraParameterまたはOraParamArray文字列バッファ、またはByteArray(ORATYPE_RAW_BINの場合)の最小サイズを戻します。OraParamArrayオブジェクトの場合、MinimumSizeプロパティは実行時に読取り専用です。OraParameterオブジェクトの場合、MinimumSizeプロパティは実行時に読取り/書込みができます。

使用方法

oraparameter.MinimumSize 
oraparamarray.MinimumSize

データ型

Integer

備考

このプロパティを使用して、配列の各要素に割り当てる最小文字数またはバイト数を取得します。OraParamArrayオブジェクトの場合、サイズはAddTableメソッドを使用して指定されます。

例

注意: この例では、EmployeeLong.GetEmpNameと呼ばれるPL/SQLプロシージャを実行する必要があります。このプロシージャは、列名ENAME_LONGを備えた表を使用して、約200文字の長いenameを戻します。

Sub Form_Load ()
 
' Declare variables as OLE Objects.
 Dim OraSession As OraSession 
 Dim OraDatabase As OraDatabase 
 Dim OraDynaset As OraDynaset 
 
' Create the OraSession Object.
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
 
' Create the OraDatabase Object.
Set OraDatabase = OraSession.OpenDatabase("ExampleDb", "scott/tiger", 0&)
 
' Add EMPNO as an Input/Output parameter and set its initial value.
OraDatabase.Parameters.Add "EMPNO", 9999, ORAPARM_INPUT
 
' Add ENAME as an Output parameter and set its initial value.
OraDatabase.Parameters.Add "ENAME_LONG", "foo", ORAPARM_OUTPUT
OraDatabase.Parameters("ENAME_LONG").MinimumSize = 201 
 'Since we require to hold a value of more than 128 bytes
 
' Execute the Stored Procedure Employee.GetEmpName to retrieve ENAME_LONG.
OraDatabase.ExecuteSQL ("Begin EmployeeLong.GetEmpName (:EMPNO," & _
            "NAME_LONG); end;")

関連項目: Addメソッド AddTableメソッド ExecuteSQLメソッド