Андрей Колесов, Олга Павлова
182. Съвета за прилагане на "готовност" в VB
Тук ние показваме как да се приложи функция готовност в VB. На пръв облече формата на таймер (таймер 1) и да зададете своите свойства Интервал = 0 и имуществото Enabled = False.
За да тествате процедурата, добавете две етикети (Label1 и LABEL2) и бутон за команда (command1) към формата. Напишете следната функция и кода на събитие за Таймер Таймер:
Сега можете да използвате функцията Изчакайте навсякъде, където искате всяко забавяне, например:
Съвет 183. Подкрепа за номериране версии на VB-програми
Номерирането на версии на програми, създадени в VB, може да се прости, ако използвате функцията Версия номериране при създаване на EXE-модул. За да направите това, щракнете върху Опции Направи диалогов прозорец Project, а след това поставете отметка в полето Auto Увеличение_в_ раздела Спечелете диалогов прозорец Project Properties.
Брой версия на софтуера се състои от три компонента: масивно, слабо, и редакции. Функция Auto Увеличаване, ако бъдат избрани, автоматично ще се увеличи броят на ревизия по един всеки път, когато стартирате Направи екип на проекта за конкретен проект.
Обикновено информацията за програмата версия се използва под формата За. За да направите това, трябва само да добавите етикет с името и lblVersion въведете следния код, за да си форма:
Ако вашата програма майор брой е 2, Мала стая - 1 и номер на контрол - 12, етикетът ще покаже "Версия: 2.1.12"
Съвет 184. Създай свой собствен скрийнсейвър
Били ли сте някога са имали желанието да създадете свой собствен скрийнсейвър във VB? Ако е така, сега ще ви покажем един прост пример за това как може да се направи. Идеята е много проста - като скрийнсейвър ще бъдат дадени под формата на размера на целия екран, който можете да приложите върху собствените си изображения.
За да започнете, да създадете нов проект Стандарт EXE. Поставете на етикети контрол на формата, която съдържа някакъв текст. След това добавете към контрола на таймера, за които се определят имота Интервал толкова, колкото 1000 (т.е. 1 сек). Сега въведете следния код, за да си форма:
След това настройте WindowState собственост на формата като с увеличен, както и имуществото на Гранична Style както Няма. Повечето скрийнсейвърите заемат пълен размер на екрана и не разполагат с заглавната лента.
Изберете Файл | Направете EXE файлове и след това в проекта за производител, щракнете върху бутона Опции в диалоговия прозорец. следният диалогов прозорец за кандидатстване Наименование на проекта имоти в текстовото поле, тип с главни букви SCRNSAVE линия. (Например, можем да наречем нашата молба SCRNSAVE :. TestApp1) При задаване на името на изпълнимия файл, не забравяйте да се промени разширението: тя трябва да бъде .SCR вместо .EXE. (За този пример името на изпълнимия файл, както TestApp1.scr.) Щракнете върху OK.
Това е всичко. Сега, не забравяйте да поставите SCR-файла в Windows \ System \, както и промяна на скрийнсейвъра, както обикновено правя с контролния панел.
Съвет 185. Използвайте WithEvents за добавяне на нови функции за контрол
Някой ден може да бъдат изправени пред факта, че стандартните проверки все още няма никакви полезни функции. Можете да използвате традиционния начин: да се напише необходимия код за съответния случай на всеки контрол. Въпреки това, VB5 и VB6 има WithEvents команда, която осигурява лесно решение с помощта на класовете в такива случаи.
Да предположим, че искате да въведете в полето само главни букви, така че, когато всичко това вписани малки букви автоматично се превръща в главни букви. Освен това, което искате да се удари с курсора на мишката в текстовото поле се появява на екран ToolTipText на подсказка, съдържащ координатите на курсора в рамките на дадено текстово поле.
Създаване на нов проект Стандарт EXE, поставете го под формата на четири TextBox контрола на Текст1 имена, Текст2, Текст3, Text4 и добавяне на модул на клас. Въведете следния код за вид Form1:
За клас Клас1, въведете следния код:
Използването на такъв софтуер, дизайн, Вие ще добави нова функционалност към четирите текстови полета. Но имайте предвид, че събитието натискане на клавиш за контрол се извършва преди е достъпен на класа. Следователно TextBox4 поле вместо "а" ще се въведе "Z", която след това веднага се превръща в "Z".
Board 186. Промяна на изображения, посочени в контрола ImageList, свързани с контрола Toolbar
В режим на развитие на проекта може да се наложи да свободно да добавяте изображения контрол ImageList, свързани с елементите за управление на лентата с инструменти, или като ги извадите от там. И тъй като VB не позволява да промените набора от изображения в ImageList, толкова дълго, тъй като тя е свързана с лентата с инструменти, ще ви покажем начин да заобиколят това ограничение.
Етап 1. Пълнеж контрола ImageList. Поставете контрола ImageList във формуляра. (Ако този компонент не е включена в комплекта инструменти на вашия проект, можете да го добавите, както е показано в следния съвет 187.) Щракнете с десния бутон на мишката и след това върху Свойства, за да отворите диалоговия прозорец Property Pages. Изберете раздела Снимки, а след това щракнете върху бутона Insert Picture. В диалоговия прозорец Изберете Картина, намерете изображението, което искате да добавите към контрола на ImageList. Дай уникален ключ имот. Повторете тези стъпки, докато не се попълни контрол ImageList, колкото искате.
Стъпка 2: Добавяне на бутони в лентата с инструменти. Щракнете с десния бутон на контрола Toolbar, а след това щракнете върху Свойства. В диалоговия прозорец разширява Property Pages изберете раздела бутони. Кликнете върху Вмъкване бутон Бутон и текст Key поле въведете уникално име възлага на изображението, за да контрол ImageList. Всеки със снимка на бутона трябва да има същия ключ имота, както и че съответната голям компонент ImageList. Всеки бутон на изображението без, например, tbrSeparator или tbrPlaceholder, не трябва да имат имоти Ключови.
Стъпка 3. В случай на натоварване за формата, определен ImageList на връзка и Toolbar контролира:
Стъпка 4. Настройте бутона Изображение на лентата с инструменти:
Съвета 187. Изтегляне на ActiveX контроли
За да използвате контролите на ActiveX доставят с VB 5.0 / 6.0, трябва да ги добавите към набор от инструменти Toolbox.
Стъпка 1. В менюто на проекта, изберете компоненти, или щракнете с десния бутон в лентата с инструменти, за да се покаже диалоговия прозорец компоненти.
Стъпка 2. Елементите, изброени в този диалогов прозорец включват всички регистрирани вградени обекти, проектанти и ActiveX контроли.
Стъпка 3. Поставете отметка в квадратчето вляво от името на контрола, който искате да добавите.
Стъпка 4. Натиснете OK, за да затворите диалоговия прозорец компоненти. Сега, всички избрани ActiveX контролите ще бъдат включени инструменти Toolbox.
Тази процедура е много проста, ако знаете точното име на добавената управление. Проблемът възниква, когато елементите, изброени в диалоговия прозорец Компоненти съдържа редица компоненти или името се различава от името на компонента. Тук можете да се помогне на таблицата по-долу в електронната списък на ActiveX контроли, които идват с VB 5.0 / 6.0:
Съвет 188. Използването на среща с източник на данни АДО
Първото нещо, което идва на ум, когато се занимават с дати в VB, - е да се използва променлива от тип Date. В действителност, обаче, този подход е грешен, ако си имате работа с дати Null, получени от източник на данни ADO. Причината за това е, че поведението на вътрешния тип данни Дата различава от тип данни adDate ADO.
За да видите разликата между Дата и adDate, моля, прочетете следния код (за VB6 Не забравяйте да инсталирате Microsoft ActiveX Data Objects Recordset 2.0 Библиотека справка, но същото се отнася и за Microsoft ActiveX Data Objects 2.0 библиотека):
Променлива от тип String - също не най-добрият вариант като променлива низ Null Null не е представяне на датата. За съжаление, в зависимост от настройката по подразбиране в DataEnvironment в VB6, когато се движат поле Дата по метода на "влачене и пускане" форма се поставя върху контрола TextBox елемент.
По този начин, за да получите правилната вътрешна представяне на дата, трябва да използвате променлива Variant.
App.Path имот може да бъде използван, за да получите по пътя към текущата изпълнимия файл. Бъдете обаче внимателни, тъй като това е възможно малък гаф. Ако програмата се изпълнява в главната директория, след това в края на пътя ще бъде добавен към наклонената черта. Въпреки това, ако се изпълнява приложението в друга директория, резултатът няма да бъде наклонена черта в края. Следните функции ще ви помогнат да се реши този проблем:
Например, AppPath ( "test.txt") правилно ще добави името на файла, независимо от това дали директорията, в която се намира на заявлението.
Съвет 190. съдържание Контрол на износа Grid в текстов файл
Тук е рутинна, че се използва за износ MSGrid MSFlexGrid или в ASCII файл неограничен брой контроли със съдържание. Като разделител, можете да зададете всеки символ, който ви харесва. Освен това, имате възможност да посочите символ, който ще бъде съдържанието на всяка клетка. С помощта на следния пример, подпрограма повикване, приложете съдържанието на клетките в двойни кавички:
И тук е самата рутина:
Свързани статии