[انجي عبدالله]

السلام عليكم انا لسه مبتدئه في الفيجوال بيسك وواجهتي مشاكل في البرنامج اللي انا اعمله
المشكله الاولى :::معي تكست بوكس رقم الحارة ولست بوكس باسماء الحارات ,,اذا اخترت الرقم في التكست يظهر لي تلقائيا اسم الحاره  وعملتها بقاعدة if والحمد لله ضبطت معي بس اذا اخترت الحاره مايتغير رقم الحاره يعني العمليه لم تجح معي بالعكس ايضا
المشكلة الثانيه هي case مابتطبق معي وعملتها بنفس الفكره السابقه يعني تكت بوكس في الرقم واللست بوكس فيه الحاله وحطيت الكود التالي في التكست بوكس

Dim x As Integer  

Private Sub TextBox38_TextChanged(sender As Object, e As EventArgs) Handles TextBox38.TextChanged
(x = Val(TextBox38.Text

       Select Case

           Case 1
               ListBox2.Text = "منزل\بيت مستقل"
           Case 2
               ListBox2.Text = "شقه"
           Case 3
               ListBox2.Text = " منشأة مسكونة"
           Case 4
               ListBox2.Text = " صندقة"
           Case 5
               ListBox2.Text = " سكن جماعي\فئات خاصة"
         
       End Select
   End Sub

المشكلة الثالثة ::لما اعمل RadioButton او CheckBox عاوزه البيانات اللي تتخزن في الداتا بيس انا احددها  مش true & checked.



اتمنى المساعده من حضراتكم لاني لسه مبتدئه في الفيجوال بيسك واللي اشتغل فيه هو تبع الفيجوال ستوديو 1012