タイトル : Re: 構造体でスマートに記述する方法 投稿日 : 2010/04/22(Thu) 17:27 投稿者 : 魔界の仮面弁士
> のクラスを作ってみました。 gGamencd が 1〜3 というマジックナンバーになっている点が気になりますが、 その事は横に置いといて…。 > SQL文の引数はそれぞれ違います。 商品_SQL / 価格_SQL / 在庫_SQL に共通のインターフェイスを持たせるとか。 Public Interface IHoge Sub md_Delete(ParamArray args() As String) Sub md_Update(fps_sh As Object, Col cs Integer, row As Integer) : : End Interface Public Class SqlLibrary Private g処理 As IHoge Public Sub New(gamencd as Integer) '初期化手順に差がある場合や分岐数が多い場合は、Factory にした方が良いかも。 Select Case gGamencd Case 1 : g処理 = New 商品_SQL() Case 2 : g処理 = New 価格_SQL() Case 3 : g処理 = New 在庫_SQL() Case Else : Throw New ArgumentException() End Select End Sub Public Sub md_Delete(Optional cd0 As String = "", Optional cd1 As String = "") g処理.md_Delete(cd0, cd1) End Sub Public Sub md_Update(fps_sh As Object, col As Integer, row As Integer) g処理.md_Update(fps_sh, col, row) End Sub : : End Class 下記の 第19回 の記事が参考になるかも。 http://www.atmarkit.co.jp/fdotnet/vb6tonet/index/index.html |