<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>Visual Basic FAQ &#187; ProgressBar</title>
	<atom:link href="http://www.vbfaq.ru/category/progressbar/feed/" rel="self" type="application/rss+xml" />
	<link>http://www.vbfaq.ru</link>
	<description>База готовых кодов на Visual Basic - бесплатно, бери и используй. Научимся программировать для себя, ведь писать программы - это просто интересно. Авторы: BiT, МП41А, Chan и Desant</description>
	<lastBuildDate>Wed, 21 Sep 2011 12:01:28 +0000</lastBuildDate>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.3</generator>
		<item>
		<title>Как работать с Прогресс бар?</title>
		<link>http://www.vbfaq.ru/2008/12/kak-rabotat-s-progress-bar/</link>
		<comments>http://www.vbfaq.ru/2008/12/kak-rabotat-s-progress-bar/#comments</comments>
		<pubDate>Wed, 31 Dec 2008 04:00:33 +0000</pubDate>
		<dc:creator>Chan</dc:creator>
				<category><![CDATA[ProgressBar]]></category>
		<category><![CDATA[commondialog]]></category>
		<category><![CDATA[прогресс бар]]></category>
		<category><![CDATA[работа]]></category>

		<guid isPermaLink="false">http://www.vbfaq.ru/?p=134</guid>
		<description><![CDATA[Как работать с Прогресс бар? - CommonDialog(Microsoft Common Dialog Control 6.0); - ProgressBar(Microsoft Windows Common Controls 6.0); Option Explicit Private Sub Command1_Click() Dim a As String CommonDialog1.ShowOpen If CommonDialog1.FileName "" Then Open CommonDialog1.FileName For Binary As 1 ProgressBar1.Min = 1 ProgressBar1.Max = LOF(1) Text1.Text = CommonDialog1.FileTitle Do While Not Loc(1) = LOF(1) a = Input$(1, [...]]]></description>
		<wfw:commentRss>http://www.vbfaq.ru/2008/12/kak-rabotat-s-progress-bar/feed/</wfw:commentRss>
		<slash:comments>3</slash:comments>
		</item>
		<item>
		<title>Как изменить цвет ProgressBar?</title>
		<link>http://www.vbfaq.ru/2008/11/kak-izmenit-cvet-progressbar/</link>
		<comments>http://www.vbfaq.ru/2008/11/kak-izmenit-cvet-progressbar/#comments</comments>
		<pubDate>Sun, 09 Nov 2008 11:32:37 +0000</pubDate>
		<dc:creator>МП41А</dc:creator>
				<category><![CDATA[ProgressBar]]></category>
		<category><![CDATA[изменить]]></category>
		<category><![CDATA[прогресс бар]]></category>
		<category><![CDATA[цвет]]></category>

		<guid isPermaLink="false">http://www.vbfaq.ru/?p=73</guid>
		<description><![CDATA[Как изменить цвет ProgressBar? На форме должен находиться ProgressBar. Option Explicit Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Sub Form_Load() ProgressBar1.Max = 100 ProgressBar1.Value = 50 Call SendMessage(ProgressBar1.hwnd, 1033, 0, ByVal vbRed) Call SendMessage(ProgressBar1.hwnd, 8193, 0, [...]]]></description>
		<wfw:commentRss>http://www.vbfaq.ru/2008/11/kak-izmenit-cvet-progressbar/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
	</channel>
</rss>

