ÓÃvbʵÏÖ¼ÆËã»ú¹¦ÄÜ
±¨¸æÊé
Ãû³Æ
ʵÑé10-1 ʵÏÖ¼ÆËãÆ÷µÄ¹¦ÄÜ
ÐÕÃû
Ö¸µ¼½Ìʦ
ѧºÅ
ÈÕÆÚ
ÈÎÎñÇåµ¥
ÔÚ±¾Á·Ï°ÖУ¬Ä㽫ʹ»æÖƵļÆËãÆ÷Íê³É¼òµ¥µÄËÄÔòÔËËã¡£
1) Æô¶¯Visual Studio 2005¡£
2) н¨Ò»¸öVB WindowsÓ¦ÓóÌÐò£¬ÔÚÃû³Æ´¦ÊäÈë“Calculator”,ÔÚλÖô¦Ñ¡Ôñ³ÌÐò´æ·ÅµØÖ·£¬µã»÷È·¶¨¡£
3) ÍÏ×§ÏàÓ¦µÄTextBox¿Ø¼þºÍButton¿Ø¼þµ½´°ÌåÉè¼ÆÆ÷ÖУ¬»æÖƳöÒ»¸ö¼ÆËãÆ÷µÄ½çÃæ
4) תµ½´úÂëÉè¼ÆÆ÷£¬ÔÚButtonµÄClickʼþÖÐÌí¼ÓÈçÏ´úÂ룬ÒÔʵÏÖ¼òµ¥µÄËÄÔòÔËË㹦ÄÜ
5) ÔËÐгÌÐò£º[µ÷ÊÔ]—>[Æô¶¯µ÷ÊÔ]£¬½øÈë½çÃæ
6) µã»÷°´Å¥À´²âÊÔÄãµÄ¼ÆËãÆ÷
7) ¹Ø±Õ³ÌÐò
8) ³ÌÐòµÄÔËÐнØÍ¼ÈçÏÂËùʾ£º
9£© ²Î¿¼´úÂ룺
Public Class Calculator
Dim a, b As Double
Dim strCalKind As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text += Button1.Text
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox1.Text += Button2.Text
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
TextBox1.Text += Button3.Text
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
TextBox1.Text += Button4.Text
E
Ïà¹ØÎĵµ£º
Ò»¡¢ VB¶ÁдEXCEL±í£º
¡¡¡¡VB±¾ÉíÌá×Ô¶¯»¯¹¦ÄÜ¿ÉÒÔ¶ÁдEXCEL±í£¬Æä·½·¨ÈçÏ£º
¡¡¡¡1¡¢ÔÚ¹¤³ÌÖÐÒýÓÃMicrosoft ExcelÀàÐͿ⣺
¡¡¡¡´Ó"¹¤³Ì"²Ëµ¥ÖÐÑ¡Ôñ"ÒýÓÃ"À¸£»Ñ¡ÔñMicrosoft Excel 9.0 Object Library£¨EXCEL2000£©£¬È»ºóÑ¡Ôñ"È·¶¨"¡£±íʾÔÚ¹¤³ÌÖÐÒªÒýÓÃEXCELÀàÐͿ⡣
¡¡¡¡2¡¢ÔÚͨÓöÔÏó ......
ÖØÊ°VBÖ®Èý£¬¶þ½øÖÆÎļþƪ
PMP ¹Ø¾¢ËÉ
¹íʹÉñ²î£¬09Äê12ÔÂÈëÖ°µÄ¹«Ë¾ÈÔʹÓÃVB¿ª·¢Èí¼þ£¬ËäÈ»²¢·Çרְ¿ª·¢£¬µ«Ò²²»µÃ²»ÔÚʸô4ÄêÖ®ºó£¬ÖØÐÂʹÓÃVB¡£
¶ÁÈ¡¡¢Ð޸Ķþ½øÖÆÎļþÈÔÊǴ󲿷ֱà³ÌÓïÑԵĻù±¾¿ª·¢¼¼ÄÜ¡£¿ÉÒÔÌá¸ß´¦ÀíÎļþЧÂÊ£¬Ö÷ÒªÓ¦ÓÃÔÚͨÐÅ¡¢½»»»Êý¾ÝµÈ·½Ãæ¡£
'open filena ......
'* ************************************************************** *
'* ³ÌÐòÃû³Æ£ºmodNtSrv
'* ³ÌÐò¹¦ÄÜ£ºÊµÏÖNT·þÎñ
'* ×÷Õߣºlyserver
'* ÁªÏµ·½Ê½£ºhttp://blog.csdn.net/lyserver
'* ************************************************************** *
Option Explicit
' ......
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
cn.Open "Provider=OraOLEDB.Oracle.1;Persist Security Info= ......
ÌâÄ¿£ºÒ»¼ÒСÐͺ½¿Õ¹«Ë¾¸Õ¸Õ¹ºÂòÁËһ̨¼ÆËã»ú£¬ÒÔʹÓÃеĻúƱ×Ô¶¯Ô¤¶©ÏµÍ³£¬Õâ¼Ò¹«Ë¾ÒªÇóÎÒÃÇ¿ª·¢Õâ¸öÐÂϵͳ¡£ÎÒÃÇÐèÒª±àдһ¸öÓ¦ÓóÌÐò£¬¶ÔÕâ¼Òº½¿Õ¹«Ë¾Î¨Ò»µÄÒ»¼Ü·É»ú£¨ÈÝÁ¿Îª10¸ö×ù룩µÄÿ¸öº½°à·ÖÅä×ùλ¡£Õâ¸öÓ¦ÓóÌÐòÓ¦¸ÃÊäÈëÏÂÃæÕâЩѡÏÇëÊäÈë1Ñ¡ÔñÍ·µÈ²ÕºÍÇëÊäÈë2Ñ¡Ôñ¾¼Ã²Õ¡£Èç¹ûÓû§ÊäÈë1£¬Ó¦ÓóÌÐòÓ¦¸Ã·ÖÅäÒ ......