    VBʵֵMSNϢȺ           ҳ  ѧԺ       缼  ͼͼ  ϵͳ  ָ    칫  ý嶯  վӪ  ֤  ҳ    web    Ϸ  QQ      ǰλã   򿪷  VB  VBʵֵMSNϢȺ     VBʵֵMSNϢȺ ڣ200767 ߣ 鿴:[     С ]       
'ɹϢ 

If MsgBox("!ǷϢ?", vbInformation + vbYesNo, "ʾ") = vbYes Then 

Text1.Text = "" 

Text1.SetFocus 

Else 

Text1.SetFocus 

End If 

End Sub 

Private Sub Command2_Click() 

Unload Me 

End 

End Sub 

'ʼؼ 

Private Sub Form_Load() 

Dim i As Integer 

'ʼͶ 

Set m_Groups = m_MSG.MyGroups 

With Combo1 

.AddItem "ȫ" 

For i = 0 To m_Groups.Count - 1 

Set m_Group = m_Groups.Item(i) 

.AddItem m_Group.Name 

Next i 

.ListIndex = 0 

End With 

End Sub 


'ͷű 

Private Sub Form_Unload(Cancel As Integer) 

Set m_MSG = Nothing 

Set m_Groups = Nothing 

Set m_Group = Nothing 

Set m_Contracts = Nothing 

Set m_Contract = Nothing 

End Sub 


岽С ѡļ˵ɡ1.exe˵һMSNϢȺˡexe£ 
 
 
    һҳ   [1]   [2]   [3]      Ʊҳַͱ⣬͸QQ/Msnĺһ 
 
   VBʵֵMSNϢȺ £   VBʵֵMSNϢȺ  VBʵֵMSNϢȺ   
һƪ: VB ʵú  
һƪ: VBʮֿһдɵļ  رվرֹתصר¿תأעԭʼ  .°Ȩԭʼ.ڱվתµĸ˺վǱʾл⡣վת  صаȨϵ༭Ա,ǾԸ. תעԴhttp://www.hackhome.com     ƷƼ  
 ȵTOP10    VB+Accessͼϵͳ    VBʱͱܵ    ؼС洰С仯仯    VBѧ±ܼӴ    VBʹDirectXļ̳    VBݿԴ60ʵ    VBʹEXCEL    180VBͼνԴʵ    API޸עģ    VB쳬Ի˵    ͨſؼMSCommʹ    WINDOWSϢ˵    16תʮ, 16תɶƵ    vsprintӡʵ    webbrowser 2ղأ    VB6DataGridʵͨõӱ    FindWindow    VB6.0ͼ    VB̳ ڶ£ؼѧϰ    VB֮·ý     رƼ    ǳVB.Net Windows Form    ׹Ʊ˰ʼ    VisualBasic 6еĺִ    Զȡû½ƣٽ֤    APIָĿ¼ļ    VBݿԴ60ʵ    VBIEԶ尴ť    VBMS OfficeCOM    Visual Basicװ    WebComputingADOܽᱨ    vsprintӡʵ    VBʵһ򵥵ESMTPͻ    webbrowser 2ղأ    SetForegroundWindow    API޸עģ    VB쳬Ի˵    WINDOWSϢ˵    ؼС洰С仯仯    VBʱͱܵ         | () | Ȩ |  | Ϣ   Copyright 2003-2007  All Rights Reserved.  ICP05018371       