VBÄÜ·ñ°ÑControl¶ÔÏóתΪһ¸öTEXTBOX¶ÔÏó£¿
VBÄÜ·ñ°ÑControl¶ÔÏóתΪһ¸öTEXTBOX¶ÔÏó£¿
VB.NET ÓиöCTypeº¯Êý£¬VBûÓÐÀàËƵģ¿
Ö»ÓÐת»»±äÁ¿µÄ,Ëƺõû·¢ÏÖÓÐת»»¿Ø¼þÀàÐ͵Ä
Dim txt As Control
Set txt = Text1
Debug.Print txt.Text
ÕâÑù»¹ÐÐ.
msdnÉÏÕâÑù˵£º
Control ¶ÔÏó
ËùÓÐ Visual Basic ÄÚ²¿¿Ø¼þµÄÀàÃû¡£
Óï·¨
Control
˵Ã÷
¿ÉÒÔ½«Ò»¸ö±äÁ¿±êΪ Control ¶ÔÏó£¬ÏóÒý°Ñ¿Ø¼þ·Åµ½´°ÌåÉϵÄÒ»ÑùÀ´ÒýÓÃËü¡£ÏÂÃæ¶Ô´Ë½øÐÐÑÝʾ£º
Dim C as Control
Set C = Text1
Ïà¹ØÎÊ´ð£º
Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......
´ó¼ÒºÃ£¬Îʸövb´òÓ¡ÎÊÌâ
printer.print "dsff"
.....
....
Printer.EndDoc
´òÓ¡³É¹¦ºóÎÒ½«Ö´ÐÐ
sqlstr = "update vc_yh set pr=' ÒÑ´òÓ¡ ', ......
»¹¼ÇµÃÉÏ΢ÈíÍøÕ¾¸üÐÂϵͳ²¹¶¡Ê±£¬Ã¿µ±¹´Ñ¡Ò»¸öÉý¼¶Ïîʱ£¬ÔÚµ±Ç°¹´Ñ¡µÄλÖûá³öÏÖÒ»¸ö´øÎÄ×ֵĺڿòƽ»¬µÄ·ÉÏòÒÑÑ¡ÊýÁ¿µÄλÖÃÉϲ¢¼Ó1£¬µ±È¡Ïû¹´Ñ¡Ê±ÒÔÏà·´µÄ·½Ïò´ÓÒÑÑ¡ÊýÁ¿µÄλÖÃÉϷɻز¢¼õ1£¬Õâ¸öЧ¹û¶¯¸ÐÓиöÐÔ£¬ÏÖ ......
vbÖÐÔõÑùʵÏÖÏñvb.netÒì³£´¦Àí(try....Catch ex As Exception...end try)¹¦ÄÜ£¿
ÓÑÇé°ï¶¥
ÎÞ·ÇÊÇOn error Goto ºÍErr.NumberÅжϰÉ?
ÏëÓÃvb6.0ʵÏÖÒÔÏÂvb.netµÄ¹¦ÄÜ£º
dim str as string 'Õâ¸öÒ»¸öÓ¦Ó ......
Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 3 ¡¯刪³ý
Dim YesNo As String
&nbs ......