vbÆæ¹ÖµÄÎÊÌâ
vbÀï²»ÊÇvb.netÀï
vbÆæ¹ÖµÄÎÊÌ⣺
A%=12.8
B%=14.5
Print A%,B%
´ð°¸ÔõôÊÇ13 14 B%ÔõôûËÄÉáÎåÈë°¡£¿
¿´Ð§¹ûÓ¦¸ÃÊÇÈ¡×î½üÕûÊýµÄ·½·¨
B%=14.5
4»»³ÉÆæÊý¾Í½øλÁË£¬ËƺõÒ²ÊÇ·ûºÏ¡°ËÄÉáÁùÈëÎå³ÉË«¡±¡£
BankerÉáÈ룬¶ø²»ÊÇÎÒÃÇÏ°¹ßµÄËãÊõÉáÈ루ËÄÉáÎåÈ룩¡£
²Î¿¼£ºhttp://blog.sina.com.cn/s/blog_4cbb97be010008o9.html
ËÄÉáÁùÈëÎå³ÉË«,¼ÆËã»úͨÓõÄÔÔò,ÒòΪ"0"ºÍ"1"
Äã¿ÉÒÔÓÃÒÔÏ·½Ê½×öµ½£¨ËÄÉáÎåÈ룩¡£
A%=int(12.8+0.5)
B%=int(14.5 +0.5)
C%=int(10.1 +0.5)
½øÀ´Ñ§Ï°ÁË¡£¡£¡£
Ïà¹ØÎÊ´ð£º
Çë½ÌһϣºÎÒÓÃvbдÁËÒ»¸öµ÷ÓÃIllustratorµÄ²âÊÔ³ÌÐò£¬´úÂëºÜ¼òµ¥£ºPrivate Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ?
°´Ctrl+F5Ô¤±àÒ룬³ö´íʱ»áÌøתµ½´íÎóÐÐ
²»ÊÇÄÇÑùµÄÁË,ÎÒÊÇÒªÇó±àÒë³ÉEXEºóÔËÐÐ,Ìáʾ³ö´íÄÜ·ñÌáʾ´íÔÚÄÄÒ»ÐÐ.
ÎÒ±àÒëºóÔÚÎҵĵçÄÔÉÏÔËÐÐûÎÊÌâ,µ«Ô ......
vb½«winsock¿Ø¼þ·â×°µ½dllÎÊÌâ ÓÐʲôºÃµÄ˼·£¿ Èç¹ûÓÃSocket APIÄØ£¿
ÀýÈ磬ÏñÏÂÃæÕâÑù·â×°Winsock¿Ø¼þ£¬ÐеÄͨ£¿
´´½¨ActiveX dll£¬Ìí¼Ó´°ÌåfrmClient£¬¼ÓÈëWinSock¿Ø¼þwskClient¡£
Àà´úÂ룺
Option Expli ......
Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else
......