我想创建一个假的运行盒,用来对付技术支持诈骗者,浪费他们的时间。我想让一些指定的文本运行一个msgbox。有没有办法接受所有案件? (记事本,NoTePaD,NOTEPAD等)。
If textbox1.text = "Notepad" Then
Msgbox("Unable to open")
答案 0 :(得分:3)
我对它的所有版本"它的所有版本感到有点困惑。意味着,但以下将忽略空格和大写:
Dim str As String = textbox1.text.ToLower().Replace(" ", "")
If str = "notepad" Then MsgBox("Unable to open")
这是一个VB.Net解决方案,但是在评论中提及Plutonix时,很难说出您正在寻找的解决方案 - 您已经标记了两个不同类型的VB。