Lucky Seven Code: Public Class Form1 Private Sub Button2_Click(ByVal sender As S
ID: 3641890 • Letter: L
Question
Lucky Seven Code:
Public Class Form1
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
PictureBox1.Visible = False ' hide picture
Label1.Text = CStr(Int(Rnd() * 10)) ' pick numbers
Label2.Text = CStr(Int(Rnd() * 10))
Label3.Text = CStr(Int(Rnd() * 10))
' if any number is 7 display picture and beep
If (Label1.Text = "7") Or (Label2.Text = "7") _
Or (Label3.Text = "7") Then
PictureBox1.Visible = True
Beep()
End If
End Sub
End Class
Modify the Lucky Seven game to present the user with a video poker hand (5 card). While you do not have to present graphics for the 5 cards, you may wish to change the main screen graphic to something of your own design. For the cards, each card can be any available from a standard deck of cards. Once a card is used, it cannot be used again in that hand (example: you draw the Jack of Hearts; you cannot draw that same card again). When all 5 cards are shown on screen, allow the user to discard and draw new cards once (up to all 5 cards at a time, but only allow them to change the cards once). Inform the user of their result in a dialog box (example: 3 of a kind or 2 pairs, etc.). After the user clears the result, allow the user to draw a hand again or exit the program.
Explanation / Answer
ATLPROG : Hi ATLPROG : Welcome back ATLPROG : After long time :) Customer : Hello ATL Customer : I think this question was asked and answered last year. Do you need the code for the Lucky7 program? ATLPROG : yes i do ATLPROG : hold on ATLPROG : Did you need help with anything else? Customer : can I attach the file? No, I just need help with this program that is due next Tuesday ATLPROG : Can you please go to www.wikisend.com and upload your file ? Once you do that you will get a page that has the "File ID" and "Download Link". Copy the "Download Link" or "File ID" and please paste it in your reply here. Customer : http://wikisend.com/download/144734/MyLucky7.sln Customer : File ID: 144734 ATLPROG : i will need the complete VB project.. ATLPROG : not just the .sln file Customer : Roger standby ATLPROG : k Customer : http://wikisend.com/download/579254/MyLucky7.vbproj Customer : File ID: 579254 ATLPROG : This won't work too.. ATLPROG : Can i work on it and send you what i got Customer : did I send the wrong file? ATLPROG : yes ATLPROG : I need the complete zipped Visual Basic project Customer : ok, let me work on that. ATLPROG : k Customer : http://wikisend.com/download/443386/MyLucky7.rar Customer : File ID: 443386 Customer : I have to go to work to handle a emergency issue. I will await your email notification. Thanks in advance. ATLPROG : got it ATLPROG : will keep you posted ATLPROG : Please feel free to ask me another question (by starting question with "For ATLProg Only" to ensure your question comes to me), if you’re a subscriber, you can do so at no additional cost beyond your monthly payment. ATLPROG : I am almost done with this ATLPROG : Hello. I have an update/question for you, Please leave me a message when you are back here (even if the system shows me offline). Customer : I am back online ATLPROG : hi ATLPROG : are you still there? Customer : yes ATLPROG : Answer Customer : thanks, let me download and run ATLPROG : k
Related Questions
Navigate
Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.