我找到了以下对我有用的C#代码:
public partial class Default2 : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
if (Session["EID"] != null)
{
int EmpID = (int)Session["EID"];
DataClassesDataContext dc = new DataClassesDataContext();
var empInfo = from emp in dc.EmployeeLogins
where emp.EmployeeID == EmpID
select new
{
emp.EmployeeLoginKey,
emp.EmployeeID,
emp.username,
emp.passwd
};
foreach (var v in empInfo)
{
lblID.Text = v.EmployeeID.ToString();
lblLoginKey.Text = v.EmployeeLoginKey.ToString();
lblPassword.Text = v.passwd.ToString();
lblUserName.Text = v.username.ToString();
}
}
else
{
Response.Redirect("Default.aspx");
}
}
}
我曾使用转换为vb的在线转换器,当我编译程序时,它会返回以下句子的错误:
For Each v As var In empInfo
如何将var从c#转换为vb?
答案 0 :(得分:2)
只需跳过类型声明:For Each v In empInfo
。
您必须设置Option Infer On
。
MSDN上描述了正式For Each
statement syntax如下:
For Each element [ As datatype ] In group
[ statements ]
[ Continue For ]
[ statements ]
[ Exit For ]
[ statements ]
Next [ element ]
答案 1 :(得分:0)
尝试使用此代码:
For Each Dim item In empInfo
答案 2 :(得分:0)
For Each v In empInfo
要让VB推断变量类型,只需省略As
子句,例如
Dim a = b + c
注意:这仅在Option Infer
为On
时有效。当Option Infer
为Off
时,没有类型说明符的变量将默认为Object
。
答案 3 :(得分:0)
尝试
foreach (Dim v in empInfo)
lblID.Text = v.EmployeeID.ToString()
lblLoginKey.Text = v.EmployeeLoginKey.ToString()
lblPassword.Text = v.passwd.ToString()
lblUserName.Text = v.username.ToString()
Next
不要忘记在页面顶部添加以下行
Option Strict On
Option Infer On