jiali0208 发表于 2022-11-9 15:43:43

这个vba代码如何用C#表示？

各位老师好，请教如下：
Sub QXBH()
    If MsgBox("                                 ★★★★★特别注意★★★★★" & Chr(10) & Chr(10) & Chr(10) _
            & "☆☆☆取消保护→点击【是】继续，Sorry！不保护→点击【否】返回 ☆☆☆", vbYesNo, "☆欢迎您使用☆ ") = vbYes Then
    Else
      Exit Sub
    End If
    ActiveSheet.Unprotect Password:="123"
End Sub

以上是EXCEL中的VBA代码，如何转换成C#，恳请各位老师帮忙解决下，谢谢！

jackz007 发表于 2022-11-9 18:38:34

      恐怕不只代码翻译这么简单吧，你这个 ActiveSheet 不是把 COM 对象也拖进来了？

jiali0208 发表于 2022-11-9 22:37:07

jackz007 发表于 2022-11-9 18:38
恐怕不只代码翻译这么简单吧，你这个 ActiveSheet 不是把 COM 对象也拖进来了？

Sub QXBH()
    If MsgBox("                                 ★★★★★特别注意★★★★★" & Chr(10) & Chr(10) & Chr(10) _
            & "☆☆☆取消保护→点击【是】继续，Sorry！不保护→点击【否】返回 ☆☆☆", vbYesNo, "☆欢迎您使用☆ ") = vbYes Then
    Else
      Exit Sub
    End If
End Sub

老师，您好！那这一部分可以吗？

jackz007 发表于 2022-11-10 02:16:08

本帖最后由 jackz007 于 2022-11-10 02:17 编辑

using System;
using System.Windows.Forms;
namespace ConsoleApp1
{
    class Program
    {
      static void Main(string[] args)
      {
                if(MessageBox . Show("                     ★★★★★特别注意★★★★★\n\n\n☆☆☆取消保护→点击【是】继续，Sorry！不保护→点击【否】返回 ☆☆☆" ,
                "" , MessageBoxButtons.YesNo) == DialogResult . Yes) MessageBox . Show("您按下了 Yes") ;
                else MessageBox . Show(" 您按下了 No")                                                 ;
      }
    }
}

jiali0208 发表于 2022-11-10 08:47:17

jackz007 发表于 2022-11-10 02:16


非常感谢老师，达到我的要求了，再次感谢！

jiali0208 发表于 2022-11-12 12:03:37

本帖最后由 jiali0208 于 2022-11-12 12:29 编辑

jackz007 发表于 2022-11-10 02:16


老师您好！打扰了，非常感谢！
For Each ws In Worksheets
ws.Protect Password:="123"
Next ws
这个代码帮忙转换成C#啊！再次感谢！
页: [1]
查看完整版本: 这个vba代码如何用C#表示？