| |
|
|
| | Есть функция:
Function DIN_Kl(Kl0, Kl1) As String
Dim d As Variant
Dim P As Variant
d = Kl1 - Kl0
P = Round(Kl1 / Kl0 * 100, 0)
If d > 0 Then
DIN_Kl = "По сравнению со значением на начало периода наблюдается положительная динамика показателя: увеличение показателя на " & P & "%."
ElseIf d = 0 Then
DIN_Kl = "Значение показателя не меняется"
ElseIf d < 0 Then
DIN_Kl = "По сравнению со значением на начало периода наблюдается отрицательная динамика показателя: уменьшение показателя на" & P & "%."
End If
End Function
|
Вопрос. Как выкрасить цвет текста получаемой переменной "P"- в первом случае (там где положительная динамика) например в зеленный, а в третьем (там где отрицательная динамика) в красный!!? При этом чтоб остальной текст оставался черным кроме значка процента - он должен соответствовать цвету переменной P/
Посоветуйте какими методами и их свойствами это можно сотворить!!! | |
| |
| |
| |
|
|
| | кусок строки в стандарнтых контролах ACCESS - никак | |
| |
| |
| |
|
|
| | а если схитрить? длина текста примерно одинаковая у положительной и отрицательной...
сделать 2 поля - в одном проценты, в другом - текст. прикинуть длину и разместить поле с процентами отдельно и управлять его видимостью и цветом текста в коде?
или как вариант - отчет с 2 полями: текст и процент. со сжатием\расширением... | |
| |
| |
| |
|
|
| | >а если схитрить? длина текста примерно одинаковая у
>положительной и отрицательной...
>сделать 2 поля - в одном проценты, в другом - текст.
>прикинуть длину и разместить поле с процентами отдельно и
>управлять его видимостью и цветом текста в коде?
Голь на выдумки хитра как говориться.. можно подумать. Вообще это задумано для наглядности при отображении аналитики в форме - так что реально.
>или как вариант - отчет с 2 полями: текст и процент. со
>сжатиемрасширением...
Тоже мысль но не пригодиться. Отчет строю в WORD'е закладками, так что требуемую фразу придется из кусков клеить.
Благодарю за участие!!! | |
| |
| |
| |
|
|
| | Да.. А я думал мы всесильны...
Но все равно спасибо. | |
| |
| |
| |
|
|
| | можно испоьзовать richtextbox, но, думаю, овчинка выделки не стоит. | |
| |
| |
