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

vb MSFlexGrid1.Row ʵʱ´íÎó'30009'RowÊýÖµÎÞЧ

´úÂëÈçÏ£º
Private Sub MSFlexGrid1_SelChange()
  If MSFlexGrid1.Rows = 1 Then Exit Sub
  If MSFlexGrid1.Row = 0 Then Exit Sub
 
  grid_row = MSFlexGrid1.Row
  grid_col = MSFlexGrid1.Col


  MSFlexGrid1.Row = grid_row_old 
  MSFlexGrid1.Col = 0
  Set MSFlexGrid1.CellPicture = LoadPicture()
  MSFlexGrid1.Row = grid_row
  MSFlexGrid1.Col = 0
  Set MSFlexGrid1.CellPicture = LoadPicture("c:\gddmt\p0.bmp") 'ICO")
  MSFlexGrid1.Col = grid_col
  grid_row_old = MSFlexGrid1.Row

End Sub
ºìÉ«µÄΪ±¨´íµÄ ³ÌÐòҪʵÏÖµÄÊDzéѯºóÏÔʾÔÚMSFlexGrid1 µ±Ã»ÓÐÌõ¼þ²éѯºóÏÔʾÔÚMSFlexGrid1
È»ºóÔÙÓÐÌõ¼þ²éѯÏÔʾ ÏÔʾºóµã»÷MSFlexGrid1ÀïÃæµÄÖµ¾Í»á±¨  ¡°ÊµÊ±´íÎó'30009'RowÊýÖµÎÞЧ¡±
Çó¸÷λ°ï¸öæ
¿´Ò»Ï±¨¾¯Ê±grid_row_oldµÄÖµ£¬Êó±êÖ¸ÔÚÆäÉϾͿÉÒÔ¿´µ½

grid_row_oldµÄÖµÊǵÚÒ»´ÎÎÞÌõ¼þ²éѯʱµÄrowÖµ

ʵ¼Ê¿´£¬ÄãµÄ´úÂëÈç¹ûÓÐÎÊÌ⣬Õâ¸öÖµ¿ÉÄÜ¿ÉÄãÏëµÄ²»Ò»Ñù£¬¿´ÊÇ·ñ·Ç·¨£¬»ò´óÓÚ×ÜÐÐÊý

Éè¼Æ´íÎó¡£
ÖØÐ²éѯºóÐÐÊý±ä»¯£¬¾Í²»ÄÜʹÓþɵÄÐкš£


Á½´Î²éѯµÄ½á¹û²»Ò»Ñù£¬¼Ç¼ÌõÊýÒ²²»Ò»Ñù¡£
LZµÄ´úÂëÖ»ÄÜÕë¶Ôͬһ´Î²éѯµÄ¡£

VB code:
'×¢Òâ,grid_row_oldÐèÒªÔÚÄãµÄ²éѯ±ä»¯µÄʱºòÖØÖÃÒ»ÏÂ,±ÈÈ縳Ö


Ïà¹ØÎÊ´ð£º

vb - VB / »ù´¡Àà

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

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

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

vb - VB / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......

vb - VB / »ù´¡Àà

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

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

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

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

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

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

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