谁能帮忙把这段vb.net 翻译成c#?
PublicFunctionFindStrMulti$(ByValAllStrAsString,ByValFirstStrAsString,ByValEndStrAsSt...
Public Function FindStrMulti$(ByVal AllStr As String, ByVal FirstStr As String, ByVal EndStr As String, ByVal SplitStr As String) '提取字符串或网页源代码中所有指定代码
On Error Resume Next
DoEvents()
'参数
'总文本,起始字符串,终止字符串,分隔符
Dim i As Integer, j As Integer
j = 1
Do
DoEvents()
i = InStr(j, AllStr, FirstStr)
If i = 0 Then
Exit Do
End If
i = i + Len(FirstStr)
j = InStr(i, AllStr, EndStr)
If j > 0 Then
FindStrMulti = IIf(Len(FindStrMulti) > 0, FindStrMulti & SplitStr, "") & Mid(AllStr, i, j - i)
Else
Exit Do
End If
Loop
End Function 展开
On Error Resume Next
DoEvents()
'参数
'总文本,起始字符串,终止字符串,分隔符
Dim i As Integer, j As Integer
j = 1
Do
DoEvents()
i = InStr(j, AllStr, FirstStr)
If i = 0 Then
Exit Do
End If
i = i + Len(FirstStr)
j = InStr(i, AllStr, EndStr)
If j > 0 Then
FindStrMulti = IIf(Len(FindStrMulti) > 0, FindStrMulti & SplitStr, "") & Mid(AllStr, i, j - i)
Else
Exit Do
End If
Loop
End Function 展开
2个回答
展开全部
可能看起来是这样的:
一个公共的对象FindStrMulti(字符串AllStr字符串FirstStr,字符串EndStr字符串SplitStr),
{
对象functionReturnValue = NULL;
/ /提取字符串的所有指定的代码页的源代码
/ / ERROR:C#中不支持:OnErrorStatement
调用DoEvents();
/ /参数
/ /开始的字符串结尾的字符串分隔符的文本的 BR /> INT I = 0;
研究= 0;
J = 1;
做{
调用DoEvents();
= Strings.InStr( J,AllStr,FirstStr);
(我== 0){
; / / TODO:可能是不正确的。 :退出执行
} I = I + Strings.Len(FirstStr);
J = Strings.InStr(I,AllStr,EndStr);
(J> 0 ){
functionReturnValue =(Strings.Len(FindStrMulti())> 0?functionReturnValue + SplitStr:“”)+ Strings.Mid(AllStr,I,J - I);
}其他{突破; / / TODO:可能是不正确的。 :退出
}
},而(真);
回报functionReturnValue;
}
一个公共的对象FindStrMulti(字符串AllStr字符串FirstStr,字符串EndStr字符串SplitStr),
{
对象functionReturnValue = NULL;
/ /提取字符串的所有指定的代码页的源代码
/ / ERROR:C#中不支持:OnErrorStatement
调用DoEvents();
/ /参数
/ /开始的字符串结尾的字符串分隔符的文本的 BR /> INT I = 0;
研究= 0;
J = 1;
做{
调用DoEvents();
= Strings.InStr( J,AllStr,FirstStr);
(我== 0){
; / / TODO:可能是不正确的。 :退出执行
} I = I + Strings.Len(FirstStr);
J = Strings.InStr(I,AllStr,EndStr);
(J> 0 ){
functionReturnValue =(Strings.Len(FindStrMulti())> 0?functionReturnValue + SplitStr:“”)+ Strings.Mid(AllStr,I,J - I);
}其他{突破; / / TODO:可能是不正确的。 :退出
}
},而(真);
回报functionReturnValue;
}
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
大概是这个样子的:
public object FindStrMulti(string AllStr, string FirstStr, string EndStr, string SplitStr)
{
object functionReturnValue = null;
//提取字符串或网页源代码中所有指定代码
// ERROR: Not supported in C#: OnErrorStatement
DoEvents();
//参数
//总文本,起始字符串,终止字符串,分隔符
int i = 0;
int j = 0;
j = 1;
do {
DoEvents();
i = Strings.InStr(j, AllStr, FirstStr);
if (i == 0) {
break; // TODO: might not be correct. Was : Exit Do
}
i = i + Strings.Len(FirstStr);
j = Strings.InStr(i, AllStr, EndStr);
if (j > 0) {
functionReturnValue = (Strings.Len(FindStrMulti()) > 0 ? functionReturnValue + SplitStr : "") + Strings.Mid(AllStr, i, j - i);
} else {
break; // TODO: might not be correct. Was : Exit Do
}
} while (true);
return functionReturnValue;
}
public object FindStrMulti(string AllStr, string FirstStr, string EndStr, string SplitStr)
{
object functionReturnValue = null;
//提取字符串或网页源代码中所有指定代码
// ERROR: Not supported in C#: OnErrorStatement
DoEvents();
//参数
//总文本,起始字符串,终止字符串,分隔符
int i = 0;
int j = 0;
j = 1;
do {
DoEvents();
i = Strings.InStr(j, AllStr, FirstStr);
if (i == 0) {
break; // TODO: might not be correct. Was : Exit Do
}
i = i + Strings.Len(FirstStr);
j = Strings.InStr(i, AllStr, EndStr);
if (j > 0) {
functionReturnValue = (Strings.Len(FindStrMulti()) > 0 ? functionReturnValue + SplitStr : "") + Strings.Mid(AllStr, i, j - i);
} else {
break; // TODO: might not be correct. Was : Exit Do
}
} while (true);
return functionReturnValue;
}
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询