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

vbµÄpicture¿Ø¼þµÄÐ¶ÔØ

ÓÃvbµÄpicture¿Ø¼þ¿ÉÒÔ¼ÓÔØpicture¿Ø¼þ,ÀýÈç
Set Picture1.Container = Picture3
ÕâÑù¾Í°ÑPicture1¼ÓÔØµ½ÁËPicture3ÉÏ,ÄÇôÔõô´ÓPicture3Ð¶ÔØµôPicture1ÄØ?
Çë¸÷λÅóÓѰïæ!лл!!
×öÁËÒ»¸öÊÔÑé,½«Picture1»¹Ô­µ½Ô­À´µÄÈÝÆ÷¾Í¿ÉÒÔÁË
VB code:
Option Explicit

Private Sub Command1_Click()
Set Picture1.Container = Picture3
End Sub

Private Sub Command2_Click()
Set Picture1.Container = Form1
End Sub

Private Sub Form_Load()
Picture1.Picture = LoadPicture("E:\½ØÍ¼\1.JPG")
End Sub


VB code:
Private Sub Command1_Click()
Set Picture1.Container = Picture3
End Sub

Private Sub Command2_Click()
Picture1.Left = -1 * Picture1.Width
End Sub




ÉÏÃæµÄ´úÂë²¢Ã»ÕæÕýÒÆ×ß,Ö»ÊÇ¿´²»µ½ÁË, Set Picture1.Container = Form1
ÊÇÒÆ×ßÁË,µ«Picture1Ã»Ð¶ÔØµô.Ö»ÊDz»ÔÙÒÔPicture3
×÷ÈÝÆ÷ÁË.

ÒýÓÃ
×öÁËÒ»¸öÊÔÑé,½«Picture1»¹Ô­µ½Ô­À´µÄÈÝÆ÷¾Í¿ÉÒÔÁË
VB codeOptionExplicitPrivateSub Command1_Click()Set Picture1.Container= Picture3End SubPrivateSub Command2_Click()Set Picture1.Container= Form1End SubPrivateSub Form_Load()
    Picture1.Picture=LoadPicture("E:\½ØÍ¼\1.JPG")End Sub


ѧϰ
{{-


Ïà¹ØÎÊ´ð£º

vb´òÓ¡ÎÊÌâ

´ó¼ÒºÃ£¬Îʸövb´òÓ¡ÎÊÌâ


printer.print "dsff"
.....
....


Printer.EndDoc


´òÓ¡³É¹¦ºóÎÒ½«Ö´ÐÐ

sqlstr = "update vc_yh set pr=' ÒÑ´òÓ¡ ', ......

VB------->C#

C# code:

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Type GUID
Data1 As Long
......

¹ØÓÚVBÖеÄMDI×Ó´°Ìå²»ÄÜÒÔģʽ´°ÌåÏÔʾ

Private Sub cmdModify_Click()
    Dim iRet As Integer
    If dltUser.Text = "" Then
        MsgBox "ÇëÑ¡ÔñÒªÐ޸ĵÄÓû§£¡", vbOKOnly ......

¹ØÓÚVBÖеÄÁбí¿òµÄÎÊÌâ

Ò»µÀVBС³ÌÐò
ÓÐÁ½¸öÁбí¿òlist1¡¢ list2 ¡£list1Öгõʼ»¯ÓÐ15¸ö²»Í¬µÄ×Öĸ£¬¶ølist2ÖÐÊÇ¿Õ°×µÄ »¹ÓÐÒ»¸ö°´Å¥command1,Ñ¡ÖÐlist1ÖеÄÈÎÒâ¶à¸öÏîÄ¿ È»ºóµã»÷°´Å¥command1,ÔòÔÚlist2ÖÐÏÔʾlist1Öб»Ñ¡ÖеÄÏîÄ¿¡£µ±¶ ......

VB ÊôÐÔµÄʹÓÃÎÞЧ

Private Sub DataList1_Click()
If DataList1.Text = "" Then
Lbl_EmpId = ""
Lbl_EmpName = ""
Lbl_Birth = ""
Lbl_Sex = ""
Lbl_Political_ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ