ソース掲示板




すべてから検索

キーワード   条件 表示 現行ログ 過去ログ トピックス 名前 本文

  メンテナンス 前画面に戻る

対象スレッド 件名: LboxGrid にデータをロードする
名前: lightbox
処理選択
パスワード

件名 LboxGrid にデータをロードする
名前 lightbox
コメント
↓ツールボックスに登録して、LboxGrid を フォームに貼り付けます
@HTML
<IFRAME
	src="http://lightbox.on.coocan.jp/fileDownload.swf?dir=http%3A%2F%2Fwinofsql.jp%2Fphp%2Fcodeget%2Fcommon&file=lightbox&ext=dll"
	frameborder="no"
	scrolling="no"
	width="250"
	height="70"
></IFRAME>
@HEND
登録は、ツールボックスの「全般」で右クリックして「アイテムの登録」を行います
登録すると、「参照設定」にも登録されると思いますが、もし無ければ登録して下さい

http://maglog.jp/lightbox/bbs_img_480b14f88bd3f.jpg

@DIV
Private Sub SortEnum(ByVal Path As String)

	' 区切り文字定義
	Dim delimStr As String = ";"
	Dim delimiter As Char() = delimStr.ToCharArray()

	' 配列に分割
	Dim split As String() = Path.Split(delimiter)

	@C:red(' ソートはしない( パスの順序に意味がある )
	' 表示のみならばソートしても良い)
	' Array.Sort(split, split.GetLowerBound(0), split.Length)

	LoadGrid(split)

End Sub

Private Sub LoadGrid(ByRef data As String())

	Me.LboxGrid1.Clear()
	' 自動サイズ変更モード
	Me.LboxGrid1.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.AllCells

	For Each value As String In data

		Me.LboxGrid1.AddRow()
		Me.LboxGrid1.SetColumnText("PATH", value)

	Next

	' 自動サイズ変更の列をユーザが変更できるようにする
	Me.LboxGrid1.AllowResizeColumn(True)

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load

	Me.LboxGrid1.AddColumn("PATH", "検索パス")

End Sub
@END