تريد ان تضع صورة في موضوعك ؟
ببساطة اضغط بزر الفارة اليمن على الصورة (طبعا تكون الصورة موجودة في موقع اخر )و انقر نسخ او copy و روح لموضوعك و ضع المؤشرة مكان الصورة و انقر لصق و.....بس
اما اذا كانت الصورة على جهازك وتريد وضعها على النت فما عليك الا ان تضعها في مواقع لرفع الصورة مثل الياهو ويوجد غيره اذا احببت و يمكنك الاستفادة من موضوع الاخ amous في هذا الخصوص و ما عليك الا ان تضغط اللينك التالي و بعد ان ترفع صورك اتبع المعلومات السابقة
http://www.sptechs.com/montada/msgid12333
انشالله يكون هدا طلبك ......
يمكنك تجربة هذا الكود بعد عمل form عليها disk list and drive list and directory list controls و زرار command button
drvImage_Change procedure.
Private Sub dirImage_Change()
'If directory changes, update file path
filImage.Path = dirImage.Path
End Sub
dirImage_Change procedure
Private Sub drvImage_Change()
'If drive changes, update directory
dirImage.Path = drvImage.Drive
End Sub
cmdShow_Click event.
Private Sub cmdShow_Click()
'Put image file name together and
'load image into image box
Dim ImageName As String
'Check to see if at root directory
If Right(filImage.Path, 1) = "\" Then
ImageName = filImage.Path + filImage.filename
Else
ImageName = filImage.Path + "\" + filImage.filename
End If
lblImage.Caption = ImageName
imgImage.Picture = LoadPicture(ImageName)
End Sub
كيف أكتب مسار الصورة ؟
