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

Çó½ÌÒ»¸övbµÄÓï·¨ÎÊÌâ - VB / »ù´¡Àà

Çó½ÌÒ»¸övbµÄÓï·¨ÎÊÌ⣺ÏÂÃæÊÇÒ»¸öÑéÖ¤Óû§ÃÜÂëµÄº¯Êý£¬Ë­ÄܸæËßÎÒÕâ¸öÓï¾äÊÇʲôÒâ˼¡°PassIsTrue = (Rs(0).Value = 1)¡±£¬ÄѵÀÊÇvbÖÐifÅжϼò»¯Ð´·¨£¿

''''''''''''''''''''''''''
Public Function PassIsTrue(ByVal strUname As String, ByVal strPass As String, Optional ByVal strTable As String = "Users") As Boolean
  Dim Rs As Recordset
  Set Rs = g_Conn.Execute("SELECT COUNT(*) from " & strTable & " Where UserName='" & strUname & "' and Upass='" & strPass & "'")
  PassIsTrue = (Rs(0).Value = 1)
  Set Rs = Nothing
End Function
Rs(0).Value = 1 ·µ»ØÒ»¸ö²¼¶û±í´ïʽ true or false 
È»ºó¸³Öµ¸øPassIsTrue 



PassIsTrue = (Rs(0).Value = 1

·µ»ØÒ»¸ö²¼¶ûÖµ TRUE or FALSE ! £¨Õæ¼ÙÁ½¸öÖµ£©

if ÅжÏÓï¾äµÄ·µ»Ø½á¹ûÀàËÆËü Ìõ¼þҪô³ÉÁ¢£¬ÒªÃ´²»³ÉÁ¢£¨Ò²ÊÇÁ½¸öÖµ£©

ok£¬Ô­À´£¨£©ÄÚÊǸö¹ØÏµ±í´ïʽ£¬Ð»Ð»Â¥É϶þλÁË£¡£¡£¡£¡


Ïà¹ØÎÊ´ð£º

ΪʲôÓÃVB¸Ä±ä²»Á˹¤¾ßÀ¸°´Å¤µÄ¿í¶È - VB / ¿Ø¼þ

Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔ­À´µÄÊýÖµÁË

´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ
´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË
ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£

»Ø¸´ ......

vb³¬¼òµ¥form.showµÄÎÊÌâ - VB / ·Ç¼¼ÊõÀà

ΪʲôÎÒÓÃform.showºÍform.hide¶à´ÎÁ¬½ÓÁËÁ½¸ö´°¿ÚÖ»ÄÜ»¥»»Á´½ÓÁ½´Î°¡£¿
´úÂë¿´¿´
ÕÕµÀÀíform.show û´ÎÊýÏÞ¶¨µÄ°É

ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿

ÒýÓÃ
ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿
Â¥Ö÷Ò² ......

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

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

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

vb¶ÁÈ¡xml - VB / »ù´¡Àà

ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

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

Ë­ÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ