我有以下代码将值分配给数据行并添加到数据表中。我想编写一个返回数据行的函数,它使我能够编写更少的代码。请检查下面的代码并给我任何建议
objRow = dtTODO.NewRow
objRow.Item("Item") = "Test"
objRow.Item("Message") = "Test"
objRow.Item("ButtonText") = "Add"
dtTODO.Rows.Add(objRow)
objRow = dtTODO.NewRow
objRow.Item("Item") = "Test2"
objRow.Item("Message") = "Test2"
objRow.Item("ButtonText") = "Add"
dtTODO.Rows.Add(objRow)
假设我正在添加上述记录。我想创建一个返回数据行的函数,
Public Function ItemRow(ByVal strItem As String, ByVal strMessage As String, ByVal strButtonText As String, ByVal strUrl As String) As DataRow
End Function
并将其添加为,
dtTODO.Rows.Add(ItemRow(item, msg,bttext,url))
希望我不会混淆太多:)。