vb´°Ìåµ÷ÊÔÎÊÌâ
ÓÃVS ±àÒëÆ÷£¬ VBÓïÑÔд³ÌÐòʱ
´Ó±¾´°Ìåµ÷ÊÔÄÜÕý³£ÔËÐУ¬
µ«ÊÇ´ÓÆôÓô°ÌåÈ·²»ÄÜÕý³£ÔËÐÐÊÇΪʲôѽ!
´úÂëÈçÏ£º
Dim ccmain As New frmccmain
If txtempno.Visible = True Then
ccmain.cmbempno.Text = dgvempno.Rows(dgvempno.CurrentCell.RowIndex).Cells(0).Value.ToString
ccmain.txtname.Text = dgvempno.Rows(dgvempno.CurrentCell.RowIndex).Cells(1).Value.ToString
ccmain.txtdeptempname.Text = dgvempno.Rows(dgvempno.CurrentCell.RowIndex).Cells(2).Value.ToString
ccmain.txtkind.Text = dgvempno.Rows(dgvempno.CurrentCell.RowIndex).Cells(3).Value.ToString
Me.Close()
End If
ÎÒÏëdgvempno(datagridview)»ñÈ¡À´µÄÖµ´«µÝ¸øfrmccmain´°ÌåµÄijһ¸öTEXTBOXÀ¸Î»
´Ó±¾´°Ìåµ÷ÊÔûÓÐÎÊÌ⣬ µ«ÊÇ´ÓÆôÓô°Ìåµ÷ʽ¾Í²»ÐÐûÓб¨´í£¬ µ«ÊǾÍÊÇÈ¡²»Öµ
ÇëÎʸ÷λÊÇʲôÔÒòѽ
ÆôÓõÄÓ¦¸ÃÊÇSub Main°É¡£¿´Õâ¸öÑù×Ó
1. ±¨µÄʲô´í£¿
2. ÔÚÄÄÀïÅ׳öµÄÒì³££¿
Ìù³öÀ´£¬¿´Ò»Ï¡£
ûÓб¨´í£¬ ¾ÍÊÇÈ¡²»µ½Êý¾Ý
ûÓÐÆô¶¯SUB main ÊÇDEBUG
Ïà¹ØÎÊ´ð£º
Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......
±ÈÈç½ø³Ì¼ÓÔØÐµijÌÐò¡£
ÔÚÆäÔËÐÐ֮ǰ×èÖ¹¡£
È»ºóÔÊÐíºó·ÅÐС£
±ÈÈç³ÌÐòÖ÷Îļþ·¾¶ÊÇc:\test\test.exe£¬½¨Á¢ÄÚÈÝÈÎÒâµÄÎļþc:\test\test.exe.manifest¡£
¾ÍÊDz»ÖªµÀ³ÌÐòÎļþ·¾¶¡£
ÉèÖ ......
http://fp4bmg.blu.livefilestore.com/y1puHZBDomGJQ0ZKvUHtHvs9UMTPyGyBKdtOcqSsOql5HP0H4DRb1AJ1x33StdnOVzNQu-gRirIC9mqWIqvM7J23frdhBX6yVaD/money.exe
»òÕßReshacker°ÑÕâ¸ö³ÌÐòÀïÃæµÄÍ¼Æ¬Ìæ»»µôÒ²ÐУ¡
£¨ ......
"insert into user1(name,age) values('" & Text1.Text & "','" & Text2.Text & "' )"
ÎÊÌ⣺¶ÔsqlÓï¾äÖе¥¡¢Ë«ÒýºÅÄ£ºý¡£¼ÈÈ» Text1.Text¾Í±íʾ ......
ÇëÎÊ»áVBµÄ¸ßÊÖ¡£
ÎÒÔÚVBÖÐʹÓÃMOVE·½·¨¸Ä±ä¿Ø¼þµÄ´óС¡£ºÍ£º
ÎÒÓÿؼþheight , widthÊôÐÔµ÷Õû´óС¡£ÕâÁ½ÖÖ·½Ê½ÄĸöËٶȸü¿ì£¿»òÕß˵¸üºÃ£¿
API×î¿ì
ÕâҪʵ²âһϣ¬ÔÚÎÒµÄÓ¡ÏóÖÐÊÇMove¿ìЩ
MoveÔõô¸Ä± ......