[已解决]这个vba代码如何用C#表示？

jiali0208

各位老师好，请教如下：
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-10 02:16:08

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")                                                 ;
        }
    }
}

跳转到最佳答案楼层

jackz007

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

jiali0208

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

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

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

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

jiali0208

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

老师您好！打扰了，非常感谢！
For Each ws In Worksheets
ws.Protect Password:="123"
Next ws
这个代码帮忙转换成C#啊！再次感谢！