﻿<?xml version='1.0' encoding='UTF-8'?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/"><channel><title>Релиб / Программирование / Visual Basic </title><generator>InstantForum.NET v4.1.4</generator><description>Релиб</description><link>http://www.relib.com/forums/</link><webMaster>robot@relib.com</webMaster><lastBuildDate>Fri, 12 Mar 2010 15:42:39 GMT</lastBuildDate><ttl>20</ttl><item><title>Появление картинки при нажатии в листбоксе</title><link>http://www.relib.com/forums/Topic918661-1-1.aspx</link><description>Вот есть программа такого типа:&lt;br&gt;http://img22.imageshack.us/img22/5786/56025916.jpg&lt;br&gt;Нужно сделать, что бы при нажатии на запись в листбоксе появлялась картинка. Как это сделать? &lt;br&gt;Я не знаю как написать, что бы при клике на надпись1 выводилась картинка1 и т.д</description><pubDate>Sun, 28 Feb 2010 21:25:40 GMT</pubDate><dc:creator>bosscs</dc:creator></item><item><title>Автоматическое выполнение макроса</title><link>http://www.relib.com/forums/Topic918657-1-1.aspx</link><description>Доброго времени суток!&lt;br&gt;&lt;br&gt;Я разрабатываю плеер на Delphi для воспроизведения звуковой рекламы. Плейлист для плеера делаю в MS Access, т.к. файлы для воспроизведения должны выбираться из определённого временного промежутка. У меня есть вопросы по экспорту из Access в текстовый файл (наполовину реализован в приложенном файле). [url]http://spaces.ru/files/?name=Xakand;sid=;dir=521870;p=1;plain=0&amp;read=5469516&amp;cp=1[/url] (Пароль: ak74).&lt;br&gt;&lt;br&gt;Вопросы:&lt;br&gt;&lt;br&gt;1. Как экспортировать файл в определённую папку (например в ту, где находится файл БД)?&lt;br&gt;&lt;br&gt;2. Как выполнять экспорт автоматически, при смене даты или до загрузки плей-листа в плеер?&lt;br&gt;&lt;br&gt;Спасибо.&lt;br&gt;</description><pubDate>Mon, 15 Feb 2010 02:12:34 GMT</pubDate><dc:creator>Xakand</dc:creator></item><item><title>Поворот изображения</title><link>http://www.relib.com/forums/Topic918654-1-1.aspx</link><description>Возможно ли повернуть изображение на определённый угол ?&lt;/P&gt;&lt;P&gt;На форме есть image1, как повернуть картинку на 45 градусов ?</description><pubDate>Thu, 11 Feb 2010 15:55:18 GMT</pubDate><dc:creator>dieman</dc:creator></item><item><title>VB2008: прога зависает при работе с HttpWebRequest</title><link>http://www.relib.com/forums/Topic918603-1-1.aspx</link><description>Нужно определить размеры трёх файлов. Есть форма с кнопкой и тремя текстбоксами.&lt;P&gt;При нажатии на кнопку, прога обращается к серверу, получает размеры файлов и выводит их в текстбоксы.&lt;/P&gt;&lt;P&gt;Но проблема в том, что получает размеры только двух файлов, на третьем зависает.&lt;/P&gt;&lt;P&gt;Делаю вот так:&lt;/P&gt;&lt;P&gt;[quote]&lt;/P&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;&lt;P&gt;Imports&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;FONT color=#000000&gt; System.Net&lt;/FONT&gt;&lt;/P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;&lt;P&gt;Imports&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;FONT color=#000000&gt; System.Text&lt;/FONT&gt;&lt;/P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;&lt;P&gt;Imports&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;FONT color=#000000&gt; System.IO&lt;/FONT&gt;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT size=2&gt;&lt;FONT color=#000000&gt;&lt;/FONT&gt; &lt;/P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;&lt;P&gt;Public&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT color=#000000 size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;Class&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;FONT color=#000000&gt; Form1&lt;/FONT&gt;&lt;/P&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;   &lt;/FONT&gt;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;    Private&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;Function&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; GetSize(&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;ByVal&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; strURL &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;String&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;) &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;String&lt;/P&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;        Dim&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; request &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; HttpWebRequest&lt;/P&gt;&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;        Dim&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; responce &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; HttpWebResponse&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff&gt;        &lt;/FONT&gt;request = HttpWebRequest.Create(strURL)&lt;/P&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;P&gt;&lt;FONT color=#0000ff&gt;        &lt;/FONT&gt;responce = request.GetResponse()&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff&gt;        &lt;/FONT&gt;responce.GetResponseStream()&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff&gt;        &lt;/FONT&gt;GetSize = responce.Headers(&lt;/FONT&gt;&lt;FONT color=#a31515 size=2&gt;&lt;FONT color=#a31515 size=2&gt;"Content-length"&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;)&lt;/P&gt;&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;    End&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;Function&lt;/FONT&gt;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt; &lt;/P&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;    Private&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;Sub&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; Button1_Click(&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;ByVal&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; sender &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; System.Object, &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;ByVal&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; e &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; System.EventArgs) &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;Handles&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; Button1.Click&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff&gt;        &lt;/FONT&gt;TextBox1.Text = GetSize(&lt;/FONT&gt;&lt;FONT color=#a31515 size=2&gt;&lt;FONT color=#a31515 size=2&gt;"http://img.yandex.net/i/wiz1.png"&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;)&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff&gt;        &lt;/FONT&gt;TextBox2.Text = GetSize(&lt;/FONT&gt;&lt;FONT color=#a31515 size=2&gt;&lt;FONT color=#a31515 size=2&gt;"http://img.yandex.net/i/wiz2.png"&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;)&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff&gt;        &lt;/FONT&gt;TextBox3.Text = GetSize(&lt;/FONT&gt;&lt;FONT color=#a31515 size=2&gt;&lt;FONT color=#a31515 size=2&gt;"http://img.yandex.net/i/wiz3.png"&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;)&lt;/P&gt;&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;    End&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;Sub&lt;/FONT&gt;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt; &lt;/P&gt;&lt;P&gt;End&lt;/FONT&gt;&lt;/FONT&gt;&lt;FONT color=#000000 size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;&lt;FONT color=#0000ff size=2&gt;Class&lt;/P&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;P&gt;[/quote]&lt;P&gt; &lt;P&gt;При пошаговой отладке, просто вылетает из отладки при третьем выполнении строки&lt;/P&gt;&lt;P&gt;&lt;FONT size=2&gt;[quote]responce = request.GetResponse()[/quote]&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;без всяких сообщений об ошибке.&lt;/P&gt;&lt;P&gt;В чём может быть проблема?&lt;/P&gt;&lt;P&gt;Система: Win7 x64&lt;FONT size=2&gt;&lt;/P&gt;&lt;/FONT&gt;</description><pubDate>Mon, 28 Dec 2009 19:28:49 GMT</pubDate><dc:creator>Period</dc:creator></item><item><title>Защитить от изобретательных юзверей лист</title><link>http://www.relib.com/forums/Topic918570-1-1.aspx</link><description>Как защитить лист от просмотра, но БЕЗ пароля (руководству "неудобно" пароль каждый раз вводить)?&lt;/P&gt;&lt;P&gt;Sheets("Лист1").Visible = 2  не помогает, ибо лист можно отобразить из другой книги.&lt;/P&gt;&lt;P&gt;Заранее спасибо!</description><pubDate>Tue, 15 Dec 2009 08:41:22 GMT</pubDate><dc:creator>Adviser-faa</dc:creator></item><item><title>Размер файла</title><link>http://www.relib.com/forums/Topic915824-1-1.aspx</link><description>Всем приветик !&lt;P&gt;есть такой вопрос! как в VB 6 опеределить размер файла на сайте НЕКАЧАЯ сам файл?&lt;/P&gt;&lt;P&gt;допустим мне нужно получить размер файла - &lt;A href="http://www.qqq.ru/1.txt"&gt;http://www.qqq.ru/1.txt&lt;/A&gt; </description><pubDate>Sun, 09 Sep 2007 12:06:06 GMT</pubDate><dc:creator>dieman</dc:creator></item><item><title>Помогите!</title><link>http://www.relib.com/forums/Topic918164-1-1.aspx</link><description>Помогите разобраться!&lt;br&gt;Нигде не могу отыскать примеров (работающих) описания работы с динамической памятью, стеком, деревьями на VB. Главной проблемой во всем этом является создание класса... теории много, а вот примера, по кот. можно разобраться нет! (везде только с уже созданным , существующим классом, а как его создать?)</description><pubDate>Fri, 05 Jun 2009 17:53:03 GMT</pubDate><dc:creator>G</dc:creator></item><item><title>Заменить надпись на кнопке "Пуск"</title><link>http://www.relib.com/forums/Topic881905-1-1.aspx</link><description>Собссно, сабж.Hwnd я знаю. SetText не работает, очевидно "Пуск" написано не там.Подскажите функцию.Или это картинка???</description><pubDate>Mon, 03 Oct 2005 17:42:00 GMT</pubDate><dc:creator>Letter_D</dc:creator></item><item><title>из Visual Basic в Excel</title><link>http://www.relib.com/forums/Topic918274-1-1.aspx</link><description>Подскажите пожалуйста, можно ли сохранить данные из Visual Basic 6 или 2008 в Excel 2003 или 2007?&lt;br&gt;Пример: у меня программа (написанная в барсике) и файл .xls . Можно ли из формы сохранить в этот файл в определённую клетку данные из определённого оъекта VB (текстбокс например).&lt;br&gt;И как взять информацию из определённой ячейки в текстбокс?&lt;br&gt;Заранее спасибо!</description><pubDate>Sun, 16 Aug 2009 16:39:48 GMT</pubDate><dc:creator>rikky</dc:creator></item><item><title>А как запустить 'файл.xls' (не ехе)  из VB</title><link>http://www.relib.com/forums/Topic825279-1-1.aspx</link><description>Как запустить файл 'Test.xls', например,  из VB приложения.&lt;BR&gt;Файл находитя в текущей папке приложения&lt;BR&gt;Спасибо!</description><pubDate>Wed, 23 Jun 2004 00:34:00 GMT</pubDate><dc:creator>OpelD</dc:creator></item></channel></rss>