На главную страничку учебника Visual Basic

Полезные советы #3

1. Если вам необходимо присвоить строке значение без изменения её длины - используйте функцию LSet (RSet). Т.е. например:
   
   Dim str1 As String
   Dim str2 As String
   
   str1 = "Моя длинная строка"
   str2 = "Короткая"
   
   LSet str1 = str2
   ' str2 = "Короткая          "
   
   
2. Чтобы создать массив "на лету" вы можете использовать функцию Array и переменную типа Variant. Например:
   
   Dim a As Variant
   a = Array(244, 122, 544, 222) ' или:
   a = Array("A", "B", "C", "D")
   
   
3. Чтобы вывести своё меню в TextBox'е без применения API, нужно отключить TextBox (установить его свойство Enabled в False), вывести меню, а затем включить его обратно. Например:
   
   Public Sub PopUpTextBoxMenu(txtBox As Object, _
   popMenu As Object)
   txtBox.Enabled = False
   PopupMenu popMenu
   txtBox.Enabled = True
   End Sub
   
   Private Sub Text1_MouseDown(Button As Integer, _
   Shift As Integer, X As Single, Y As Single)
   If Button = vbRightButton Then
   PopUpTextBoxMenu Text1, menu1
   End If
   End Sub
   
   
4. Если вы хотите открыть Help файл (файл с расширением .hlp) из своей программы, то можете воспользоваться функций API WinHelp:
   
   Const HELP_CONTENTS = &H3&
   
   Declare Function WinHelp Lib "user32" Alias "WinHelpA" _
   (ByVal hwnd As Long, ByVal lpHelpFile As String, _
   ByVal wCommand As Long, ByVal dwData As Long) As Long

   
   Public Sub OpenHelpFile(HelpFileName As String)
   WinHelp hwnd, HelpFileName, _
   HELP_CONTENTS, 0
   End Sub
   
   ' Где HelpFileName - путь к Help файлу.

5. Советы по работе в среде Visual Basic (IDE):
   
   Пользуйтесь горячими клавишами! Это намного ускорит процесс программирования. Вот самые полезные на мой взгляд:
   
   

   Функция IDE	Горячая клавиша
   Запуск программы	F5
   Поставить/Убрать точку останова	F9
   Пошаговое выполнение программы (трассирование) с заходом в процедуры	F8
   Пошаговое выполнение программы (трассирование) без захода в процедуры	SHIFT+F8
   Открыть Object Browser	F2
   Поиск/Замена	CTRL+F
   Сделать отступ	TAB
   Отменить отступ	SHIFT+TAB
   Вызвать редактор меню	CTRL + E

   
   
   Если вам часто приходиться комментировать и раскомментировать код, рекомендую вынести эти кнопки на панель. Для этого Выберите меню View, далее ToolBars, потом Customize... Появиться окно. Выберите вкладку Commands. В списке слева выберите Edit, а справа найдите команды Comment Block и Uncomment Block. теперь перетащите их куда вам нравиться, например на главный тулбар.
   
   
6. Если у вас в программе повторяется некий кусок кода (4 или более строк) то лучше создать процедуру, в которой будут находиться эти строки, а в тех местах, где эти строки понадобяться - вставлять вызов этой процедуры.
   
   
7. Не пользуйтесь подключаемыми ActiveX компонентами где это возможно (т.е. файлами .ocx), т.к. при переносе программы на другой компьютер вам придёться таскать эти файлы с собой.

На главную страничку учебника Visual Basic