私はこれに似たデータテーブルを持っています:
id msg 1 ありがとうございます.. 2 親切に... 3 挿入してください.. 4 やめてください
データテーブルから特定のIDに従ってメッセージを取得する必要があります。これは、データテーブルを埋める方法です:
msgTable = selectMsg()
MsgBox(i need to get the msg here)
Public Function selectMsg() As DataTable
Dim command As SqlCommand = New SqlCommand("selectMsg", cn)
command.CommandType = CommandType.StoredProcedure
Dim da As New SqlDataAdapter(command)
'If dt.Rows.Count <> 0 Then
' dt.Rows.Clear()
'End If
Try
da.Fill(msgDS, "N_AI_HOME_CARE")
msgDT = msgDS.Tables(0)
Catch ex As Exception
logFile("SP selectMsg ---" + ex.Message)
End Try
Return msgDT
End Function
どんな提案でも大歓迎です!