1)Как сделать, что бы при выборе размера шрифта в ComboBox1 изменялся шрифт в текстовом поле Text1?????
Пробывал писать так: Код:
Private Sub Combo1_Change() Код:
Private Sub Combo1_Change() Подскажите плиз, чо я делаю не так? 2)Как сделать, что бы при нажатии на кнопку запускался *.exe/*.avi файл??? |
Цитата:
Итак, правильнее будет: Private Sub Combo1_Change() Textbox1.FontSize = Combobox1.Fontsize (размер шрифта в текством поле при изменении значения ниспадающего списка будет равен шрифту сего же ниспадающего списка) либо, если хочешь поставить другой размер шрифта: Textbox1.FontSize = х, где х - произвольное число, размер буковок Цитата:
для открытия файла есть функция SHELL ........ юзай MSDN, это лишь подсказка - остальное должен понять сам |
Цитата:
Цитата:
|
ну так шрифт будет такого же размера, что и текст в комбобоксе ........ ты же это хотел? или просто понял неправильно
|
У меня в комбобоксе несколько элементов ( "8","9","12","24","48" и т.д.). Мне надо, что бы при выборе "48" в текстовом поле шрифт становился размером 48, ну и т.д.
|
private combobox1_change
if isnumeric (combobox1.text) then textbox1.fontsize = combobox1.text else end |
Так ваще не работает.
Попробывал, ради интереса, написал: Код:
Private Sub Combo1_Change() P.S. Забыл сказать: Когда было написано Код:
Private Sub Combo2_Change() |
Цитата:
Цитата:
Цитата:
|
Цитата:
Цитата:
|
Хм,почитал,самому стало интересно:)скоро напишу че как делать:)
|
Часовой пояс GMT +4, время: 08:33. |
Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.