ورود

نسخه کامل مشاهده نسخه کامل : دو برنامه با ویژوال



turokpooria
21-04-2009, 19:28
با سلام من 3 روز دیگه امتحان دارم خواهشا کمک
یک برنامه می خوام که عملیات دلتا رو انجام بده با تمام مراحل در 3 تکست (حل معادله درجه 2)
و دیگری اگر عدد یک را بدهیم 1 ستاره و اگر عدد 2 را بزنیم 3 ستاره و ... تا n ممنون می شم کمک کنید:46:

moshaveran
22-04-2009, 10:16
سلام دوست من
فعلاً برنامه دوم را برات می زارم تا رو دومی فکر کنم.
بیا اینم دستورات برنامه دوم:

Private Sub Command1_Click()
Dim a, i As Integer
Dim s As String
a = CInt(Me.Text1.Text)
i = 0
s = ""
For i = 1 To a
s = s & "*"
Next
Me.Label1.Caption = s
End Sub

m_diamond67
23-04-2009, 00:37
دوست عزیز به این تاپیک سر بزن تا برنامه مربوط به معادله درجه 2 رو پیدا کنی.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

turokpooria
23-04-2009, 18:54
مشاوران من گفتم اگه عدد 1 بود 1 ستاره اگه دو بود 3 ستاره اگه 3 بود 5 تا ستاره و..........
این معادله درجه2 کار نمیکنه