投稿日	： 2004/09/02(Thu) 12:53
投稿者	： LESIA
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^2: ＤＬＬでグリッド操作

> やりたいこと書き忘れてました。
> 要は、この関数を、DLLにしてパラメータとしてレコードを
> 渡し、メソッドを叩くことで実行したいんです。
>
> どなたかアドバイスをいただけると幸いです。
> よろしくお願いします。

クラスの中で、グリッドのオブジェクト変数を作り、これにフォームのグリッドを
代入すれば出来ます。

'クラスのコード
Option Explicit

Private mFlexGrid As MSFlexGrid

Public Property Set Init(NewValue As MSFlexGrid)
    Set mFlexGrid = NewValue
End Property

'Grid表示関数
Public Function setGrid()
    Dim RowCount As Integer '行数カウンタ
    Dim i As Integer '汎用カウンタ
    
    With mFlexGrid
        .Refresh
        .Redraw = False
        
        '〜中略〜
    End With
End Function

フォームのコード
Option Explicit

Private objClass As Class1

Private Sub Form_Load()
    Set objClass = New Class1
    
    Set objClass.Init = MSFlexGrid1
    
    objClass.setGrid
End Sub

Private Sub Form_Unload(Cancel As Integer)
    Set objClass = Nothing
End Sub

★ - ＤＬＬでグリッド操作 - 4π 09/02-10:27No.285
• Re: ＤＬＬでグリッド操作 - 4π 09/02-10:38 No.286
  • Re^2: ＤＬＬでグリッド操作 - LESIA 09/02-12:53 No.287
    • Re^3: ＤＬＬでグリッド操作 - 4π 09/02-13:15 No.288
      • Re^4: ＤＬＬでグリッド操作 - 4π 09/02-14:25 No.289
        • Re^5: ＤＬＬでグリッド操作(解決) - 4π 09/02-17:56 No.293