VB CstrºÍstr/lableºÍtestÎÊÌâ
1¡¢¹ØÓÚ¼ª´óÊÓƵ£º1-3¼¯½²VB³ÌÐòÉè¼ÆµÄ¸ÅÊö4-30¼¯½²VB»ù´¡ÖªÊ¶£¬Èç¿Ø¼þµÄʹÓÃ31-64¼¯½²ActiveX¿Ø¼þ¡¢Êý¾Ý¿âµÈµÄ¸ß¼¶±à³Ì²¿·Ö¡£
¿´µÄ¹ý³ÌÖÐ×¢Òâ¿ì½Ý¼üµÄʹÓúͽØͼ¹¤¾ßµÄÔËÓ㬿´ÊÓƵʱ½«Öصã×÷³ö±ê×¢¡£
2¡¢ÓÉCSTR¡¢Cstr£¨£©¡¢string¡¢Instr£¨£©ºÍstr£¨£©£¨´ËΪÉî¶ÈÀ©Õ¹£©ËùÏëµ½µÄ¹ØÓÚ×ܽáµÄ·½·¨¡£
CSTRÔÚVB³ÌÐòÉè¼ÆÖÐÊDz»´æÔڵģ¬¼´Ê¹ÇÃÈëCSTRºó£¬VBÒ²»á×Ô¶¯Ä¬ÈÏΪCstr¡£
string º¯Êý string£¨2£¬sport£©µÄ·µ»ØÖµÊÇ“ss”
Instr£¨£©£ºInstr£¨3£¬“studystudy”£¬“tu”£©
¹ØÓÚCstrºÍstr£ºÁ½ÖÖ×î´óµÄÇø±ðÔÚÓÚ£º
CstrÔÚ½«ÕýÊýת»»ÎªÊý×Ö×Ö·û´®Ê±£¬²»ÔÚÆäÇ°¼ÓÇ°µ¼¿Õ¸ñÀ´°µÊ¾ÆäÕýºÅ£»
¶øStrÔÚ½«ÕýÊýת»»ÎªÊý×Ö×Ö·û´®Ê±,·µ»ØµÄ×Ö·û´®°üº¬Ò»Ç°µ¼¿Õ¸ñ°µÊ¾ÓÐÒ»ÕýºÅ¡£
¾ÙÀýÈçÏ£º
Dim i As Single
Dim cstr1 As String
Dim str1 As String
i = 10.3
cstr1 = CStr(i)
str1 = Str(i)
Print Len(cstr1), Len(str1) 'Êä³ö:4 5
i = -10.3
cstr1 = CStr(i)
str1 = Str(i)
Print Len(cstr1), Len(str1) 'Êä³ö:5 5
¼òµ¥µÄ½²£º
Cstr(10.3)="10.3" Str(10.3)=" 10.3"
Cstr(-10.3)="-10.3" Str(-10.3)="-10.3"
¸Ä´íÖУ¬Òªµ±ÐÄ£¬Èç¹û²ÉÓÃStr½«ÕýÊýת»»ÎªÊý×Ö×Ö·û´®£¬ÄÇô¶Ô¸Ã×Ö·û´®ÔÚ½øÐÐ
Öðλ´¦Àíʱ£¬ÆäÑ»·´ÎÊý½«¶àÁËÒ»´Î¡£
ÁíÍ⣺
°´ÕÕMSDN½éÉÜ£¬Í¨³£Cstrºó²ÎÊýÀàÐͱȽϹ㷺£¬¼´£º¿ÉÒÔ½«Boolean£¬Date£¬Empty,Êýֵת»¯Îª×Ö·û´®¡£
¶østrºó²ÎÊýͨ³£Ó¦¸ÃΪÊýÖµ¡£
µ«ÊǸù¾Ýʵ¼Ê²âÊÔ£¬Ò²²»¾¡È»¡£
Çë¿´ÏÂÀý£º
Private Sub Command1_Click()
Dim t As Boolean
Print Str(t) 'Êä³ö False(Ç°ÃæÓпոñ£©
Print CStr(t) 'Êä³öFa
Ïà¹ØÎĵµ£º
È«Ãæ¿ØÖÆ Excel
Ê×ÏÈ´´½¨ Excel ¶ÔÏó£¬Ê¹ÓÃComObj:
Dim ExcelID as Excel.Application
Set ExcelID as new Excel.Application
1) ÏÔʾµ±Ç°´°¿Ú£º
ExcelID.Visible := True;
2) ¸ü¸Ä Excel ±êÌâÀ¸£º
ExcelID.Caption := 'Ó¦ÓóÌÐòµ÷Óà Microsoft Excel';
3) Ìí¼Óй¤×÷²¾£º
ExcelID.WorkBooks.Add;
4) ´ò¿ªÒÑ´æÔÚµ ......
Public Function IsValidIPAddress(ByVal strIPAddress As String) As Boolean
On Error GoTo Handler
Dim varAddress As Variant, n As Long, lCount As Long
varAddress = Split(strIPAddress, ".", , vbTextCompare)
If IsArray(varAd ......
·½çÃæÉè¼Æ±ØÐë±£³ÖÒ»ÖÂ
·Á½¸ö³ÌÐòÖ®¼äµÄÌØÐԾ߱¸¹²ÐÔ
·ºÍwindowsÓ¦ÓóÌÐòµÄ¿ì½Ý¼üÊÇÒ»ÖµÄ
·±à³ÌÔÔò
·Îª´°Ì帳ÓèͳһµÄÍâ¹ÛºÍÐÐΪÌØÐÔ
·Èç¹û´°ÌåµÄ´óС¸Ä±äʱ£¬Ëü²»¸Ä±äÆäÄÚÈݵĴóС£¬ÄÇô±ß¿ò¾Í²»Ó ......
×òÌìÏÂÎçÎÒºÍСÅÖ±»Ã×ÀÏʦ´«»½µ½ÊÐҽԺȥ£¬Ã×ÀÏʦÏëÌýÌýËûÖÜÁùÉϵĿζÔÎÒµÄÓ°ÏìÓжà´ó£¬ÎһشðµÄ»ù±¾ÄÚÈݺ͡¶10Äê VB 1¡·ÀïÃæµÄÄÚÈݲ¶à£¬µ«Ã×ÀÏʦ¸Ð¾õºÜ¿Õ¶´£¬¸Ð¾õÎÒÔÚ·º·º¶ø̸£¬ÆäʵÎÒÒ²Óиоõ¡£
ΪÁ˽«Ã×ÀÏʦ˵µÄ×᷽ܽ·¨Ó¦ÓÃÓÚʵ¼ù£¬ÎÒÕâÁ½ÌìÇôúÂë·¢ÏÖMsgBox£¬InputBox£¬PrintµÄÓ÷¨²î²»¶à£¬È»ºó¾Í½«Æä×ܽáÈçÏ£º
......
VBÎÞËù²»ÄÜÖ®Î壺½¨Á¢“±ê×¼”DLL¶¯Ì¬Á´½Ó¿âÎļþ£¨1£©
×÷ÕߣºÖÓÉù
²©¿ÍµØÖ·£ºhttp://blog.csdn.net/useway
¶¯Ì¬Á´½Ó¿â¾³£±»ÈÏΪÊÇVC»òÕßDephiµÄרÀû£¬DLLÎļþ¿ÉÒÔ½«Äã±àдµÄº¯Êý¶¯Ì¬µÄ·¢²¼£¬²¢¿ÉÒÔ±»ÆäËû³ÌÐòºÜ·½±ãµÄµ÷Óá£
&n ......