Как создать выполнение операций при запуске формы

Язык Visual Basic на платформе .NET.

Модераторы: Ramzes, Sebas

mnxamoto
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 27.02.2013 (Ср) 13:28

Как создать выполнение операций при запуске формы

Сообщение mnxamoto » 27.02.2013 (Ср) 13:46

У меня есть пару вопросов:

1. Как создать выполнение операций при запуске формы. Я хочу чтобы при запуске формы кнопка окрашивалась в цвет который я задал Pen1, в последствии он будет сам меняться так как, я задал этой кнопке оператор ColorDialog.

2. Что не так с кодом? (Может это простой вопрос, но помогите плиз)
Код: Выделить всё
Label1.Text = ("Введите ниже текст, который будет отображать на изображении" "по координатам: x:" (x1) "и y:" (y1)


3. Как создать выполнение такой операции, чтобы при нажатии кнопки в форме(Например: Form1), менялось значение размера элемента PictureBox в другой форме (Например: Form2)? Не могу сделать ссылку на PictureBox.Size.

Всем кто поможет большое спасибо!!! :D

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 27.02.2013 (Ср) 15:09

mnxamoto писал(а):1. Как создать выполнение операций при запуске формы.

Обработать событие Form_Load.

mnxamoto писал(а):2. Что не так с кодом?

Сложнее сказать, что с ним так.

mnxamoto писал(а):3. Как создать выполнение такой операции, чтобы при нажатии кнопки ...

Обработать её событие Click.

mnxamoto
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 27.02.2013 (Ср) 13:28

Re: Как создать выполнение операций при запуске формы

Сообщение mnxamoto » 28.02.2013 (Чт) 6:30

На счёт первого спасибо, но на счёт третьего:
Я понимаю что нужно обработать событие клик, у меня не получается передать значение переменной из первой формы значению другой переменной из другой формы.

и на счёт второго:
Код: Выделить всё
Label1.Text = "Введите ниже текст, который будет отображать на изображении" "по координатам: x:" (x1) "и y:" (y1)

пишет что требует завершение оператора, в частности требовал ")", но кода их ставишь появляется массив который этот оператор не может обработать.

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 28.02.2013 (Чт) 6:49

mnxamoto писал(а):Я понимаю что нужно обработать событие клик, у меня не получается передать значение переменной из первой формы значению другой переменной из другой формы.

Лучше самому создавать экземпляр формы и оттуда тащить нундые данные.
Другой вариант - использовать возможности совместимости с VB6 и My.Forms.

mnxamoto писал(а):и на счёт второго:
Код: Выделить всё
Label1.Text = "Введите ниже текст, который будет отображать на изображении" "по координатам: x:" (x1) "и y:" (y1)

пишет что требует завершение оператора, в частности требовал ")", но кода их ставишь появляется массив который этот оператор не может обработать.

А расставить операторы конкатенации строк не пробовал?
Какой ещё массив? Массив пишется через запятую в фигурных скобках.

mnxamoto
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 27.02.2013 (Ср) 13:28

Re: Как создать выполнение операций при запуске формы

Сообщение mnxamoto » 28.02.2013 (Чт) 10:41

Спасибо, помог

ну если не трудно ответь ещё на один вопрос:
заранее задал:
Код: Выделить всё
Dim x1, y1 As Integer
    Dim T As String
    Dim Pen1 As New Pen(Color.Black, 3)
    Dim Brush1 As New SolidBrush(Color.Red)
    Dim Image1 As New Bitmap(1200, 800)
    Dim drawFont As New Font("Arial", 12)
    Dim Graph1 As Graphics = Graphics.FromImage(Image1)
    PictureBox1.Image = Image1

и хочу что бы наносилось на PictureBox текст:
Код: Выделить всё
If Label1.Text = 1 Then T = TextBox1.Text : Graph1.DrawString(T, drawFont, Pen1, x1, y1)

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 28.02.2013 (Чт) 10:49

mnxamoto писал(а):заранее задал:

Лучше думать, что надо заранее, а что нет. Вообще, для красной кисти есть Brushes.Red, если не ошибаюсь.

mnxamoto писал(а):If Label1.Text = 1 Then

Так писать плохо.

mnxamoto писал(а):T = TextBox1.Text : Graph1.DrawString(T, drawFont, Pen1, x1, y1)

И так тоже.

mnxamoto писал(а):ну если не трудно ответь ещё на один вопрос

А где вопрос?

mnxamoto
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 27.02.2013 (Ср) 13:28

Re: Как создать выполнение операций при запуске формы

Сообщение mnxamoto » 28.02.2013 (Чт) 10:57

у меня таком коде:
Код: Выделить всё
If Label1.Text = 1 Then T = TextBox1.Text : Graph1.DrawString(T, drawFont, Pen1, x1, y1)

пишет ошибку:
не удалось разрешить перегрузку, так как ни один допустимый DrewString не может быть вызван данными аргументами

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 28.02.2013 (Чт) 11:22

mnxamoto писал(а):не удалось разрешить перегрузку, так как ни один допустимый DrewString не может быть вызван данными аргументами

Ну так посмотри прототипы метода. Он не принимает перья.

mnxamoto
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 27.02.2013 (Ср) 13:28

Re: Как создать выполнение операций при запуске формы

Сообщение mnxamoto » 28.02.2013 (Чт) 12:09

да точно я перепутал
Спасибо за все!!!


Вернуться в Visual Basic .NET

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 15

    TopList