vb.net DataGridView运用自定义函数根据列标题文本获取对应列的文本，代码后面带注释

如果要在 DataGridView 控件中使用自定义函数根据列标题文本获取对应列的文本，可以通过以下代码实现：

' 假设 DataGridView 控件名为 dgv
' 假设要获取的列标题文本为 "姓名"
' 假设获取第一行的对应列的文本

' 自定义获取列文本的函数
Public Function GetColumnText(dgv As DataGridView, colTitle As String, rowIndex As Integer) As String
    ' 获取列标题为 colTitle 的列索引
    Dim colIndex As Integer = -1
    For Each column As DataGridViewColumn In dgv.Columns
        If column.HeaderText = colTitle Then
            colIndex = column.Index
            Exit For
        End If
    Next

    ' 如果没找到对应列，则返回空值
    If colIndex = -1 Then
        Return ""
    End If

    ' 获取对应行的对应列的文本
    Dim cellText As String = dgv.Rows(rowIndex).Cells(colIndex).Value.ToString()

    Return cellText
End Function

' 调用自定义函数获取对应列的文本
Dim text As String = GetColumnText(dgv, "姓名", 0)

其中，`GetColumnText` 函数可以通过传入 DataGridView 控件、列标题文本和行索引，返回对应列的文本。在函数中，通过遍历 `dgv.Columns` 集合，查找列标题为 `colTitle` 的列，并记录其索引。如果没找到对应列，则返回空值。然后通过 `Rows(rowIndex).Cells(colIndex).Value.ToString()` 获取对应行的对应列的文本。最后将文本返回即可。

在主程序中，可以通过调用 `GetColumnText` 函数获取对应列的文本。例如，上述代码中调用 `GetColumnText(dgv, "姓名", 0)` 获取第一行姓名列的文本。