重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
在SystemEvents类中 可以 用户试图注销或关闭系统时发生。 (当用户试图注销或关闭系统时发生。当用户试图注销或关闭系统时发生。) 这个 事件处理函数中 可以找到如下方法
创新新互联,凭借10年的成都网站设计、成都网站制作经验,本着真心·诚心服务的企业理念服务于成都中小企业设计网站有上1000+案例。做网站建设,选创新互联。
Private Shared WM_QUERYENDSESSION As Integer = H11
Private Shared systemShutdown As Boolean = False
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
If m.Msg = WM_QUERYENDSESSION Then
'MessageBox.Show("queryendsession: this is a logoff, shutdown, or reboot")
systemShutdown = True
End If
' If this is WM_QUERYENDSESSION, the closing event should be raised in the base WndProc.
MyBase.WndProc(m)
End Sub 'WndProc
Private Sub Form1_Closing(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
If (systemShutdown) Then
' Reset the variable because the user might cancel the shutdown.
systemShutdown = False
If (System.Windows.Forms.DialogResult.Yes = _
MessageBox.Show("My application", "Do you want to save your work before logging off?", MessageBoxButtons.YesNo)) Then
e.Cancel = True
Else
e.Cancel = False
End If
End If
End Sub
在弹出拦截时很多杀毒软件都会有“信任,添加到白名单的选项”。如果没有,可以去设置里找到白名单设置手动把webbrowser的程序添加进去。把整个VB程序目录添加进白名单也可以。
补充:vb无法做到,只有通过加白名单。建议把整个vb文件夹加入白名单
vb.netme.containskey方法
作用是判断Map中是否有所需要的键值,下面是具体的代码:
复制代码
public static void main(String[] args) {
MapString, String map = new HashMapString, String();
map.put("sf2", "111111");
map.put("s3f", "111111");
map.put("s4f", "111111");
map.put("s5f", "111111");
Boolean is = map.containsKey("f2");
if(is){
System.out.println("是有这个值的");
}else{
System.out.println("没有的");
}
For Each MyHtml As HtmlElement In WebBrowser1.Document.GetElementsByTagName("abc")
If MyHtml.GetAttribute("bcd") = "123" Then
For Each MyDel As HtmlElement In WebBrowser1.Document.GetElementsByTagName("p")
MyDel.InnerText = "要换成的内容"
Next
End If
Next