Вывод сообщения средствами VB
Формулировка задачи:
Добрый день! Можно ли, красивую надпись вывести на форме. То есть не просто сообщение, а покрасивее там, к примеру что-то типа картинки во вложении, но не картинку показать, а надпись с эффектами, надеюсь поняли.
Или точно так же как на картинке.
Решение задачи: «Вывод сообщения средствами VB»
textual
Листинг программы
Private Sub Form_Load() Dim i As Integer Picture1.CurrentX = 1 Picture1.CurrentY = 0 Picture1.ForeColor = vbBlack Picture1.Print "Text3D" Picture1.CurrentX = 0 Picture1.CurrentY = 1 Picture1.ForeColor = vbBlue Picture1.Print "Text3D" For i = 0 To 5 Picture2.CurrentX = 5 - i Picture2.CurrentY = i Picture2.ForeColor = RGB(100, 0, 0) Picture2.Print "Text3D" Next Picture2.CurrentX = 0 Picture2.CurrentY = 5 Picture2.ForeColor = RGB(150, 0, 0) Picture2.Print "Text3D" For i = 0 To 5 Picture3.CurrentX = 5 - i Picture3.CurrentY = i Picture3.ForeColor = RGB(0, 50 + i * 20, 0) Picture3.Print "Text3D" Next Picture3.CurrentX = 0 Picture3.CurrentY = 5 Picture3.ForeColor = RGB(0, 200, 0) Picture3.Print "Text3D" End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д