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

´ó¼Ò°ïæ¿´¿´VBÖмÆËãÎÊÌâ

´ó¼Ò°ïæ¿´Ï£¬ÔÚVBÖÐÓиö±äÁ¿str=0.00016ÈçºÎ¼ÆËãÈÃËü±ä³ÉÊÇ1.6*10µÄ4´Î·½
»¹ÓиöÎÊÌâÊǹØÓÚÊý¾Ý¿â²éѯµÄ
ÔÚACCESSÖÐÈçºÎ²éѯʱ£¬ÅжÏ×Ö¶Î1ÊÇ·ñΪ¿ÕÈç¹ûÊÇÔò²éѯ×Ö¶Î2
ÔÚSQLÖÐÓ¦¸ÃÊÇselect case ×Ö¶Î1 isnul then ×Ö¶Î2 end from ±íÃû
´ó¼Ò¿´¿´ÔÚACCESSÖÐÊDzéѯµÄ£¬½â¾öÁËÔÙ¼Ó·Ö
str = cdbl(str) * 100000000#

VB code:
Option Explicit

Private Sub Form_Load()
Dim strP As String
strP = "0.00016"
strP = Val(strP) * 100000000
Text1.Text = strP
End Sub



µÚÒ»¸öÎÊÌâ±¾ÊÇ1.6×10µÄ-4´Î·½,ÄãÒª±ä10µÄ4´Î,¾Í½«Æä×10µÄ8´Î·½(ÎÊÌâÓеã¹ýÓÚ¼òµ¥£¿)
[access] select iif(isnull(×Ö¶Î1),×Ö¶Î2,×Ö¶Î1) from ±íÃû

¸Õ²Å˵´íÁË£¬Ó¦¸ÃÊÇ1.6*10¸º4´Î·½£¬ÎÒ°´ÕÕÄãÃǵķ½·¨Ôõô½á¹ûÊÇ160000

VB code:
str = Format$(0.00016,"#.#E+")


VB code:

Dim istr As String
istr = Format(0.00016, "0.##E+")



str = Format$(0.00016,"#.#E+")

VB code:
Private Sub Form_Load()
s = Format(0.00016, "0.0E+")
MsgBox


Ïà¹ØÎÊ´ð£º

¹ØÓÚASP.net(vb)²¥·Å¼à¿ØÂ¼ÏñµÄÎÊÌâ

ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿ØÂ¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓÆµ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£
ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ,
È»ºó¾ÍÖ±½ÓÓúÃÁË.
²»¹ý,Èç ......

VBÔõÑùÏÔʾµÇ½Óû§ID

VB+Access·ÖÎöάÐÞ¹ÜÀíϵͳ£¬ÔõÑù½øÈëϵͳ´°ÌåÉÏÏÔʾµÇ½Óû§Ãû£»
Çë¸ßÊÖ°ïæ£»
Õâ¸öÒ»°ãÊÇÓû§¾­¹ýÁËÓû§Ãû£«ÃÜÂëÑé֤ͨ¹ýºóÏÔʾÔÚstatebarÀïµÄ°É¡£

ÒýÓÃ
Õâ¸öÒ»°ãÊÇÓû§¾­¹ýÁËÓû§Ãû£«ÃÜÂëÑé֤ͨ¹ýºóÏÔÊ ......

VB與VB.NET區別

VB與VB.NET區別ÊÇʲô£¿
³ýÁËÓï·¨²î²»¶à£¬¼¸ºõ¶¼ÊÇÇø±ð¡£

×÷ÓÃÖ÷Òª區別ÊÇÊ²Ã´ÄØ?

Óò»ÓÃÓÐ .net¿ò¼Ü


ÒýÓÃ
Óò»ÓÃÓÐ .net¿ò¼Ü


.net¿É·ñÀí½â為Ł ......

VCÏ»­Í¼ÒªÓÃwin32 GDI API VBÏÂÄØ£¿

ÓÃʲô£¿
VB×Ô¼ººÃÏñÓл­Í¼º¯Êý°É,ÁíÍâVBÒ²ÊÇ¿ÉÒÔÓÃAPIµÄ,¶øÇҺܷ½±ã

ÒýÓÃ
VB×Ô¼ººÃÏñÓл­Í¼º¯Êý°É,ÁíÍâVBÒ²ÊÇ¿ÉÒÔÓÃAPIµÄ,¶øÇҺܷ½±ã

ΪʲôvcûÓÐ×Ô¼ºµÄ»­Í¼º¯Êý£¿

ÒýÓÃ
ÒýÓà 1 Â¥ wltg2001 µ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ