vb.net单击选中某行 vb中如何用单选按钮

vb.net鼠标点击一行,该行就成选中状态（使用的是datagridview控件）

这个问题我也正在研究。在gridview的属性里面有这个。

成都创新互联专业为企业提供思明网站建设、思明做网站、思明网站设计、思明网站制作等企业网站建设、网页设计与制作、思明企业网站模板建站服务，10多年思明做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。

补充：已经找到答案，在gridview的selectionmode的属性里，选fullrowselect。

Private Sub DataGridView1_CurrentCellChanged(By Val sender As Object, By Val e As System.EventArgs) Handles DataGridView1.CurrentCellChanged

//获取选中行第一列的值，也就是第0列的值

Dim result1 As String = DataGridView1.Item(0, DataGridView1.CurrentCell.RowIndex).Value.ToString.Trim

//获取选中行第二列的值，也就是第1列的值

Dim result1 As String = DataGridView1.Item(1, DataGridView1.CurrentCell.RowIndex).Value.ToString.Trim

'......有几列就写几列，如果感觉这样写代码比较累赘，你可以放到for循环里面，把列数用一个变量i代替旧可以了

End sub

思路：获取鼠标点击后的光标位置，计算回车数量、回车开始的位置和下一个回车符号的位置，然后选中这行文本。

Private Sub textBox1_MouseUp(ByVal sender As Object, ByVal e As MouseEventArgs)

Dim 回车数量 As Integer = 0

Dim 已选中 As Boolean = False

Dim text As String = Me.textBox1.Text

Dim 回车位置 As Integer = 0

Dim 本行长度 As Integer = text.IndexOf(Microsoft.VisualBasic.Strings.ChrW(10))

For i As Integer = 0 To textBox1.SelectionStart - 1

If 已选中 Then

本行长度 = i - 回车位置 + 1

End If

If text(i) = Microsoft.VisualBasic.Strings.ChrW(10) Then

回车数量 += 1

回车位置 = i

已选中 = True

End If

Me.Text = (回车数量 + 1).ToString()

textBox1.Select(回车位置, 本行长度)

End Sub

当前题目：vb.net单击选中某行 vb中如何用单选按钮
新闻来源：http://6mz.cn/article/dojciee.html