Технический форум

Технический форум (http://www.tehnari.ru/)
-   Форум программистов (http://www.tehnari.ru/f22/)
-   -   Несколько вопросов по VB (http://www.tehnari.ru/f22/t8016/)

Helius 31.12.2007 08:31

1)Как сделать, что бы при выборе размера шрифта в ComboBox1 изменялся шрифт в текстовом поле Text1?????
Пробывал писать так:
Код:

Private Sub Combo1_Change()
Text1.FontSize = Combo1.Text
End Sub

еще пробывал так:
Код:

Private Sub Combo1_Change()
If Combo1.Text = "12" Then Text1.FontSize = 12
End Sub

Не работает.
Подскажите плиз, чо я делаю не так?

2)Как сделать, что бы при нажатии на кнопку запускался *.exe/*.avi файл???

VipeR 31.12.2007 19:58

Цитата:

Сообщение от Helius
Код:
Private Sub Combo1_Change()
Text1.FontSize = Combo1.Text
End Sub

дословно - ты присваиваешь размеру шрифта текстового поля Text1 ТЕКСТ, находящийся в выпадающем списке 1.
Итак, правильнее будет:

Private Sub Combo1_Change()
Textbox1.FontSize = Combobox1.Fontsize (размер шрифта в текством поле при изменении значения ниспадающего списка будет равен шрифту сего же ниспадающего списка)
либо, если хочешь поставить другой размер шрифта:
Textbox1.FontSize = х, где х - произвольное число, размер буковок

Цитата:

Сообщение от Helius
Код:
Private Sub Combo1_Change()
If Combo1.Text = "12" Then Text1.FontSize = 12
End Sub

сие при изменении значения ниспадающего списка, если значение текста оного выбирается равным "12" (либо вбивается руками) производит изменение высоты шрифта текстового поля до 12 (смысл чего мне глубоко не понятен) :D

для открытия файла есть функция SHELL ........ юзай MSDN, это лишь подсказка - остальное должен понять сам

Helius 31.12.2007 22:53

Цитата:

Сообщение от -ViрeR-
Private Sub Combo1_Change()
Textbox1.FontSize = Combobox1.Fontsize (размер шрифта в текством поле при изменении значения ниспадающего списка будет равен шрифту сего же ниспадающего списка)
либо, если хочешь поставить другой размер шрифта:
Textbox1.FontSize = х, где х - произвольное число, размер буковок

Так в Combobox'е шрифт всех элементов одинаковый, поэтому при выборе размер шрифта в текстовом поле меняться не будет...

Цитата:

Сообщение от -ViрeR-
для открытия файла есть функция SHELL ........ юзай MSDN, это лишь подсказка - остальное должен понять сам

Спасибо. тока вот MSDN у меня нету((( ща буду качать...

VipeR 31.12.2007 23:54

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

Helius 01.01.2008 00:21

У меня в комбобоксе несколько элементов ( "8","9","12","24","48" и т.д.). Мне надо, что бы при выборе "48" в текстовом поле шрифт становился размером 48, ну и т.д.

VipeR 01.01.2008 01:09

private combobox1_change
if isnumeric (combobox1.text) then
textbox1.fontsize = combobox1.text
else
end

Helius 01.01.2008 09:22

Так ваще не работает.

Попробывал, ради интереса, написал:
Код:

Private Sub Combo1_Change()
Text1.Text = Combo1.Text
End Sub

Опять ни какой реакции.... Получаеться дело в чем-то другом....

P.S. Забыл сказать: Когда было написано
Код:

Private Sub Combo2_Change()
Text1.FontSize = Combo2.Text
End Sub

тогда шрифт менялся, если в комбобокс цифры вводить вручную

VipeR 01.01.2008 12:13

Цитата:

Сообщение от Helius
Private Sub Combo1_Change()
Text1.Text = Combo1.Text
End Sub

вообще ахинея ......... уже объяснял выше

Цитата:

Сообщение от Helius
тогда шрифт менялся, если в комбобокс цифры вводить вручную

не только вручную, но и при выборе любого числового пункта из ниспадающего списка

Цитата:

Сообщение от Helius
Так ваще не работает

так в ниспадающий список ты хоть что-то загонял в виде списка или руками набиваешь??

Helius 01.01.2008 12:35

Цитата:

Сообщение от -ViрeR-
не только вручную, но и при выборе любого числового пункта из ниспадающего списка

Нет! тока если вводил вручную, а при выборе из списка шрифт не менялся!

Цитата:

Сообщение от -ViрeR-
так в ниспадающий список ты хоть что-то загонял в виде списка или руками набиваешь??

Пробывал по разному....

Chyvakoff 02.11.2008 14:31

Хм,почитал,самому стало интересно:)скоро напишу че как делать:)

Chyvakoff 02.11.2008 18:04

Вложение 325
А команда fontsize вообще отсутствует в прграмме.
У меня Microsoft Visual Studio .NET 2003
а вы на чём пишете?

Dalas 16.09.2009 01:11

Не отображается при открывании фотография
 
В общем, сделал давненько восстановление данных на винте, что восстановилось - то восстановилось, что нет- то нет, естесственно, и было удалено) После чего зашел в одну папку, там фотки. Вид-Эскизы страниц. Эскизы страниц(фоток) отображаются ВСЕ. Большинство фоток открываются, а некоторые нет. "Просмотр недоступен" - при открывании стандартной открывалкой)) В чем может быть проблема?

Endrew 16.09.2009 01:35

Цитата:

Сообщение от PcR (Сообщение 90268)
"Просмотр недоступен" - при открывании стандартной открывалкой))

это что -программа просмотра изображений и факсов или еще чего ? если - да ,формат фотки какой пишет на файле

Dalas 17.09.2009 17:39

Цитата:

Сообщение от Endrew (Сообщение 90274)
это что -программа просмотра изображений и факсов или еще чего ? если - да ,формат фотки какой пишет на файле

Да. Расширение, вроде так называется, jpeg)

Yohji 17.09.2009 17:46

PcR, фотку которая не открывается скиньте на файлообменник http://exfile.ru и ссылку сюда, поглядим.

Dalas 18.09.2009 23:52

http://exfile.ru/60406

set of letters 19.09.2009 00:11

Цитата:

Сообщение от PcR (Сообщение 90268)
сделал давненько восстановление данных на винте

Что значит сделал восстановление данных?
Не открылась вообще ни одной программой для работы с фото, из тех, что есть. Удалены все данные о фото. Проги отказываются открывать из-за повреждения

Dalas 19.09.2009 00:57

Цитата:

Сообщение от interesnovse- (Сообщение 91243)
Что значит сделал восстановление данных?

Винт полетел, видимо. Часть данных была утеряна, большая часть восстановлена. + физически на винте(250гб) стало меньше на ~100гб, т.е. ща 150гб тока юзать можно) С помощью проги одной восстанавливал, что было повреждено - удалялось, что давало надежду на жизнь - восстановлено) Вот и думаю чож тогда эти фотки не удалились(видимо коряво восстановилось), и самое обидное, что в папке с видом 'эскизы страниц' видны эти фотки))

set of letters 19.09.2009 01:00

Фотки эти навряд ли удастся восстановить из-за повреждений. Фото хуже всего поддаются восстановлению


Часовой пояс GMT +4, время: 03:14.

Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.