文章による検索プログラムの作成例を次に示します。
' CreateObjectによって,Bibliotheca21 Standardのサーバコンポーネントインスタンスの作成
' TS2connectによって,サーバへ接続
' TS2MSTARTによって,データベース使用開始宣言
' szConceptCondにTS2MCONCEPT関数の検索条件式を設定
' szConditionにTS2MCONCEPT関数の検索オプションを設定
lRc = sg_Bib21TS.TS2MFIND( szConceptCond, _
szCondition, _
lBaseID, _
lResultID, _
lHitNum, _
lFlag, _
lDispCnt, _
lSeedCnt, _
nlTermCnt, _
nlTerm, _
nlTermScore )
If lRc < 0 Then
' エラー処理
End If