[KSAm3lm]

(12-05-16, 07:59 PM)Adrees كتب : السلام عليكم 
اخي الكريم جرب الكود بهذه الطريقة
 المتغير G يكفي ان تعرفه مرة واحدة فقط ثم تسند اليه القيم حسب الاختيار من الكمبوبوكس

PHP كود :

   Dim G As Long

    Private Sub ComboBox2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox2.SelectedIndexChanged
        If ComboBox2.Text = "512 MB" Then
            G = 268435456
        ElseIf ComboBox2.Text = "1 GB" Then
            G = 536870912
        ElseIf ComboBox2.Text = "2 GB" Then
            G = 1073741824
        ElseIf ComboBox2.Text = "4 GB" Then
            G = 2147483648
        ElseIf ComboBox2.Text = "6 GB" Then
            G = 3221225472
        ElseIf ComboBox2.Text = "8 GB" Then
            G = 4294967296
        ElseIf ComboBox2.Text = "16 GB" Then
            G = 8589934592
        ElseIf ComboBox2.Text = "32 GB" Then
            G = 17179869184
        ElseIf ComboBox2.Text = "64 GB" Then
            G = 34359738368
        ElseIf ComboBox2.Text = "120 GB" Then
            G = 64424509440

        End If

        Dim Filewriter As New System.IO.StreamWriter("Space.TXT")

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

    End Sub 


   

شكرا اخي الكريم تم حل المشكلة بنجاح الله يجعلها في ميزان حسناتك