شرح مختصر : پیانو یکی از پرطرفدارترین آلات موسیقی است که به سبب موزیک دلنشیی که ایجاد می کند علاقمندان بسیاری داشته و بسیاری از این افراد نیز آرزو دارند تا نواختن موزیک با پیانو را تجربه کنند اما به دلیل قیمت گزاف این آلت موسیقی از علاقه ی خود صرف نظر می کنند. . شما با پروژه که در محیط ویژوال بیسیک 6 نوشته شده، میتوانید یک پیانو داشته باشد که با کلیک موس و دکمه های صفحه کلید صدای یک پیانو واقعی را تولید کند. از امکانات این پروژه میتوان به تغییر ولوم صدا، تغییر تن صدا اشاره کرد.
شرح مختصر : این نرم افزار کاملا ساده، آماتور و آموزشی جهت فراگیری نحوه ثبت اطلاعات و ایحاد ارتباط با بانک اطلاعاتی اکسس میباشد
پروژه بازی دوز ویژوال بیسیک باهوش مصنوعی ،بازی دوز 12 تایی اگه بتونین ازش ببرید یعنی خیلی باهوش هستید مطمعن هستم خوشتون میاد فقط بجنبید که تعداد دانلودش محدوده
یه بازی تفنگی باحال برا برنامه نویسای ویژوال بیسیک 6 حتما خوشتون میاد اگه مشکلی داشتید این ایمیل منه tiptope.roz@gmail.com این هم قسمتی از سورس کدهای برنامه
Private Sub Shoot()
On Error Resume Next
Bullits = Bullits - 1
Tmp = PlaySound("Fire.wav", 1, 1)
Select Case Dir
Case 1
For Cnt = 0 To 9
Tmp = Right$(Left$(Rows(R - Cnt), C), 1)
If Val(Tmp) >= 5 And Val(Tmp) <= 7 Then
Rows(R - Cnt) = Left$(Rows(R - Cnt), C - 1) & "0" & Right$(Rows(R - Cnt), 12 - C)
Tmp = PlaySound("Kill.wav", 1, 1)
End If
Next Cnt
Case 2
سورس کدهای بازی با برنامه ویژوال بیسیک 6 Ball-N-Padlle یه بازی باحال برای برنامه نویسانی که با ویژوال بیسیک 6 کارمیکنن قسمتی از سورس کدهای برنا مه رو براتون میزارم
Private Sub Timer1_Timer()
If Ball.Top >= Frame1.Height - Ball.Height Then
ComputerScore = ComputerScore + 1
Label3.Caption = Str(ComputerScore)
Beep
yFlag = 1
End If
If Ball.Top <= Frame1.Top - (Ball.Height - 30) Then
PlayerScore = PlayerScore + 1
Label2.Caption = Str(PlayerScore)