vb³õѧÕßÇó½ÌVBÁ·Ï°Ìâ
µÚÒ»Ì⣺ ʵÏÖ°´Å¥µÄÒþ²ØºÍ²»¿ÉÓÃ
µÚ¶þÌ⣺ʵÏÖ×Ö·ûµÄÆ¥Åä
µÚÈýÌ⣺ ʵÏÖÊýÖµµÄ¼Ó¼õ³Ë³ý,
µÚËÄÌâ¡¢µ±Æô¶¯´°Ìåʱ£¬´°Ìå±³¾°É«ÎªÀ¶É«£¬²¢ÇÒÔÚ´°ÌåÉÏÒÆ¶¯Êó±êʱ£¬´òÓ¡ºìÉ«µÄ¡±ºÃºÃѧϰ£¬ÌìÌìÏòÉÏ¡±
µÚÎåÌâ¡¢×Ô¶¯Ëæ»ú²úÉúÁ½¸öÊý£¬·¶Î§50~150,µ±Á½ÕßÖ®ºÏΪ200ʱ£¬Í£Ö¹²úÉúËæ»úÊý¡£½«½á¹ûÏÔʾÔÚµÚÈý¸öÎı¾¿òÖÐ
×Ô¼ºÊÔ×Å×ö£¬²»»áµÄÔÙÎÊ
LJÌû..............
Âí¼Ð£¿
you need to try that.
µÚÒ»Ì⣺ ʵÏÖ°´Å¥µÄ
Òþ²Ø Command1.Value=False
²»¿ÉÓà Command1.Enabled = False
µÚ¶þÌ⣺ʵÏÖ×Ö·ûµÄÆ¥Åä
Dim s1 As String, s2 As String
If intstr(1, s1, s2) > 0 Then
MsgBox s1 & "º¬ÓÐ" & s2
Else
MsgBox "²»Æ¥Åä"
End If
µÚÈýÌ⣺ ʵÏÖÊýÖµµÄ¼Ó¼õ³Ë³ý,
i=a+1
i=a-1
i=a*1
i=a / 1
µÚËÄÌâ¡¢µ±Æô¶¯´°Ìåʱ£¬´°Ìå±³¾°É«ÎªÀ¶É«£¬²¢ÇÒÔÚ´°ÌåÉÏÒÆ¶¯Êó±êʱ£¬´òÓ¡ºìÉ«µÄ¡±ºÃºÃѧϰ£¬ÌìÌìÏòÉÏ¡±
Private Sub Form_Load()
Me.BackColor = vbBlue
Me.ForeColor = vbRed
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
 
Ïà¹ØÎÊ´ð£º
ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿ØÂ¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓÆµ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£
ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ,
È»ºó¾ÍÖ±½ÓÓúÃÁË.
²»¹ý,Èç ......
ÎÒÓÃDelphiдÁËÒ»¸öDLL, DLLÀïÓÐMDIµÄ×Ó´°Ìå,DLL³õʼ»¯Ê± ´«µÝµ÷ÓÃÕßµÄTApplication¸øDLL, ÔÚDelphi7Öе÷ÓÃÒѾͨ¹ý,µ«ÊDz»ÖªµÀÔÚVBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ, ÊÇ·ñÄÜÔÚVBÖе÷ÓÃ?
ÄãºÃ£¬ÓÃinstance²»ÊǾͿÉÒÔÁË ......
±ÈÈç½ø³Ì¼ÓÔØÐµijÌÐò¡£
ÔÚÆäÔËÐÐ֮ǰ×èÖ¹¡£
È»ºóÔÊÐíºó·ÅÐС£
±ÈÈç³ÌÐòÖ÷Îļþ·¾¶ÊÇc:\test\test.exe£¬½¨Á¢ÄÚÈÝÈÎÒâµÄÎļþc:\test\test.exe.manifest¡£
¾ÍÊDz»ÖªµÀ³ÌÐòÎļþ·¾¶¡£
ÉèÖ ......
VBżѧµÃ²»´í£¬ÏÖÔÚ´óÒ»£¬¸ßÈýµÄʱºò¾ÍѧVBÁË£¬ÏÖÔÚѧУÀï¶¼ÊÇѧC#ºÍVB.NETµÄÐֵܶࡣ¡£¡£
żҪתÐÐVB.NETÁË~µ±ÄêѧVBѧÁË2Ä꣬¶ÔVBÀïÃæµÄ³£Óú¯Êý¶¼Ê®·ÖÁ˽⡣
Select¡¢If½á¹¹¡¢For NextÑ»·¡¢µÈ¶¼Á˽⡣¡£¡£ ......
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
......