منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : المؤشرات فى الفيجوال ؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله ..
انا مبرمج كويس فى c بس لسه جديد فى الفيجوال بيزك Undecided..
الحقيقه انا عملت برنامج بلغة ال c ومش عارف ازاى ممكن اكتبه فى كود الفيجوال فياريت لو حد يساعدنى
البرنامج بندخل فيه string حروف وبعد كده مجرد ما دخلنا اى حرف موجود فى ال string بيرجعلنا رقم الحرف ده او ترتيبه يعنى فى ال string
فى ال c بستخدم المؤشرات مش عارف فى الفيجوال اعمل ايه
البرنامج بلغة ال c اهو
#include "string"
#include "stdio.h"
int main(void)
{
char string[15];
char *ptr,c='T';

strcpy(string,"This is a string");
ptr=strchr(string,c);
if (ptr)
printf("The character%cis at position: %d ",c,ptr-string+1);
else
printf("The character was not foundn");
return 0;
}
السلام عليكم...

كود :
Dim MyStr As String, MyChar As String
Dim CharPos As Long

MyStr = "This is a string"
MyChar = "T"

CharPos = InStr(MyStr, MyChar)

if CharPos = 0 Then
    MsgBox("Character not found")
Else
    MsgBox("Character " & MyChar & " found at pos " & CStr(CharPos))
End If

الدالة InStr تبحث عن وجود String داخل String و تعيد رقم موقعه إن كان موجوداً، أو صفر إذا كان غير موجود.

أول character رقمه 1 و ليس 0 كما في لغة C.

نرجو الاستفادة و السلام.
شكرا جزيلا اخى ناجى
لكن ماذا لو اردت ان يشير لى عن كل اماكن حرف ال "T" فى الجملة وليس عن اول مكان فقط ؟