منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

كاتب الموضوع : BADRMEDIA

ربما تحتاج لمعرفة اصدار تطبيق معين

قم باعلان عن فضاء الاسم Namespace

كود :

[color=#000000][COLOR=#0000bb]Imports System[/color][color=#007700].[/color][color=#0000bb]Runtime[/color][color=#007700].[/color][COLOR=#0000bb]InteropServices  

[/COLOR][/COLOR]

ثم استخدم هذا الكود

كود :

[color=#000000][COLOR=#0000bb]        Dim excel [/color][color=#007700]As [/color][color=#0000bb]Object [/color][color=#007700]= [/color][color=#0000bb]CreateObject[/color][color=#007700]([/color][color=#dd0000]"Excel.Application"[/color][COLOR=#007700]) 

        [/COLOR][color=#0000bb]MsgBox[/color][color=#007700]([/color][color=#0000bb]excel[/color][color=#007700].[/color][color=#0000bb]Version[/color][COLOR=#007700]) 

        [/COLOR][color=#0000bb]MsgBox[/color][color=#007700]([/color][color=#0000bb]excel[/color][color=#007700].[/color][color=#0000bb]Build[/color][COLOR=#007700]) 

        [/COLOR][color=#0000bb]Marshal[/color][color=#007700].[/color][color=#0000bb]ReleaseComObject[/color][color=#007700]([/color][color=#0000bb]excel[/color][COLOR=#007700]) 

        [/COLOR][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]GC[/color][color=#007700].[/color][color=#0000bb]Collect[/color][COLOR=#007700]()  

[/COLOR][color=#0000bb][/color][/COLOR]

أعتقد الكود واضح وما يحتاج شرح

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

RaggiTech