Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VBʵÀý —ÍòÄêÀú (3)

Ô­À´µÄ´íÎóÊÇ£ºTimer1µÄEnabledÊôÐÔÉèΪTrue¡£
´úÂë´íÎóÊÇ£º
Private Sub Timer1_Timer()
Dim c As Date
    c = Time
    lbl3.Caption = CStr(c)
End Sub
————————————————————
Private Sub cmd1_Click()
    Dim a, b
        b = Val(txt1.Text)
        a = Weekday(b)
    Select Case a
        Case 1
            lbl2.Caption = "ÐÇÆÚÈÕ"
        Case 2
            lbl2.Caption = "ÐÇÆÚÒ»"
        Case 3
            lbl2.Caption = "ÐÇÆÚ¶þ"
        Case 4
            lbl2.Caption = "ÐÇÆÚÈý"
        Case 5
            lbl2.Caption = "ÐÇÆÚËÄ"
        Case 6
            lbl2.Caption = "ÐÇÆÚÎå"
        Case 7
            lbl2.Caption = "ÐÇÆÚÁù"
    End Select
End Sub
´íÎóЧ¹ûÊÇ£º´ò¿ª´°Ì壬¼´ÏÔʾ£º
 
 
 
 
 
 
 ÎÞÊäÈë»òÊäÈë´íÎó¸ñʽ£¬µã»÷cmd1£¬ÓдíÎóÏÔʾ£º
 
 
 
 
 
 
 
 ÊäÈëÕýÈ·¸ñʽµÄÄêÔÂÈÕ£¬ÏÔʾÕýÈ·µÄÐÇÆÚ£º
 
 
 
 
 
 
 
 ÐèÉîÈëÀí½âµÄ֪ʶµãÊÇ£º
1¡¢Exit µÄʹÓá£
2¡¢MsgBoxµÄʹÓ÷½·¨¡£


Ïà¹ØÎĵµ£º

VB¿Ø¼þºÍ¶ÔÏó£ºApp ¶ÔÏó

App ¶ÔÏóÊÇVBÓ¦ÓóÌÐòµÄÈ«¾ÖÐÅÏ¢£¬ÈçÓ¦ÓóÌÐòµÄ±êÌâ¡¢°æ±¾ÐÅÏ¢¡¢¿ÉÖ´ÐÐÎļþºÍ°ïÖúÎļþµÄ·¾¶¼°Ãû³ÆÒÔ¼°ÊÇ·ñÔËÐÐǰһ¸öÓ¦ÓóÌÐòµÄʾÀý¡£
ÊôÐÔ
    £­£­£­£­£­£­£­ ÆäËûÊôÐÔ£­£­£­£­£­£­£­£­£­£­£­£­£­£­£­£­£­
    EXEName ÊôÐÔ      ·µ»Øµ±Ç°ÕýÔËÐеĿÉÖ´ÐÐÎļþ ......

asp.net,c#,vb,vbs,js¸÷¸öÓïÑÔµÄÓÊÏä·¢ËÍÔ´´úÂë

·¢ËͶËÒÔ163ΪÀý
Ò»¡¢asp.net°æ   using System.Web.Mail; //ÃüÃû¿Õ¼äÒýÓà
c#
        MailMessage mail = new MailMessage();
        mail.To = "shadow103@qq.com";  //½ÓÊÜÈ˵ÄÓÊÏä
     & ......

vb±ê×¼£¨Ò»£©£ºÓû§½çÃæµÄÉè¼Æ

·½çÃæÉè¼Æ±ØÐë±£³ÖÒ»ÖÂ
·Á½¸ö³ÌÐòÖ®¼äµÄÌØÐԾ߱¸¹²ÐÔ
·ºÍwindowsÓ¦ÓóÌÐòµÄ¿ì½Ý¼üÊÇÒ»ÖµÄ
·±à³ÌÔ­Ôò
    ·Îª´°Ì帳ÓèͳһµÄÍâ¹ÛºÍÐÐÎªÌØÐÔ
         ·Èç¹û´°ÌåµÄ´óС¸Ä±äʱ£¬Ëü²»¸Ä±äÆäÄÚÈݵĴóС£¬ÄÇô±ß¿ò¾Í²»Ó ......

vb±ê×¼£¨¶þ£©£º´úÂëµÄ×¢ÊÍ

·×¢ÊÍÄÜʹעÊÍÄÜʹ´úÂë¸ü¼ÓÈÝÒ×Àí½â£¬¸ü¼ÓÈÝÒ׸ú×Ù¡£
·³öÉ«µÄ×¢Ê;ÍÏñÒ»·ùºÃµÄÉè¼ÆÀ¶Í¼£¬Äܹ»Òýµ¼ÔĶÁÕßͨ¹ýÄãµÄÓ¦ÓóÌÐòµÄÇúÕÛÖ®´¦£¬Äܹ»ËµÃ÷Ô¤ÆÚµÄÔËÐнá¹ûºÍ¿ÉÄܳöÏÖµÄÒì³£Çé¿ö¡£
·±à³ÌÔ­Ôò
   ·ÓÃÎÄ×Ö˵Ã÷´úÂëµÄ×÷ÓÃ
      ·±àд·Ç³£³öÉ«µÄ ......

VB ²ÜʦÐÖÃæÊÔ ¼ÍÂÉÓëѧϰ

¹ØÓÚ²ÜʦÐÖÕÒ¹¤×÷£º
ÔÚÕÒ¹¤×÷¹ý³ÌÖУº
1¡¢ ¹Û²ìÁ¦¡£ÃæÊÔʱ¿´¼ûÖÐÄÏÈÚͨµÄºá·ù“×îС»¯ÄãºÍ¿Í»§µÄ¾àÀ룬×î´ó»¯ÄãºÍ¿Í»§µÄÀûÒæ”£¬Ë³¶øºÍÃæÊÔ¹ÙÌÖÂÛËûÃǹ«Ë¾µÄÎÄ»¯ºÍÀíÄ»á¶ÔÄãӦƸÓкܴó°ïÖú¡£ÕÒ¹¤×÷ʱµÄ±ÊÊÔ»ù´¡¶¼²î²»¶à£¬ÖØÒªµÄÊǺÍÀÏ×ܵÄÃæÊÔ£¬¹«Ë¾¸ü×¢ÖØµÄÊÇÄãÊÇÈçºÎ×öÈ˵ĺÍÄã¶ÔÒµÎñµÄÀí½â¡£ËùÒÔ£¬ÔÚÒÔºó ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ