• при помощи бейсика нарисуйте любой рисунок срочно надо заранее спасибо разрешение 640*480

Ответы 1

  • Public Class Form1   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        Dim g As Graphics        g = PictureBox1.CreateGraphics        g.DrawEllipse(Pens.Red, 75, 0, 50, 50)        g.DrawEllipse(Pens.Red, 50, 50, 100, 100)        g.DrawEllipse(Pens.Red, 0, 150, 200, 200)   End SubEnd ClassУ вас получuтся снеговUк, только добавь на форму pictureBox
    • Автор:

      buddie
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years