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

ÓÃ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ÓëMatlab»ìºÏ±à³Ì

VBÓëMatlab»ìºÏ±à³ÌÓжàÖÖ·½Ê½£¬ÕâÀïÌÖÂÛMatlab½«MÎļþ±àÒë³Écom×é¼þ¹²VBµ÷Óõķ½Ê½¡£
Matlab°æ±¾£ºMatlab 7.7. 0.471 R2008b
VB°æ±¾£ºVB 6.0 & VB 2008
Ê×ÏÈдºÃÍê³Éij¸ö¹¦ÄܵÄmÎļþ£¬±ÈÈçÔÚmÎļþÖÐдÈëÈçϺ¯Êý
function [returns,stderr]=GetReturns(prices)
    returns=price2ret(prices)&nbs ......

ÀûÓÃVB×ÔÖÆOCX¿Ø¼þ

¡¡¡¡Èç½ñOCX¿Ø¼þÔÚ±à³ÌÖÐÒÑÕ¼ÁìÁ˺ÜÖØÒªµÄµØÎ»,ÎÒÃÇ¿ÉÒÔÀûÓÃOCX¿Ø¼þÍê³ÉһЩÏ൱¸´Ôӵıà³Ì²Ù×÷.ͬʱOCX ¿Ø¼þ»¹ÓÐÀûÓÚÖ÷³ÌÐòµÄ¼òµ¥»¯¡¢¹¦ÄܵÄÖØÓá¢Òþ³£³ÌÐòʵÏÖϸ½Ú¡¢±ãÓÚÉý¼¶¡¢´«²¥·½±ãµÈÓŵ㡣ÏÖÔÚÎÒÃÇ¿ÉÒÔÀûÓÃVB 5.0·½±ãµÄÖÆ×÷³ö×Ô¼ºµÄOCX¿Ø¼þ¹©ÎÒÃÇÔÚ±à³ÌÖÐʹÓÃͬʱ»¹¿ÉÒÔ°ÑËüË͸øÄãÖÜΧϲ»¶±à³ÌµÄÅóÓÑ!
ÏÂÃæÁгöÖÆ× ......

ÔÙ̸ÓÃVBÎÞ´°¿Ú͸Ã÷Usercontrol±àд͸Ã÷¸¡¶¯°´Å¥

'* ************************************************************** *
'* ³ÌÐòÃû³Æ£ºButton.ctl
'* ³ÌÐò¹¦ÄÜ£ºÍ¸Ã÷¸¡¶¯°´Å¤
'* ×÷Õߣºlyserver£¬×îºóÐÞ¸ÄÈÕÆÚ£º2009Äê11ÔÂ
'* ÁªÏµ·½Ê½£ºhttp://blog.csdn.net/lyserver
'* ************************************************************ ......

ÈçºÎÓÃVBʵÏÖExcelÎļþµÄ×Ô¶¯ºÏ²¢

¼òµ¥¶øÊµÓõĺϲ¢ExcelÎļþµÄº¯Êý£¬Äܹ»½«¶à¸öXLSÎļþÖÐÖ¸¶¨ÊýÁ¿µÄ¹¤×÷±í×Ô¶¯ºÏ²¢µ½Ò»¸öXLSÎļþÀï¡£µ±È»£¬Èç¹ûÖ»ÊÇÊý¾ÝºÏ²¢£¬ÔòʹÓÃADO¾Í¿ÉÒÔʵÏÖ£¬µ«Èç¹ûÒª±£Áô±í¸ñ¸ñʽ£¬Ôò¿ÖÅÂÖ»ÄÜʹÓð³µÄ·½·¨ÁË¡£
    Ò»¡¢º¯Êý´úÂ룺
Option Explicit
'* ********************************************************* ......

´¿VBÕæÕýʵÏÖÎȶ¨µÄNT·þÎñ

'* ************************************************************** *
'* ³ÌÐòÃû³Æ£ºmodNtSrv
'* ³ÌÐò¹¦ÄÜ£ºÊµÏÖNT·þÎñ
'* ×÷Õߣºlyserver
'* ÁªÏµ·½Ê½£ºhttp://blog.csdn.net/lyserver
'* ************************************************************** *
Option Explicit
' ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ