تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تحويل كود الى جافا
#1
ارجوا من الاخوة تحويل هذا الكود الى كود بالجافا بارك الله فيكم.
Dim  Total As Integer
Dim I As  Integer

 

For I = 1 To Len(TextBox1.Text)
    
    Select Case Mid$(TextBox1.Text, I, 1)
         Case "ء" : Total = Total + 1
                Case "ا" : Total = Total + 1
                Case "أ" : Total = Total + 1
                Case "آ" : Total = Total + 1
                Case "ب" : Total = Total + 2
                Case "ج" : Total = Total + 3
                Case "د" : Total = Total + 4
                Case "ه" : Total = Total + 5
               Case "ة" : Total = Total + 5
    End Select
    Next
    TextBox2.Text = Total
الرد }}}
تم الشكر بواسطة:
#2
(29-05-22, 10:25 PM)saidhamed كتب : ارجوا من الاخوة تحويل هذا الكود الى كود بالجافا بارك الله فيكم.
Dim  Total As Integer
Dim I As  Integer

 

For I = 1 To Len(TextBox1.Text)
    
    Select Case Mid$(TextBox1.Text, I, 1)
         Case "ء" : Total = Total + 1
                Case "ا" : Total = Total + 1
                Case "أ" : Total = Total + 1
                Case "آ" : Total = Total + 1
                Case "ب" : Total = Total + 2
                Case "ج" : Total = Total + 3
                Case "د" : Total = Total + 4
                Case "ه" : Total = Total + 5
               Case "ة" : Total = Total + 5
    End Select
    Next
    TextBox2.Text = Total

السلام عليكم
سوف احول لك الكود وقم بتغيير التيكست بوكس للاداة التي تريد استخدامها
وعندما يعمل الكود لديك ارفعه مرة اخى حتى اختصر لك الكود



PHP كود :
int Total;
int I;
for (
1; (<= TextBox1.Text.Length); I++) {
 
   switch (TextBox1.Text.Substring((1), 1)) {
 
       case "ء":
 
           Total = (Total 1);
 
           break;
 
       case "ا":
 
           Total = (Total 1);
 
           break;
 
       case "أ":
 
           Total = (Total 1);
 
           break;
 
       case "آ" Total Total ":
            break;
        case "
ب":
            Total = (Total + 2);
            break;
        case "
ج":
            Total = (Total + 3);
            break;
        case "
د":
            Total = (Total + 4);
            break;
        case "
ه":
            Total = (Total + 5);
            break;
        case "
ة":
            Total = (Total + 5);
            break;
    }
}

TextBox2.Text = Total; 
الرد }}}
تم الشكر بواسطة:
#3
كود :
public class Main {
   public static void main(String[] args) {
       int total = 0;
       String text = "your text"; // يجب استبدال "your text" بالنص الذي ترغب في حساب إجمالي قيمته

       for (int i = 0; i < text.length(); i++) {
           char c = text.charAt(i);

           switch (c) {
               case 'ء':
               case 'ا':
               case 'أ':
               case 'آ':
                   total += 1;
                   break;
               case 'ب':
                   total += 2;
                   break;
               case 'ج':
                   total += 3;
                   break;
               case 'د':
                   total += 4;
                   break;
               case 'ه':
               case 'ة':
                   total += 5;
                   break;
           }
       }

       System.out.println(total); // يتم طباعة القيمة الإجمالية
   }
}
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم