مرجع سورس های ویژوال بیسیک ( درخواست سورس )

سلام

لطفا سورس های گرافیکی ویژوال بیسیک را در این قسمت قرار دهید:1. (23):

نقل قول:

---

ارسالی توسط MehdiB برای مشاهده این لینک/عکس می بایست عضو شوید !برای عضویت اینجا کلیک کنید ]

سلام

لطفا سورس های گرافیکی ویژوال بیسیک را در این قسمت قرار دهید:1. (23):

---

سورس های گرافیکی هم در این تاپیک موجوده ..

دستت درد نكنه واقعاخسته نباشي

سلام
یه مدت طولانی نبودم(تو کما بودم) ولی امروز با دست پر اومدم.
سورس برنامه ی سی ادیت رو واستون آوردم که ویژه گی های زیر رو داره:
-ادیت کردن سورس تمامی زبان های برنامه نویسی
-کامپایل کردن همه گی آنها
-وبسیار امکانات جالب و کاربردی دیگ
امید وارم پس از دانلود نظر بدین.:cool:

برای مشاهده این لینک/عکس می بایست عضو شوید !برای عضویت اینجا کلیک کنید ]

سلام:great:.
یه سری سورس کد + کامپوننت برای کار بامدم براتون میزارم.
این سورس ها و کامپوننت ها امکانات کاملی رو به شما جهت کار با مودم میده.
امیدوارم لذت ببرید.
در ضمن داش آکل های سایت نظر بدن.:1. (27):

برای مشاهده این لینک/عکس می بایست عضو شوید !برای عضویت اینجا کلیک کنید ]

این سورس برنامه ها رو در سطح مبتدی ریسورس می کنه.
تا چند روز دیگه سورس یک Decompiler عالی رو براتون میزارم.
برای مشاهده این لینک/عکس می بایست عضو شوید !برای عضویت اینجا کلیک کنید ]

سلام ازتوضیحات خوبتون ممنونم
من یه سری عددداخل یه textbox دارم که باید اول ازهم تفکیکشون کنم بعدشم براشون یه چارت رسم کنم
اگه بتونید راهنماییم کنید ممنون میشم

نقل قول:

---

ارسالی توسط pmf_1 برای مشاهده این لینک/عکس می بایست عضو شوید !برای عضویت اینجا کلیک کنید ]

سلام ازتوضیحات خوبتون ممنونم
من یه سری عددداخل یه textbox دارم که باید اول ازهم تفکیکشون کنم بعدشم براشون یه چارت رسم کنم
اگه بتونید راهنماییم کنید ممنون میشم

---

بیشتر توضیح بدید دوست عزیز .. چه نوع اعدادی هستند

نقل قول:

---

ارسالی توسط pmf_1 برای مشاهده این لینک/عکس می بایست عضو شوید !برای عضویت اینجا کلیک کنید ]

سلام ازتوضیحات خوبتون ممنونم
من یه سری عددداخل یه textbox دارم که باید اول ازهم تفکیکشون کنم بعدشم براشون یه چارت رسم کنم
اگه بتونید راهنماییم کنید ممنون میشم

---

کد:

---

Dim intLen As Integer
Dim intRenge As Byte
Dim arrInt() As Integer

Private Sub Command1_Click()

intRenge = intLen
ReDim arrInt(intRenge)

For i = 1 To (intLen + 1)
arrInt(i - 1) = Val(Mid(Text1.Text, i, 1))
Print arrInt(i - 1)
Next

MSChart1.ChartData = arrInt

End Sub

Private Sub Form_Load()

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 49 Or KeyAscii > 58 Then
KeyAscii = 0
Else
intLen = Len(Text1.Text)
End If

End Sub

---

ازComponet این را Microsoft chart controler را add کنید .

من راجع به chart اطلاعاتی نداشتم اما این را مطالعه کنید :

برای مشاهده این لینک/عکس می بایست عضو شوید !برای عضویت اینجا کلیک کنید ]

راجع به بانک اطلاعاتی سکوآل سرور هم نمونه سورس بذارید
من یک سورس می خوام که بعید می‌دونم بتونید گیر بیارید و اونم سورس ویرایشگر DHTML Edit هست اگه پیدا کردید این جا بذارید