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

Ò»¸öVBÎÊÌâ - VB / »ù´¡Àà

Private Sub Command1_Click()
  '½«Îı¾¿òÖеÄÐÅÏ¢Ìí¼Óµ½Áбí¿òÖÐ
  Dim i As Integer
  With ListView1.ListItems.Add()
  .text = Text1(0)
  For i = 1 To 4
  .SubItems(i) = Text1(i)
  Next i
  End With
  End Sub

listviewµÄÎÊÌ⣬  
  .text = Text1(0)
  For i = 1 To 4
  .SubItems(i) = Text1(i)
ΪʲôҪÕâÑùд£¿I²»ÄÜ´Ó0¿ªÊ¼Âð£¿ÁíÍâ.textÔÚÕâ±íʾʲô£¿ÊÇlistviewµÄµÚÒ»ÁÐÂð£¿ÎªÊ²Ã´£¿

xiexie

ListView1.ListItemsÊÇÒ»¸ö¼¯ºÏ,text¾ÍÊÇÕâ¸ö¼¯ºÏÿһ¸öÔªËØµÄÎı¾,ʵ¼Ê¾ÍÊǵÚÒ»ÁеÄÎı¾,ListView1ÖÐÁбíÍ·¼¯ºÏ,ÏîÄ¿¼¯ºÏ,ÏîÄ¿×ÓÏºÏµÄµÚÒ»ÏîµÄË÷Òý¶¼ÊÇ1


Ïà¹ØÎÊ´ð£º

¹ØÓÚ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²Ù×÷excel - VB / »ù´¡Àà

ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
  A 3
  A 4
  B 6
  ... ......

ÇóÖú£ºC´úÂë¸Äд³ÉVB´úÂë - VB / »ù´¡Àà

Ë­ÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......

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

ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó­¸÷λ´óÏÀ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ