vb ¼òµ¥ÎÊÌ⣬Çë¸ßÊÖ°ïæ,ÔÚÏߣ¡£¡£¡ - VB / »ù´¡Àà
vb textÎı¾¿òµ±°´Ò»Ï»سµÊ±ÎªÎı¾¿òÎÞ·¨±à¼ÔÙ°´Ò»ÏÂÓÖ¿ÉÒԱ༣¿
²¹³äÎÊÌ⣬ÈçºÎʹ½¹µãÒ»Ö±±£³ÖÔÚÎı¾¿òÉÏ£¿
VB code:
Option Explicit
Private Sub Form_Load()
Timer1.Interval = 50
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Static i As Long
If KeyCode = vbKeyReturn Then
If i Mod 2 = 0 Then
Text1.Locked = True
i = i + 1
Else
Text1.Locked = False
i = i + 1
End If
End If
End Sub
Private Sub Timer1_Timer()
Text1.SetFocus
End Sub
Å££¡£¡
¶Ôһ¥´úÂ뾫¼òÒ»ÏÂ
VB code:
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then
Text1.Locked = Not Text1.Locked
End If
End Sub
¶¥......
Ïà¹ØÎÊ´ð£º
DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.
datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......
ËÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......
ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£
±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£
ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿
244326867@qq.com ......
Çó¸övbÖеÄsqlÓï¾äµÄд·¨£¬´ÎsqlÓï¾äµÄÓ÷¨ÊÇ·ÖÒ³³ÌÐò
ÎÒдµÄÈçÏ£ºÆäÖÐAÊÇÓÃÀ´½ÓÊÕÿҳÏÔʾµÄ¼Ç¼µÄÌõÊý£¬BÊÇÓÃÀ´½ÓÊÕÏÔʾµÄµ±Ç°µÄÒ³Ãæ.
sqltext="select top A * from log where id not in(select top ( ......
СµÜÓÃVBµ÷EXCEL×÷ͼ
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......