VBA/Формат числа

Программирование
#1

Здравствуйте! Я, наверное, уже всех задолбал, но у меня остался только несколько вопросов.

При написании кода:

Sub Zadanie1()
Dim s As Double, i As Long, x As Double
s = 0
z = 1
x = 1
For i = 1 To 16
 s = s + ((-1) ^ (i + 1)) * (Sin(Abs(x) ^ (1 + 0.2 * i)) / (2 ^ (2 * i)))
Next i
MsgBox ("Значение функции=" + Str(s))
End Sub

я использовал Str(s) и получился такой ответ

image
image1366×768 64.3 KB

Но преподаватель требует, чтобы был 0 до запятой. Как так сделать? Через формат? но тогда будет слишком много символов. И как поменять заголовок диалогового окна “Microsoft excl” на любое другое

#2

Это как? Тут же тоже много.

#3

или наверное, лучше всего округлить?

#4

2 сообщения было перенесено в новую тему: VBA, как поменять заголовок диалогового окна?

#5

Вы и округлите и через формат сделайте - поставте препода в тупик