نايف - م قام بنشر مايو 11, 2010 قام بنشر مايو 11, 2010 سلام عليكم: أخوتي من يمكن أن يشرح لي هذه الكلمات في الكود (الشرط و جواب الشرط ) لكي أتمكن من التعديل فيه طبعا الكود مأخوذ من المنتدى Sub open_folder() Dim FolderName As String FolderName = InputBox("", "", "E:\Documents and Settings\VIP\My Documents") If Dir(FolderName, vbDirectory) = vbNullString Then MsgBox " " & FolderName & " : " Else Shell "explorer.exe " & FolderName, vbNormalFocus End If End Sub الكلمات هي vbdirectory- vbnullstring- vbnormalfocus لكم الشكر
نايف - م قام بنشر مايو 12, 2010 الكاتب قام بنشر مايو 12, 2010 يا جماعة الكود شغل المنتدى يرجى منكم التكرم بشرحه
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.