C#能否在VB.NET实现:return (LWord[])lwordList.ToArray(typeof(TraceLWord4.Classes.LWord));
学习VB.NET中,看到某资料中在函数中有如下语句,想在VB.NET中实现,不知英国如何写?
代码如下
return (LWord[])lwordList.ToArray(typeof(TraceLWord4.Classes.LWord));
原函数如下:
public LWord[] ListLWord()
{
// 留言对象集合
ArrayList lwordList=new ArrayList();
string cmdText= "SELECT * FROM [LWord] ORDER BY [LWordID] DESC ";
OleDbConnection dbConn=new OleDbConnection(DB_CONN);
OleDbCommand dbCmd=new OleDbCommand(cmdText, dbConn);
try
{
dbConn.Open();
OleDbDataReader dr=dbCmd.ExecuteReader();
while(dr.Read())
{
LWord lword=new LWord();
// 设置留言编号
lword.UniqueID=(int)dr[ "LWordID "];
// 留言内容
lword.TextContent=(string)dr[ "TextContent "];
// 发送时间
lword.PostTime=(DateTime)dr[ "PostTime "];
// 加入留言对象到集合
lwordList.Add(lword);
}
}
catch
{
throw;
}
finally
{
dbConn.Close();
}
// 将集合转型为数组并返回给调用者
return (LWord[])lwordList.ToArray(typeof(TraceLWord4.Classes.LWord));
}
[解决办法]
Return CType(lwordList.ToArray(TypeOf(TraceLWord4.Classes.LWord)),LWord())