LboxGrid メソッド (1)


  SetColumnText、SetColumnValue



  
' ******************************************************
' カラムデータ変更
' ******************************************************
Public Sub SetColumnText(ByVal nRow As Integer, _
 ByVal strName As String, ByVal strText As String)

	Me.Rows(nRow).Cells(strName).Value = strText

End Sub
Public Sub SetColumnText(ByVal nRow As Integer, _
 ByVal nCol As Integer, ByVal strText As String)

	Me.Rows(nRow).Cells(nCol).Value = strText

End Sub
Public Sub SetColumnText(ByVal strName As String, ByVal strText As String)

	Me.Rows(nCurrentRow).Cells(strName).Value = strText

End Sub
Public Sub SetColumnText(ByVal nCol As Integer, ByVal strText As String)

	Me.Rows(nCurrentRow).Cells(nCol).Value = strText

End Sub
Public Sub SetColumnValue(ByVal nRow As Integer, _
 ByVal strName As String, ByVal value As Object)

	Me.Rows(nRow).Cells(strName).Value = value

End Sub
Public Sub SetColumnValue(ByVal nRow As Integer, _
 ByVal nCol As Integer, ByVal value As Object)

	Me.Rows(nRow).Cells(nCol).Value = value

End Sub
Public Sub SetColumnValue(ByVal strName As String, ByVal value As Object)

	Me.Rows(nCurrentRow).Cells(strName).Value = value

End Sub
Public Sub SetColumnValue(ByVal nCol As Integer, ByVal value As Object)

	Me.Rows(nCurrentRow).Cells(nCol).Value = value

End Sub
  










  infoboard   管理者用   
このエントリーをはてなブックマークに追加




SQLの窓  天気  IT用語辞典
Yahoo!ニュース  マルチ辞書
PHP マニュアル  Google URL短縮 


フリーフォントWEBサービス
SQLの窓WEBサービス

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ