1

مشكلة في جمع الباراميتر

  • abomusab

السلام عليكم ورحمة الله

لدي رابط قمت بتقسيمة الى 3 اقسام

وعندما اقوم بجمعة داخل حلقة يظهر لي خطأ

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim a As String = " http://server9.mp3quran.net... " Dim b As Integer = 1 Dim c As String = ".mp3" For b = 1 To 604 wmp.URL = a + b + ".mp3" Next

End Sub

اين المشكلة

يرجى الدخول لحسابك أو تسجيل حساب لتستطيع إضافة تعليق
حساب جديد دخول

التعليقات

2
عبد الرحمن أحمد أضف ردا

الخطأ ناتج عن أنك تجمع عدد إلى نص وهو المتغير b

لهذا يجب أن تحوله إلى نص عند الجمع

wmp.URL = a + b.ToString() + ".mp3"
1
Hatem أضف ردا

حسنا صديقي المشكلة متعلقة بالمتغير b حيث ان قيمته رقميه بحته 1 ومعنى هذا انه عند استخدامك لاشارة (+) سيقوم بعملية جمع حقيقية مع النصوص المتواجدة في المتغيرين a و c وهو ما لا يقبله العقل. يجب عليك ان تحول قيمة المتغير b الى نص او String وذلك باستخدام الطريقة التالية :

a.toString() .

تحياتي

0
abomusab أضف ردا

يبدو ان الموقع لا يرتب ال كود

هذا هو الكود بغد رفعة

1
عبد الرحمن أحمد أضف ردا

هو يرتب الكود ولكن يشترط وضع أربع مسافات قبل كل سطر

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim a As String = "

http://server9.mp3quran.net... " Dim b As Integer = 1 Dim c As String = ".mp3" For b = 1 To 604 wmp.URL = a + b + ".mp3" Next End Sub

0
عبد الرحمن أحمد أضف ردا

أين تجرب تنفيذ الكود وما هوا الخطأ الذي يظهر

لأنك تستخدم كود فيجوال بيسيك وأنت وضعت رابط الكود

في محرر php !

0
abomusab أضف ردا

:P لا يهم اخوي ان كان الموقع لل php او لغيره

المهم هي ايصال الكود لحل المشكلة

الكود بالطبع أضعع في برنامج الفيسوال

0
Hatem أضف ردا

ما هو الخطأ الذي يظهر لك ؟ قم بنسخه هنا.