Автор вопроса: serrin | Web-сайт:on upgrade | ICQ: 163955885
Private Sub Command1_Click()
Printer.PaperSize = vbPRPSA4
Printer.Orientation = 1
Label1 = Printer.Width
End Sub
Private Sub Command2_Click()
Printer.PaperSize = vbPRPSA4
Printer.Orientation = 2
Label1 = Printer.Width
End Sub
На форме Label и 2 CommandButton.Попробуйте понажимать на кнопку 1 потом на 2.Вылезает ошибка.мсдн не помогло.
380 'Invalid property value
1 и 2 соответственно vbPRORPortrait и vbPRORLandscape.с ними та же ошибка.так вот и вопрос-почему когда меняешь ориентацию бумаги вылезает ошибка?Может неправильно обращаюсь с функцией,тогда как?
А service pack у тебя какой?может изза этого.что недопустимое значение знаю,у меня vbprorlandscape вообще является судя по всему недопустимым значением.сейчас просто размеры листа вписываю,но код раздувается.в чём может быть причина...