shadowsocks怎么配置用户名密码

shadowsocks怎么配置用户名密码

首先确保工作薄中有至少两个工作表(sheet)，然后ALT F11，新建一个用户窗体，用默认名称：userform1，拖放两个标签控件，两个文本框控件，一个按钮控件。在“ThisWorkbook"上双击，在右边输入如下代码：
Private Sub Workbook_Open()
Sheet1.Visible = xlSheetVeryHidden
UserForm1.Show
End Sub
然后双击按钮控件，输入如下代码：
Private Sub CommandButton1_Click()
If TextBox1.Text = "张三" And TextBox2.Text = "123456" Then
Unload Me
Sheet1.Visible = xlSheetVisible
Sheet1.Activate
Else
MsgBox "请输入正确的用户名和密码！", vbOKOnly vbInformation, "提醒"
TextBox1.SetFocus
End If
End Sub
注意：此处假设用户名为“张三”，密码为“123456"