| 查看: 230 | 回复: 1 | |||
| 当前主题已经存档。 | |||
[交流]
【求助】帮忙把vb转成c#
|
|||
|
Sample TextSample Text 求助高手帮忙把这段vb代码转成c#，谢谢了。 Private Function ForewardReason(node As afNode, str As String) Dim strReason As String Dim tt As Integer Dim i As Integer Dim zz As Integer Dim link As afLink Dim strPin As String Dim nodx As afNode Dim VitSeq As Integer Dim VitSeqc As Integer Dim str1 As String Dim LocalForeWardArray() As String str1 = str For Each link In node.InLinks str1 = str If link.Rigid = False Then Set nodx = link.Org If Not nodx Is Nothing Then i = InStr(1, str, nodx.Key) If i = 0 Then If node.Tag = "Sensor" And node.UserData - 1 >= 0 And node.Key <> "" And nodx.Tag = "Sensor" And nodx.Key <> "" And nodx.UserData - 1 >= 0 Then If (PVCurrentBias(nodx.UserData - 1) > 0 And PVCurrentBias(node.UserData - 1) > 0 And link.UserData = 1) Then AbnormalVisited(nodx.UserData - 1) = True link.DrawWidth = 2 zz = InStr(1, str1, "→"  If zz = 0 Then str1 = nodx.Key & "偏高" + "→" + str1 & "偏高" ElseIf zz > 0 Then str1 = nodx.Key & "偏高" + "→" + str1 End If ForewardReason nodx, str1 |
回复此楼» 猜你喜欢
申请科研项目纯靠实力能成功吗？
已经有11人回复
-
40+中年人失业后，还能找到好工作吗？
已经有5人回复
-
极限拉扯，如何抉择
已经有15人回复
-
二审4个多月了还是Awaiting Reviewer Scores
已经有4人回复
-
OpenAI又攻克数学难题了，离AI做有机合成还有多远？
已经有13人回复
-
课题组会帮你通过考核么？
已经有7人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有9人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有10人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有8人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有9人回复
woshilsh
荣誉版主 (职业作家)
- 应助: 43 (小学生)
- 贵宾: 10.33
- 金币: 21115.1
- 散金: 737
- 红花: 22
- 帖子: 3777
- 在线: 639.7小时
- 虫号: 293038
- 注册: 2006-11-04
- 专业: 计算机应用技术
- 管辖: 仿真模拟
2楼2009-07-10 21:57:15
200
