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

vb¶ÁÈ¡excelÊý¾ÝÈ¥µô¿ÕÐÐ - VB / ÍøÂç±à³Ì

¸÷λ´ó¸ç´ó½ãÃÇ£¬ÎÒÓöµ½Ò»¸öСÂé·³£¬ÔÚÍøÉÏÕÒÁ˺ܾÃҲûÓиöÈ·ÇеĴ𰸣¬¾ÍÏëÎÊÎÊ´ó¼Ò£¬ÎÒÓÃadodbÁ´½Óexcel£¬¶ÁÈ¡³öexcelµÄÊý¾Ý·ÅÔÚdatasetÀ°ÑdatasetµÄÖµÖ±½Ó°ó¶¨µ½´°ÌåÉϵÄdataGridÁË£¬µ«ÊÇexecelÉÏÃæÓÐÊý¾Ý£¬ÏÂÃæÓкܶà¿ÕµÄÐУ¬Ò»Æð¶Áµ½ÁËdataGridÉÏÁË£¬ÎÒÏëÎÊ£¬Ôõô°ÑÕâЩ¿ÕÐÐÔÚ³ÌÐòÀïÈ¥µô£¿

ºÜ¶à¿ÕÐÐÊDz»ÊÇÄãÇùý»Ø³µµÄ?



excelµÚÒ»ÁÐÊÇ¿ÉÒÔΪ¿ÕµÄ£¬Ó¦¸ÃÅжϵÚËÄÁÐD²»Îª¿Õ£¬µÚËÄÁÐÊDz»ÔÊÐíΪ¿ÕµÄ£¬·ñÔò¾ÍÊÇÕû¸öÐж¼Êǿյ쬵ÚËÄÁÐÔõô±íʾ£¿ÎÒ¶ÔvbÁ˽âÌ«ÉÙ£¬Ï£ÍûÖ¸µãÖ¸µãÃÔ½ò°¡£¡

µÃµ½rsºó£¬±éÀúÇá¿Õ¿Õ¸ñ£¬ÔÙ¸½¸ødatagrid

ÎÒ¾õµÃÊÇ¿ÉÒÔÔÚµ¼ÈëµÄʱºòдsqlÓï¾ä£¬¸ù¾ÝwhereÌõ¼þºóÃæµÄɸѡµÄ£¬µÚËÄÐÐÒªÔõÑù´úÌæ£¿Ïñ£º
Select * from [Sheet1$] where f1<>NULL
Èç¹ûÊÇÅжϵÚËÄÐÐÊÇ·ñΪ¿ÕÔõôдwhereºóÃæµÄ


ÓÃÕâ¸ö xlExcel.ActiveSheet.UsedRange.Rows.Count È·¶¨EXCEL±í¸ñÖÐÊý¾ÝµÄÐÐÊý¡£

ÒýÓÃ

ÎÒ¾õµÃÊÇ¿ÉÒÔÔÚµ¼ÈëµÄʱºòдsqlÓï¾ä£¬¸ù¾ÝwhereÌõ¼þºóÃæµÄɸѡµÄ£¬µÚËÄÐÐÒªÔõÑù´úÌæ£¿Ïñ£º
Select * from [Sheet1$] where f1<>NULL
Èç¹ûÊÇÅжϵÚËÄÐÐÊÇ·ñΪ¿ÕÔõôдwhereºóÃæµÄ


f4<>NULL

f1 f2 f3 ...fNÄãÓжàÉÙÁÐN


°ïæ¶¥Ò»ÏÂà¶

ÕâÑùд»áÓдíÎóµÄ£ºSELECT * from [Sheet1$] where f4<>NULL ´íÎó£ºÊý¾Ýµ¼Èëʧ°Ü£¬ÖÁÉÙÓÐÒ»¸ö²ÎÊýûÓб»Ö¸¶¨Öµ¡£Ôõô»ØÊ£¿

½â¾öÁË£¬ºÇºÇ£¬Ð»Ð»´ó¼Ò£¡Ã¿¸öÈ˶¼·Öµã·Ö°É£¡


Ïà¹ØÎÊ´ð£º

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb - VB / »ù´¡Àà

ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£©
¾¹È»²»ÊÇzero¡£

²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»°

Õâ¸öÖ»ÄܶÁÎı¾,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......

vb - VB / »ù´¡Àà

xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£

hÊÇxml¸ñʽµÄ×Ö·û´®

ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿

ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......

ÇóÖú£ºC´úÂëchange toVB´úÂë - VB / »ù´¡Àà

ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó­¸÷λ´óÏÀ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......

VBÈçºÎ»ñµÃ±ðµÄ³ÌÐòÉϵıí¸ñÄÚÈÝ£¿ - VB / API

ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£
±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£

ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿
244326867@qq.com ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ