vb.net²Ù×÷Êý¾Ý¿âÖ®ACCESS£¨2£©
ÉÏһƪÖÐÎÒÒѾ˵ÁËÏÂÈçºÎ²Ù×÷ACCESSÊý¾Ý¿â£¬ÏÂÃæÀ´ËµËµ´æÈ¡Í¼Æ¬£¬ÉùÒôÖ®ÀàµÄÎÊÌâ¡£
ÓÉÓÚͼƬ£¬ÉùÒô²»ÄÜÖ±½Ó´æ´¢£¬ÕâÀï¾ÍÒªÓõ½Êý¾ÝÁ÷·½Ê½ÁË¡£¶ÔÓÚ.NETÖеÄһЩÊõÓï¸ÅÄîÎÒÈÔÈ»ºÜÃÔºý£¬ÔÚѧϰÖС£Ö÷ÒªÎÒ²»ÊÇרҵµÄ£¬
Ö»ÊÇ¿ªÊ¼Ñ§Á˵ãVB6´úÂ룬Ȼºó¾ÍÓÃVB.NETÁË£¬ËùÒÔĿǰֻÊÇ»áдµã´úÂ룬ȴ²»ÖªµÀÔÀí£¬ºÜ²ÑÀ¢¡£
°¥Ó´£¬×ßÌâÁË£¬¸Ï½ô»ØÀ´£¬²»ºÃÒâ˼£¡
ºÃ°É£¬ÎÒÃÇÏÈ¿´¿´Í¼Æ¬ºÍÉùÒôµÄ´æ´¢ºÍ¶ÁÈ¡¡£¿´Ï´úÂë¡£
’Õâ¶Î´úÂëÊDzåÈëͼƬºÍÉùÒôµÄ´úÂë
’µÚÒ»¸ö¾ÍÊÇͼƬÁË£¬pathµ±È»ÊÇͼƬµÄµØÖ·ÁË
Picturebyte = My.Computer.FileSystem.ReadAllBytes(PicturePath)
’ÏÂÃæÕâ¸ö¾ÍÊÇÉùÒô¿©£¬voicepath×ÔÈ»»¹ÊÇÉùÒôµØÖ·ÁË
Voicebyte = My.Computer.FileSystem.ReadAllBytes(VoicePath)
‘ÕâÀï¾Í¿ªÊ¼ÕÕ¾ÉдSQL£¬Çø±ðÒÔǰµÄµØ·½¾ÍÊÇÕâÀïÊÇÓÃCOMMANDµÄÒ»¸ö²ÎÊýÀ´¸³Öµ
str = New System.Text.StringBuilder
str.Append(" INSERT INTO WORDINFO ([PICTURE],[ENGLISHNAME],[CHINESENAME],[VOICE],[Class]) ")
str.Append(" VALUES(?,?,?,?,?)")
cmd = New OleDb.OleDbCommand(str.ToString, DBConnection)
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(0).Value = Picturebyte
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(1).Value = EnglishName
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(2).Value = ChineseName
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(3).Value = Voicebyte
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(4).Value = Classstring
cmd.ExecuteNonQuery()’sqlдÍêÁ˾ͿªÊ¼Ö´ÐÐ
DBConnection.Close()
Ïà¹ØÎĵµ£º
rndº¯Êý·µ»Ø»òÕß˵²úÉúÒ»¸öСÓÚ1µ«´óÓÚ»òµÈÓÚ0µÄsingleÀàÐ͵ÄËæ»úÊý¡£
²úÉúËæ»úÊý֮ǰÐèÒªÒ»¸öÖÖ×Ó¡£
·²»Í¬µÄÖÖ×Ó£¬¿ÉÊ¹Ëæ»úÊýÉú³ÉÆ÷Éú³É²»Í¬µÄËæ»úÊý£»
·ÔÚÒ»¸öÖÖ×ÓÏ£¬Éú³ÉµÄËæ»úÊýÏàͬ¡£
Ëæ»úÊýÉú³ÉÆ÷µÄÓï¾äΪrandomize¡£¸ñʽΪ£ºrandomize[x]¡£
·µ±x>0ʱ£¬Ê¹ÓÃǰһ´Îµ÷ÓÃrndº¯Êý²úÉúµÄË ......
ÊÔ×ÅÓÃÁËÒ»ÏÂMindManager,ʹÓúÜÈÝÒ×,ÏÂÃæÊÇÎÒÁ·Ï°×Å×öµÄÒ»¸öͼÐÎ,Ï£ÍûÒÔºó»áÔ½ÓÃÔ½ÊìÁ·,×öµÃ¸üºÃ!
& ......
How To ... Access the Z-Depth channel
delete $VoxelBox*
rbmp
= render outputsize:[32,32] channels:#(#zdepth) vfb:
off
z_d
= getchannelasmask rbmp #zdepth
progressstart "Rendering Voxels..."
for
y = 1 to
rbmp.height do
(
progressupdate (100.0 * y / rbmp.height)
pixel_line = ......
ÁκéÁÁ 2010/4/13
¸ÅÊö
ÔÚʵ¼ÊµÄÏîÄ¿ÖУ¬¿ÉÄÜ»áÓöµ½ÕâÑùµÄÎÊÌ⣺A·þÎñÆ÷ÉϵÄÓ¦ÓóÌÐòÐèÒª·ÃÎÊB·þÎñÆ÷ÉϵÄaccessÊý¾Ý¿â(¿ÉÒÔʹÓÃÐéÄâ»úÄ£ÄâA¡¢B·þÎñÆ÷½øÐвâÊÔ)¡£¶øaccessÊý¾Ý¿âÊÇÎļþÀàÐ͵쬲»Í¬¼ÆËã»ú¼äÐèÒªÖ¸¶¨Îļþ·ÃÎÊȨÏÞ£¬Ôö¼ÓÁ˳ÌÐòµÄ¸´ÔÓ¶È¡£±¾ÎĽ«´ÓÒ»¸öʵÀýÀ´½éÉÜÒ»ÖÖ¼òµ¥ÊµÓõķ½·¨¡£¸ÃʵÀýʹÓõķ½·¨À´×ÔInte ......
½ñÌìÔÚµ÷ÊԵĹý³ÌÖз¢ÏÖ ÔÚvbÖÐÆ´SQLµÄʱºò·¢ÏÖ"()" ×÷Óúܴó
eg: table: T_TEST col : T_KB int ,S_CD int ,Z_SU int
dim gcstrT_1 ,gcstrT_3 as integer
gcstrT_1 = 1
gcstrT_3 = 3
strWhere = strWhere & "……"
strWhere = strWhere & "AND ((T_K ......