Çó½ÌÒ»¸ö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£¬ÔÀ´£¨£©ÄÚÊǸö¹ØÏµ±í´ïʽ£¬Ð»Ð»Â¥É϶þλÁË£¡£¡£¡£¡
Ïà¹ØÎÊ´ð£º
Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔÀ´µÄÊýÖµÁË
´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ
´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË
ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£
»Ø¸´ ......
ΪʲôÎÒÓÃform.showºÍform.hide¶à´ÎÁ¬½ÓÁËÁ½¸ö´°¿ÚÖ»ÄÜ»¥»»Á´½ÓÁ½´Î°¡£¿
´úÂë¿´¿´
ÕÕµÀÀíform.show û´ÎÊýÏÞ¶¨µÄ°É
ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿
ÒýÓÃ
ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿
Â¥Ö÷Ò² ......
DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.
datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......
ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
ËÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......