vb³ÌÐò£¬sqlµÄa°üº¬BÊÇÔõôдµÄ
¡°³µÁ¾ÅŰࡱ±íÓиö¡°ÈÕÆÚ¡±µÄ×ֶΣ¬ÊÇstring¸ñʽ£¬Ã»ÓÃdate¸ñʽ£¬ÄÚÈÝÈç¡°2009-12-31 12:48:01¡±£¬ÏÖÔÚÒª²éѯÈÕÆÚ×Ö¶ÎÀïÃæ°üº¬¡°2009-12-31¡±µÄÄÚÈÝ,²»ÒªºóÃæ²¿·Ö¡£
select * from ³µÁ¾ÅŰà where ÈÕÆÚ¡¡¡¡
select * from ³µÁ¾ÅŰà where left(ÈÕÆÚ,10)='2009-12-31'
select * from ³µÁ¾ÅŰà where charindex('2009-12-31',ÈÕÆÚ)>0
ÍüÁË˵£¬ÊÇaccessÊý¾Ý¿âŶ£¬ºÃÏñ²»Ö§³Öcharindex
ÓÃlikeÄ£ºý²éѯ¿ÉÄܸüºÃ
SQL code:
Select * from ³µÁ¾ÅŰà Where ÈÕÆÚ Like '2009-12-31%'
access Ö§³Ö mid() ,instr() ,Ò»¸öµÀÀí.
Dim a As String
a = CStr(MonthView1)
Adodc4.RecordSource = "select * from ³µÁ¾ÅŰà where left(ÈÕÆÚ,10)='a'¡°
Adodc4.Refresh
Õâ¸ö±äÁ¿aÔÚsqlÀïÃæÒª¼Óʲô·ûºÅ£¿£¿
ÓÃformat ÊÔÊÔ
SELECT *
from ³µÁ¾ÅŰà where format(×Ö¶Î1,'yyyy-mm-dd') = '2009-12-31';
Ïà¹ØÎÊ´ð£º
Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔÀ´µÄÊýÖµÁË
´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ
´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË
ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£
»Ø¸´ ......
<table style="width: 1000px"><tr>
<td style="height: 38px; width: 35px;">
ÐÕÃû</td>
......
½ñÌì×öÁËÒ»¸ö´æ´¢¹ý³Ì »·¾³ÊÇSQL2000Êý¾Ý¿â
´óÖÂÈçÏÂ
½¨Á¢ÁÙʱ±í
¶¨ÒåÔ±¹¤Óαê
Ñ»·Ô±¹¤£¨ÊôÓÚ1¸ö¹«Ë¾)
......
VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......