[KSAm3lm]

السلام عليكم

انا صممت برنامج

وسويت كومبو بوكس

واخترت فيه احجام الرام يعني 

512 MB

1 GB

...الخ

وسويت متغير اسمه

G

وكتبت الكود الآتي :

كود :

       If ComboBox2.Text = "512 MB" Then
           Dim G As Integer
           G = 268435456
       ElseIf ComboBox2.Text = "1 GB" Then
           Dim G As Integer
           G = 536870912
       ElseIf ComboBox2.Text = "2 GB" Then
           Dim G As Integer
           G = 1073741824
       ElseIf ComboBox2.Text = "4 GB" Then
           Dim G As Long
           G = 2147483648
       ElseIf ComboBox2.Text = "6 GB" Then
           Dim G As Long
           G = 3221225472
       ElseIf ComboBox2.Text = "8 GB" Then
           Dim G As Long
           G = 4294967296
       ElseIf ComboBox2.Text = "16 GB" Then
           Dim G As Long
           G = 8589934592
       ElseIf ComboBox2.Text = "32 GB" Then
           Dim G As Long
           G = 17179869184
       ElseIf ComboBox2.Text = "64 GB" Then
           Dim G As Long
           G = 34359738368
       ElseIf ComboBox2.Text = "120 GB" Then
           Dim G As Long
           G = 64424509440

       End If

بس لما اكتب تحته كذا :

كود :

       Dim Filewriter As New System.IO.StreamWriter(B & "\Desktop\Space.TXT")

       Filewriter.WriteLine("FreeMem=Space(" & G & ")")
       Filewriter.Close()
       Process.Start(B & "\Desktop\Space.TXT")

يقول في خطا , اللي هو

كود :

Filewriter.WriteLine("FreeMem=Space(" & G & ")")

("FreeMem=Space(" & G & ")")

وفوق هذا كله لمااحفظ المتغير 

G

لحاله 

كود :

Filewriter.WriteLine(G)

يطلع كذا 

اللي ابغاه انا انه يطلع

FreeMem=Space()

وبين القوسين المتغير

G

اللي هو الارقام اللي كاتبها في الشرط 

اتمنى المساعدة لأني تعبت وحاولت وما لقيت

 حل والمشروع هذا قعدت عليه اكثر من 5 ساعات الين طلعلتي ذي المشكلة

... وشكرا