vb²ÎÊý´«µÝ£¡ - VB / »ù´¡Àà
Public a As String
Private Sub Command1_Click()
a = Text1.Text
End Sub
ÀýÈç text1ÖÐÊäÈë 127.0.0.1 xxx.xxx.xxx.xxx
Private Sub Form_Load()
Adodc1.ConnectionString = "provider=sqloledb; data source=xxx.xxx.xxx.xxx;initial catalog=student1;user id=sa;password=sa;"
Adodc1.RecordSource = "student1"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
End Sub
data source=ÔõôÏÔʾtext1.textÄÚÈÝ...
ÄÜÔÚ¾ÖÓòÍøÄÚÁ¬½ÓÉÏ...
data source=text1.text,
ǰÌáÊÇtext1.textÓÐÖµ£¬²»È»µÄ»°ÄãµÄ²ÎÊý´«²»½øÈ¥µÄ£¬½¨ÒéÄã°Ñ³õʼµÄtext1.textдÔÚÊý¾Ý¿âÖУ¬ÕâÑù¿ÉÒԸ͝¡£
лÁË ~
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
ËÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......
ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó¸÷λ´óÏÀ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
Çó¸övbÖеÄsqlÓï¾äµÄд·¨£¬´ÎsqlÓï¾äµÄÓ÷¨ÊÇ·ÖÒ³³ÌÐò
ÎÒдµÄÈçÏ£ºÆäÖÐAÊÇÓÃÀ´½ÓÊÕÿҳÏÔʾµÄ¼Ç¼µÄÌõÊý£¬BÊÇÓÃÀ´½ÓÊÕÏÔʾµÄµ±Ç°µÄÒ³Ãæ.
sqltext="select top A * from log where id not in(select top ( ......