Advertisement
wetyukmnbxc

Untitled

Mar 5th, 2023
130
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #requires -version 3
  2.  
  3. $button1 = New-Object System.Windows.Forms.Button
  4. $button1.Location = New-Object System.Drawing.Point(10, 10)
  5. $button1.Size = New-Object System.Drawing.Size(75, 23)
  6. $button1.Text = "Blue"
  7. $button1.BackColor = "Blue"
  8.  
  9. $button2 = New-Object System.Windows.Forms.Button
  10. $button2.Location = New-Object System.Drawing.Point(10, 43)
  11. $button2.Size = New-Object System.Drawing.Size(75, 23)
  12. $button2.Text = "Blue"
  13. $button2.BackColor = "Blue"
  14.  
  15. $button3 = New-Object System.Windows.Forms.Button
  16. $button3.Location = New-Object System.Drawing.Point(10, 73)
  17. $button3.Size = New-Object System.Drawing.Size(75, 23)
  18. $button3.Text = "Blue"
  19. $button3.BackColor = "Blue"
  20.  
  21. $button4 = New-Object System.Windows.Forms.Button
  22. $button4.Location = New-Object System.Drawing.Point(10, 103)
  23. $button4.Size = New-Object System.Drawing.Size(75, 23)
  24. $button4.Text = "Blue"
  25. $button4.BackColor = "Blue"
  26.  
  27. $form = New-Object System.Windows.Forms.Form
  28. $form.Location = New-Object System.Drawing.Point(10, 10)
  29. $form.Size = New-Object System.Drawing.Size(400, 300)
  30. $form.BackColor = "White"
  31.  
  32. $textDisplay = New-Object System.Windows.Forms.TextBox
  33. $textDisplay.Location = New-Object System.Drawing.Point(10, 150)
  34. $textDisplay.Size = New-Object System.Drawing.Size(390, 23)
  35. $textDisplay.Text = "Press a button to change the color"
  36.  
  37. $form.Controls.Add($button1)
  38. $form.Controls.Add($button2)
  39. $form.Controls.Add($button3)
  40. $form.Controls.Add($button4)
  41.  
  42. $form.TopMost = $true
  43.  
  44. $form.Add_Shown($textDisplay)
  45.  
  46. $application = New-Object System.Windows.Forms.Application
  47.  
  48. $application.Start()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement