Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Notes Добавлено: 13.07.11 18:55  

Автор вопроса:  Daniel | Web-сайт: smallsoft.ucoz.com | ICQ: 610950440 
Прошу протестировать бета-версию программы Notes, инструмента для создания заметок на рабочем столе (это звучит круто :) )

В общем, если найдутся баги, пишите.

http://afc2008.narod.ru/notes.rar

Ответить

  Ответы Всего ответов: 9  

Номер ответа: 1
Автор ответа:
 Daniel



ICQ: 610950440 

Вопросов: 12
Ответов: 45
  Web-сайт: smallsoft.ucoz.com
 Профиль | | #1 		Добавлено: 13.07.11 18:58
Вирусов нет.

Ответить

Номер ответа: 2
Автор ответа:
 Daniel



ICQ: 610950440 

Вопросов: 12
Ответов: 45
  Web-сайт: smallsoft.ucoz.com
 Профиль | | #2 		Добавлено: 13.07.11 19:14
И отзывы пишите.

Ответить

Номер ответа: 3
Автор ответа:
 @lex



Вопросов: 14
Ответов: 262
  Профиль | | #3 Добавлено: 13.07.11 20:14
1. Зачем
  1. Dim text As String
  2. text = Text1.text
  3. frmMain.Text1.text = text

Если можно просто
  1. frmMain.Text1.Text = Text1.Text


2. Зачем нужна Command2, если она вообще ничего не делает?
  1. Private Sub Command2_Click()
  2. If Command2.Caption = "Ï" Then
  3. Command2.Caption = "Ç"
  4. Me.BorderStyle = 2
  5. Exit Sub
  6. Else
  7. Command2.Caption = "Ï"
  8. Me.BorderStyle = 0
  9. End If
  10. Exit Sub
  11. End Sub

Я молчу про ненужные Exit Sub'ы. Хочешь чтобы работало как задумал - пиши
  1. Private Sub Command2_Click()
  2. If Command2.Caption = "Ï" Then
  3. Command2.Caption = "Ç"
  4. Me.BorderStyle = 2
  5. Exit Sub
  6. Else
  7. Command2.Caption = "Ï"
  8. Me.BorderStyle = 0
  9. End If
  10. Exit Sub
  11. End Sub


3. Зачем? Чем эта мм... штука отличается от виндового Блокнота? Кроме того, что в нем можно текст менять моментально.

Ответить

Номер ответа: 4
Автор ответа:
 @lex



Вопросов: 14
Ответов: 262
  Профиль | | #4 Добавлено: 13.07.11 20:15
Ояебу. Сорри за кодировочку... ^^ Редактировать нельзя. Но думаю понятно, что там П и З.

Ответить

Номер ответа: 5
Автор ответа:
 @lex



Вопросов: 14
Ответов: 262
  Профиль | | #5 Добавлено: 13.07.11 20:17
А еще я наркоман. Не то копипастнул. Блеать, приделайте возможность редактирования постов! Т_Т
Я молчу про ненужные Exit Sub'ы. Хочешь чтобы работало как задумал - пиши

И вот нормальный код:
  1. Private Sub Command2_Click()
  2. If Command2.Caption = "Ï" Then
  3. Command2.Caption = "Ç"
  4. Me.BorderStyle = 2
  5. Me.Caption = Me.Caption
  6. Else
  7. Command2.Caption = "Ï"
  8. Me.BorderStyle = 0
  9. Me.Caption = Me.Caption
  10. End If
  11. End Sub

Ответить

Номер ответа: 6
Автор ответа:
 @lex



Вопросов: 14
Ответов: 262
  Профиль | | #6 Добавлено: 13.07.11 20:17
И снова кодировка, лол. Да хрен на нее.

Ответить

Номер ответа: 7
Автор ответа:
 Daniel



ICQ: 610950440 

Вопросов: 12
Ответов: 45
  Web-сайт: smallsoft.ucoz.com
 Профиль | | #7 		Добавлено: 14.07.11 12:51
Спасибо!!! сейчас буду переделывать!!!!!!

Ответить

Номер ответа: 8
Автор ответа:
 Daniel



ICQ: 610950440 

Вопросов: 12
Ответов: 45
  Web-сайт: smallsoft.ucoz.com
 Профиль | | #8 		Добавлено: 14.07.11 13:28
Ну отличается тем, что оно в taskbar'е не видно... :)

Ответить

Номер ответа: 9
Автор ответа:
 Dan



ICQ: 609276007 

Вопросов: 24
Ответов: 195
  Профиль | | #9 Добавлено: 14.07.11 20:38
Это сделать не тяжело

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам