VB 如何读取DataGrid中指定的单元格的数据

给你一个例子
Dim Conn As New ADODBConnection
Dim Rs As New ADODBRecordset
RsOpen "SELECT FROM 报警记录 where " & TeTag & "='" & Text1Text & "'", Conn
If RsRecordCount = 0 Then
MsgBox vbCrLf & "“" & RsFields(0) & "”查找失败！", vbInformation, " 提 示"
RsClose
RsOpen "select from 报警记录", Conn, adOpenStatic, adLockOptimistic
End If
Set DataGrid1DataSource = Rs
For Each Col In DataGrid1Columns '修改列表
If ColDataField = "序号" Or ColDataField = "备注" Then ColVisible = False '隐藏不想显示的字段
Next Col
DataGrid1Columns(11)Caption = "电压"‘替换显示将数据库里的字段
if RsFields(4)="10" then msgbox "数值过低！"'第5（从0开始）个单元格数值
For I = 0 To 14
DataGrid1Columns(I)Caption = Space(((DataGrid1Columns(I)Width - Len(DataGrid1Columns(I)Caption) 150) \ 2) \ 150) & DataGrid1Columns(I)Caption '标题居中
DataGrid1Columns(I)Alignment = dbgCenter
Next
DataGrid1Refresh
MeCaption = "工作记录[信息总数:" & RsRecordCount & "]"’最大行数

以上就是关于VB 如何读取DataGrid中指定的单元格的数据全部的内容，包括:VB 如何读取DataGrid中指定的单元格的数据、、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！