始ã‚ãŸã°ã‹ã‚Šã®äººå‘ã‘ã«æŽ²è¼‰ã—ã¦ã„ã¾ã™ã€‚
DataGridViewã¯ã€Excelã®ã‚ˆã†ãªè¡¨å½¢å¼ã®è¡¨ç¤ºãŒå¯èƒ½ã§ä¸€ã¤ã®ã‚³ãƒ³ãƒˆãƒãƒ¼ãƒ«ã§ãŸãã•ã‚“ã®ã“ã¨ã‚’ã™ã‚‹ã“ã¨ãŒã§ãã¾ã™ã€‚
データを一覧ã§è¡¨ç¤ºã—ãŸã„ã¨ãã‚„ã€ã‚°ãƒªãƒƒãƒ‰åž‹ã§CRUD(クラッド)を実ç¾ã—ãŸã„ã¨ãã«ä½¿ç”¨ã—ã¾ã™ã€‚
列や行ã®è¿½åŠ や削除を簡å˜ã«è¡Œãˆã‚‹ä¸Šã«ã€ãƒ‡ãƒ¼ã‚¿ãƒ™ãƒ¼ã‚¹ã‹ã‚‰å–å¾—ã—ãŸãƒ‡ãƒ¼ã‚¿ã‚’ãã®ã¾ã¾è¡¨ç¤ºã™ã‚‹ã“ã¨ã‚‚ã§ãã¾ã™ã€‚
DataGridViewã¯Windowsアプリケーションã«ã¯æ¬ ã‹ã›ãªã„コントãƒãƒ¼ãƒ«ã§ã™ã€‚
「ツールボックスã€ã‚’クリックã—ã¦é¸æŠžç”»é¢ã‚’é–‹ãã€ã€ŒDataGridViewã€ã‚’ドラッグã—ã¦Form上ã¸é…ç½®ã—ã¾ã™ã€‚
å°ã•ã„三角ã®ãƒœã‚¿ãƒ³ã‚’クリックã—ã¦ã‚¿ã‚¹ã‚¯ç”»é¢ã‚’é–‹ãã¾ã™ã€‚ãã—ã¦ã€ã€Œåˆ—ã®è¿½åŠ ã€ã‚’クリックã—ã¾ã™ã€‚
列ã®æƒ…å ±ã‚’å…¥åŠ›ã—ã¦ã€[è¿½åŠ ]ボタンをクリックã—ã¾ã™ã€‚
今回ã¯ã€IDã¨Nameã®2ã¤ã®åˆ—を作æˆã—ã¾ã™ã€‚
ã“ã‚Œã§ã€IDã¨Nameã®ã‚«ãƒ©ãƒ ã‚’ã‚‚ã¤GridãŒå‡ºæ¥ä¸ŠãŒã‚Šã¾ã—ãŸã€‚
ãƒ‡ãƒ¼ã‚¿ã‚’è¿½åŠ ã—ã¾ã™ã€‚ID列ã«ã€Œ1ã€ã‚’Name列ã«ã€Œhanakoã€ã¨ã„ã†ãƒ‡ãƒ¼ã‚¿ã‚’è¿½åŠ ã—ã¾ã™ã€‚
DataGridView.Rows.Add("1","hanako")
データを削除ã—ã¾ã™ã€‚以下ã®ã‚ˆã†ã«ã™ã‚‹ã“ã¨ã§å…¨ã¦ã®ãƒ‡ãƒ¼ã‚¿ãŒç ´æ£„ã•ã‚Œã¾ã™ã€‚
DataGridView.Rows.Clear()
データã®ã‚«ã‚¦ãƒ³ãƒˆã‚’å–å¾—ã—ã¾ã™ã€‚行数ã®ã“ã¨ã§ã™ã€‚
Dim count As Integer = DataGridView.RowCount
セルã®å€¤ã‚’å–å¾—ã—ã¾ã™ã€‚Rowsã§ã¯åˆ—番å·ã€Cellsã§ã¯è¡Œç•ªå·ã‚’指定ã—ã¾ã™ã€‚ã“れらã®ç•ªå·ã¯0ã‹ã‚‰å§‹ã¾ã‚‹ã®ã§æ³¨æ„ãŒå¿…è¦ã§ã™ã€‚
下記ã§ã¯ã€ä¸€ç•ªåˆã‚ã®åˆ—ã®ãƒ‡ãƒ¼ã‚¿ã‚’å–å¾—ã—ã¦ã„ã¾ã™ã€‚
Dim id As String = DataGridView.Rows(0).Cells(0).Value
Dim name As String = DataGridView.Rows(0).Cells(1).Value
ç¾åœ¨ã‚»ãƒ¬ã‚¯ãƒˆã•ã‚Œã¦ã„ã‚‹è¡Œã®ãƒ‡ãƒ¼ã‚¿ã‚’å–å¾—ã—ã¾ã™ã€‚
Dim id As String = DataGridView.CurrentRow.Cells(0).Value
Dim name As String = DataGridView.CurrentRow.Cells(1).Value
ç¾åœ¨ã‚»ãƒ¬ã‚¯ãƒˆã•ã‚Œã¦ã„ã‚‹è¡Œã®ç•ªå·ã‚’å–å¾—ã—ã¾ã™ã€‚
Dim rowindex As Interger = DataGridView.CurrentCell.RowIndex
ç¾åœ¨ã‚»ãƒ¬ã‚¯ãƒˆã•ã‚Œã¦ã„る行を削除ã—ã¾ã™ã€‚
DataGridView.Rows.RemoveAt(DataGridView.CurrentCell.RowIndex)
よã‚ã—ã‘ã‚Œã°ä¸‹è¨˜ã‚‚ã”覧ãã ã•ã„。
コントãƒãƒ¼ãƒ«ã®ã‚«ã‚¹ã‚¿ãƒžã‚¤ã‚ºã€ŒDataGridViewã€