Программирование (VB,C#,ASP,.NET): новости, советы, примеры (comp.soft.prog.vbaspsharpnet) : Рассылка : Subscribe.Ru

Отправляет email-рассылки с помощью сервиса Sendsay

Программирование (VB,C#,ASP,.NET): новости, советы, примеры

Рассылка закрыта

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

← Январь 2008 →
	1	2	3	4	5	6
7	8	9	10	11	12	13
14	15	16	17	18	19	20
21	22	23	24	25	26	27
28	29	30	31

Автор

Алексей Немиро

Статистика

1.234 подписчиков
-1 за неделю

← Все выпуски →

Программирование (VB,C#,ASP,.NET): новости, советы, примеры

Выпуск # 251

http://www.kbyte.ru/

Новый выпуск!

Если у Вас возникнут какие-либо вопросы, замечания, пожелания или предложения, пишите, мы детально рассмотрим каждое Ваше сообщение – mailto: admin@kbyte.ru.

Содержание выпуска

Система ЭКСПЕРТ

Вопрос #000665: Параметры в VB6

Вопрос #000639: Как програмно считать разрешение из видео файл...

Вопрос #000635: Свойство Combo в VB 6.0

Вопрос #000627: Обработка сообщения мыши компонентом UserContro...

Вопрос #000611: Новый вопрос без темы

Последнее на форумах

Как получить содержимое Label из другого приложения?

? Формат вывода чисел в файл C# HELP

Работа с регулярками и с мышью

Раздел справочники

Поиск и замена

Последние статьи

Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)

Работа с SQL – Запросы

Использование XML.Serialization

Выбор языка программирования для научных работ (2-я редакция)

Работаем с MIME

Интересные коды и решения

Юмор на Kbyte.Ru

Система ЭКСПЕРТ

Система «Эксперт» - уникальная система, которая поможет решить, если не все, то многие Ваши проблемы с программированием и разработкой! Если у Вас есть какой-либо вопрос по программированию или разработке, то Вы всегда можете задать его нашим Экспертам! При этом каких-либо особых действий от Вас не потребуется! Просто отправьте Ваш вопрос на адрес mailto:expert@kbyte.ru, в теме письма укажите тему вопроса, в тексте – сам вопрос, и все! Эксперты дадут Вам ответ в течение 12-24 часов, на тот адрес, с которого Вы отправите вопрос. Все проще простого! Никакой регистрации и заполнение бесконечных форм, просто спросите и получите ответ ;-)

Вопрос #000665: Параметры в VB6

Автор вопроса: Сергей // 06.01.2008 / 05:11

С Новым Годом, Эксперты!
 У меня такая вот проблема в моей апликухи на VB6:
 Передаю апликухе в качестве входного параметра имя файла 
 "C:\Program Files\Экзаменатор\Экзаменатор.exe" "Test_10_kl.ekz" - (примерно такой параметр:)
  а где мне его в VB найти?:( Вот в Delphi7 входной параметр := -ца значению функции ParamStr.
 И потом с этим пораметром делаем чё хотим...
 А как на Visual Basiс-e не знаю :-(
 Так вот есть ли в VB6 подобная функциия
или переменная ну или какой другой способ?
 Будьте добры подскажите пожалуйста...!)
 Зараннее благодарен... 8-)
 
 
 --------------------------------------
 Категория: --- Visual Basic 5.0/6.0
 
 

Отвечает: Алексей Немиро // 06.01.2008 / 05:19

Здравствуйте, Сергей!
 
 В Visual Basic для этого используется функция Command
 
 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей http://aleksey.nemiro.ru/

Вопрос #000639: Как програмно считать разрешение из видео файл...

Автор вопроса: Fox // 06.12.2007 / 11:15

Добрых суток
 У меня вопрос как програмно считать разрешение из видео файла при помощи C#?

Отвечает: Алексей Немиро // 08.12.2007 / 07:24

Наиболее оптимальным вариантом будет открыть видио-файл, получить необходимые данные и закрыть.
 Вот небольшой пример:
 
 1. Подключите к проекту Microsoft.DirectX.AudioVideoPlayback.
 2. Разместите на форме элемент openFileDialog:
 001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
if (openFileDialog1.ShowDialog() == DialogResult.OK)
{
 int height = this.Height;
 int width = this.Width;
 Video _video =
new Video(openFileDialog1.FileName);
 _video.Owner = this;
 videoPanel.Width = width;
 videoPanel.Height = height;
 _video.Play();
 _video.Pause();
 Console.WriteLine("Ширина: " + _video.DefaultSize.Width);
 Console.WriteLine("Высота: " + _video.DefaultSize.Height);
}

 В коносли должен появиться размер видео-файла.

Вопрос #000635: Свойство Combo в VB 6.0

Автор вопроса: Федоренко Дмитрий Константинович // 04.12.2007 / 06:37

Здравствуйте эксперты.
   Хочу задать вам вопрос такого плана.
   Например, я использую в программе форму, на которой размещен Combo и 
 каждый раз должен выбирать из этого списка(Combo) того или иного 
 сотрудника(записиь), скажем я точно знаю, что определенная запись 
 используется чаще всего, для этого я пишу ее значение в свой ini фаил, а 
 потом при открытии формы, считываю значение
этой записи из файла и хочу, 
 чтоб в компоненте Combo фокус стоял именно на этой записи, избавляя меня от 
 лишнего просматривания, поиска и выбора её, при большом объеме записей.
  Другими словами, как можно сразу сфокусироваться на нужном мне 
 элементе(записи) списка Combo, то есть чтоб именно он стоял (отображался в 
 списке) сразу?
 
 Заранее благодарен, Федоренко Дмитрий.

Отвечает: Алексей Немиро // 04.12.2007 / 06:46

Здравствуйте, Дмитрий.
 
 001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
Private Sub Form_Load()
 'добавляем записи
 Dim i As Long
 For i = 0 To 100
  Combo1.AddItem ("Запись " & i)
 Next i
 'выбераем 25 запись по индексу
 Combo1.ListIndex = 25
 'выбор записи по тексту
 'Dim findText As String
 'findText = "Запись 10"
 'For i = 0 To Combo1.ListCount - 1
 ' Combo1.ListIndex = i
 ' If Combo1.Text = findText Then
 '  Exit For
 ' End If
 'Next i
End Sub

 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей http://aleksey.nemiro.ru/
 Кодообменник Kbyte.Ru - меняйтесь кодами!

Вопрос #000627: Обработка сообщения мыши компонентом UserContro...

Автор вопроса: Антон // 28.11.2007 / 14:23

Здравствуйте!
 В .NET можно создавать новые компоненты путем наследования от компонента UserControl. При этом новый компонент получается путём агрегирования других компонентов, которые и получают сообщения от мыши, когда курсор находится над ними. Вопрос такой: можно ли сделать так, чтобы новый компонент (на основе UserControl) будучи помещенным на форму получал сообщения от мыши (например MouseMuve) как одно целое (в не зависимости от того, над каким из его компонентов
находится курсор)?
 Буду очень благодарен за ответ.
 
 --------------------------------------
 Категория: --- Visual Basic .NET
 
 

Отвечает: Алексей Немиро // 08.12.2007 / 07:34

Это можно реализовать,
зная размер Вашего контрола, его координаты на форме, координаты и размер самой формы на экране, и координаты мышки на экране.
 
 --
 - Если у Вас есть вопросы по программированию, которые бы Вы хотели обсудить, воспользуйтесь Форумом.
 - Если у Вас есть код или пример кода, которым бы Вы хотели поделиться с общественностью, воспользуйтесь Кодообменником.
 - Если у Вас есть готовые проекты или сайты, Вы всегда можете добавить их в раздел Наши проекты.

Вопрос #000611: Новый вопрос без темы

Автор вопроса: Федоренко Дмитрий Константинович // 15.11.2007 / 05:32

Здравствуйте уважаемые эксперты.
 Скажите пожалуйста есть ли такое свойство у компонента Combo в VB 6.0,
 которое задает длинну низпадающего списка.
 Например, если у меня, скажем, 3-4 элемента занесено в этот список, то я при
 выборе нужного вижу их все сразу, а если их очень много(так что они не
 умещаются сразу все в видимую область), то приходится пользоваться бегунком
 справа и прокручивать
в поиске нужного элемента.
   Так вот, есть ли такое свойство, которое позволяет задавать размеры этой
 видимой области (длинну низпадающего списка), чтобы я смог увидеть например
 не 3-4 элемента, а 10-20, пока мне это будет позволять делать экран монитора
 :))) ? И что это за свойство?
   Заранее благодарен за ответ.

Отвечает: Алексей Немиро // 15.11.2007 / 05:39

Здравствуйте, Дмитрий!
 
 Нет, стандартного такого свойства нет, но это можно реализовать при помощи API.
 Я не так давно добавлял примеры на эту тему в наш Кодообменник:
 http://kbyte.ru/Code/ShowList.aspx?lid=1&gid=1&uid=0&sort=0
 
 ЗЫ: прям дежавю какое-то :))
 
 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей http://aleksey.nemiro.ru/

Чтобы задать Ваш вопрос, отправьте его на адрес expert@kbyte.ru

Раздел Эксперт на сайте Kbyte.Ru

Наверх

Последнее на форумах

Как получить содержимое Label из другого приложения? | Автор: awl100Alex
Добавлено: 21.01.2008 / 21:55 | ответов: 0 | просмотров: 16

Есть такой откомпилированный в EXE код:
Private Sub Form_Load()
Label1.Caption = "Получить это сообщение..."
End Sub

Нужно программно получить содержимое Label1.Caption из другого(!) приложения. Подскажите, пожалуйста, как можно это реализовать???
Может как-то через память, используя функцию API - CopyMemory? Но как конкретно? Если можно, какие-нибудь примеры кодов или ссылки - все что угодно!

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

? Формат вывода чисел в файл C# HELP | Автор: Dampier
Добавлено: 21.01.2008 / 14:42 | ответов: 1 | просмотров: 39

Уважаемые программисты, подскажите начинающему как сохранить отформатированную информацию.
В данном случае предполагается, что пользователь выбирает из базы данных какой-либо тип (к примеру мышек), автоматически в ряде окошек выдаются параметры этих "мышек", например количество колёсиков, кнопочек, цена. Нужно, чтобы после нажатия кнопки, к примеру применить, сохранялся файл, кримеру temp.txt, в котором цифры были бы записани в виде 0.число+Eчисло (т.е. 100 = 0.100+E03), как это было в стареньком фортране.
Сейчас это реализовано так (см.ниже), но сохраняется число в обычном виде (100, а не 0.100+Е03) как текст и мой старенький фортран не понимает эту форму записи, он хочет 0.100+Е03.
Подскажите, как отформатировать?

FileStream fs = new FileStream("c:\\VEIP_MOD\\temp", FileMode.Create, FileAccess.Write, FileShare.Write);
fs.Close();
StreamWriter sw = new StreamWriter("c:\\VEIP_MOD\\temp", true, Encoding.ASCII);
string NextLine = "This is the appended line.";
sw.Write(textBox01.Text);
sw.Close();

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: Алексей
Добавлено:21.01.2008 / 15:06
001:
(100).ToString("\0.000+E00")

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Работа с регулярками и с мышью | Автор: Паша
Добавлено: 21.01.2008 / 10:00 | ответов: 1 | просмотров: 40

Здравствуйте. Проблема у меня такая: я делаю плагин для KbyteNotepad, который ищет в тексте текстбокса путь к файлу и по дбклику на пути к файлу должна открываться ассоциированная прога (ИЛИ если это .txt файл, тогда создать новое MDI окно и открыть в нём файл). Но: даже если я найду этот путь (пути) к файлам, как мне обработать дбклик на них. Понятно, что надо узнать координаты по оси X и Y но как? Это похоже на то как RichTextBox обрабатывает дбклик на URL-адресе

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: Алексей
Добавлено:21.01.2008 / 18:23
Создай свой Rich, для этого наследуйся от обычного Rich-а, добавь
нужное свойство, типа DetectPaths, которое будет указывать, нужно ли
выделять пути или нет. Чтобы понять, как сам Rich ловит url-ы,
поковыряй System.Windows.Forms каким-нибудь Reflector-ом, там все в
открытом виде лежит :) Еще событие соответсвующее придется сделать.

Если копаться в API, то тут тебе надо просто взять Rich и смотреть за
текстом под курсором, где-то на Kbyte.Ru был пример (в разделе примеры :) ..) на эту тему
сделанный VB 6.0, на вбнете.ру тоже есть. Но апи - это в данном случае
криво будет, лучше изменить сам контрол, точнее сделать свой по образу
и подобию, но с небольшими изменениями.

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Раздел справочники | Автор: SergeyRasshevatka
Добавлено: 20.01.2008 / 15:06 | ответов: 2 | просмотров: 39

Здравствуйте, Алексей и все кто нах. :) на Kbyte.ru
У меня к вам такое предложение в разделе "Справочники" организовать загрузку справочников и\или книг по программированию. Загрузку разрешить естественно для зарегистрированных юзверов. Поручить кому-нибудь следить за всеми загрузками
что-б ни кто ни безпределел:)...
Как вы на ето смотрите?

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: Алексей
Добавлено:21.01.2008 / 05:43
Раздел справочники был задуман таким какой он есть сейчас, т.е. есть справочник, нажимаем, и видим список функций (или чего-то там), затем описание конкретной функции, все это дело в далекие времена писал я :) Так что сейчас этот раздел уникальный.

Вопрос с книгами сразу отпадает, т.к. это будет нарушением авторских прав.

Что касается загрузки других справочников, то думаю, это можно организовать, как дополнительный подраздел раздела «Справочники», сейчас на Kbyte.Ru планируется небольшой ремонт, и вполне возможно, что я сделаю возможность загрузки справочников на сайт, время покажет :)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 2 | Автор: SergeyRasshevatka
Добавлено:21.01.2008 / 18:43
Раздел справочники был задуман таким какой он есть сейчас, т.е. есть справочник, нажимаем, и видим список функций (или чего-то там), затем описание конкретной функции, все это дело в далекие времена писал я :) Так что сейчас этот раздел уникальный.

Понятно почему:)

Вопрос с книгами сразу отпадает, т.к. это будет нарушением авторских прав.

Есть книги авторы каторых не против их публикации ну или взамен просящие ссылок на его сайт или ещё чего н-будь:)

Что касается загрузки других справочников, то думаю, это можно организовать, как дополнительный подраздел раздела «Справочники», сейчас на Kbyte.Ru планируется небольшой ремонт, и вполне возможно, что я сделаю возможность загрузки справочников на сайт, время покажет :)

время покажет :)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Поиск и замена | Автор: Паша
Добавлено: 20.01.2008 / 13:54 | ответов: 2 | просмотров: 62

Делаю поиск и замену в KbyteNotepad. 3 дня искал в чем баг--не нашел! Выдаёт после нескольких попыток поиска OutOfRangeException Модуль поиска и замены:

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
Imports System.Text.RegularExpressions
Module modFindReplace
  Public Function Find(ByVal AllText As String, ByVal pattern As String, ByVal regexopt As System.Text.RegularExpressions.RegexOptions, ByVal StartAt As Integer) As Integer
    Dim regex As New Regex(pattern, regexopt)
    Dim matches As MatchCollection = regex.Matches(AllText, StartAt)
    Dim m As Match = matches(0)
    If m.Success Then
      Dim result As Integer =
m.Index + m.Length - 1
      Return result
    Else
      Return Nothing
    End If
  End Function
  Public Function Replace(ByVal IsAll As Boolean, ByVal pattern As String, ByVal Replacement As String, ByVal opt As RegexOptions,
ByVal AllText As String) As String
    If IsAll Then 'если заменить всё
      Dim regex As New Regex(pattern, opt)
      Return regex.Replace(AllText, Replacement)
    Else '1 замена
      Dim regex As New Regex(pattern, opt)
      Return regex.Replace(AllText, Replacement, 1)
    End If
  End Function
End Module

Colorized by: Eros.CodeSyntaxColor Engine

А вот форма:

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
026:
027:
028:
029:
030:
031:
032:
033:
034:
035:
036:
037:
038:
039:
mports Kbyte.Notepad.modFindReplace
Public Class frmFindReplace
  Dim ft As RichTextBox
  Dim StartAt As Integer = 1
  Sub New(ByRef s As frmFile)
    InitializeComponent()
    ft = s.fileText
  End Sub
  Private Sub frmFindReplace_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    txtFind.Text = ft.SelectedText
  End Sub
  Private Function GetRO() As System.Text.RegularExpressions.RegexOptions
    If cbMathCase.Checked Then
      Return System.Text.RegularExpressions.RegexOptions.Multiline Or System.Text.RegularExpressions.RegexOptions.IgnoreCase
    Else : Return System.Text.RegularExpressions.RegexOptions.Multiline
    End
If
  End Function

  Private Sub btnFind_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFind.Click
    StartAt
+= Find(ft.Text, txtFind.Text, GetRO, StartAt)
    ft.Focus()
    ft.Select(StartAt - txtFind.TextLength, StartAt)
    If StartAt = -1 Then
      MessageBox.Show("Ничего
не найдено!")
      StartAt = 0
    End If
  End Sub

  Private Sub btmReplaceAll_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles btnReplace.Click
    ft.Text = Replace(False, txtFind.Text, txtReplace.Text, GetRO, ft.Text)
  End Sub

  Private Sub btnReplaceAll_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnReplaceAll.Click
    ft.Text = Replace(True, txtFind.Text,
txtReplace.Text, GetRO, ft.Text)
  End Sub
End Class
Подскажите, в чём ошибка! Пожалуйста :)

Colorized by: Eros.CodeSyntaxColor Engine

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: EROS
Добавлено:20.01.2008 / 20:36
3 дня искал в чем баг--не нашел!

А чего искать? Его видно невооруженным взглядом..
Мда-а-а... Вот за эту строчку я бы тебе по рукам точно надавал..

001:
002:
003:
Dim m As Match = matches(0)

Colorized by: Eros.CodeSyntaxColor Engine

Почему ты так уверен, что в коллекции matches вообще что то есть?
И вообще.. весь этот код в топку!! Ни одной проверки нету, обработки ошибок нету.. Кто так пишет?
Попробуй ответить на вопрос: Что произойдет с твоим кодом, если:
a. Вместо AllText я передам Nothing
b. Вместо pattern я передам Nothing
c. Вместо StartAt я передам отрицательное значение или значение превышающее AllText.Length
d. Список продолжи на свое усмотрение..

Идем дальше ...

001:
002:
003:
004:
005:
006:
007:
008:
009:
If IsAll Then 'если заменить всё
   Dim regex As New Regex(pattern, opt)
   Return regex.Replace(AllText, Replacement)
  Else '1 замена
   Dim regex As New Regex(pattern, opt)
   Return regex.Replace(AllText, Replacement, 1)
  End If

Colorized by: Eros.CodeSyntaxColor Engine

Вот ответь мне, ЗАЧЕМ 2 раза объявлять одну и тоже строчку?

001:
002:
003:
Dim regex As New Regex(pattern, opt)

Colorized by: Eros.CodeSyntaxColor Engine

001:
002:
003:
004:
Dim result As Integer = m.Index + m.Length - 1
   Return result

Colorized by: Eros.CodeSyntaxColor Engine

Зачем объявлять переменную и тут же ее возвращать? Почему бы это все не написать одной строкой?

001:
002:
003:
Return System.Text.RegularExpressions.RegexOptions.Multiline Or System.Text.RegularExpressions.RegexOptions.IgnoreCase

Colorized by: Eros.CodeSyntaxColor Engine

Тебя самого такое читать не напрягает? Почему бы System.Text.RegularExpressions не вынести в директиву Imports?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 2 | Автор: Паша
Добавлено:21.01.2008 / 09:45
Спасибо Erosу за критику. Просто пока я действительно допускаю недочеты. Я решил это применением функции RIchTextBox.Find и париться не решил.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Наверх

Последние статьи

Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)
Автор: Немиро Алексей | добавлено: 27.07.2007 / 14:01 | просмотров: 2373

В данной статье речь пойдет о том, как можно программно заполнить и отправить Web-форму, а также получить результат с использованием довольно простых классов - HttpWebRequest и HttpWebResponse.

Работа с SQL – Запросы
Автор: Хабибулин А. (aka Bille Gates) | добавлено: 22.07.2007 / 04:43 | просмотров: 4266

В данной статье рассмотрены часто используемые SQL-запросы и приведены примеры их использования.

Использование XML.Serialization
Автор: Немиро Алексей | добавлено: 19.07.2007 / 15:38 | просмотров: 1225

В данном обзоре речь пойдет об использование XML.Serialization в .NET и ее применении на примере сохранения и считывания настроек программы с использованием синтаксиса языка Visual Basic .NET.

Выбор языка программирования для научных работ (2-я редакция)
Автор: Юдин С. Ю. | добавлено: 15.03.2007 / 02:49 | просмотров: 3696

Идея написания этой статьи возникла после того, как на одном из сайтов по физике http://physics.nad.ru/aniboard/messages/291.html я обнаружил интересный алгоритм моделирования движения тела в поле постоянной напряженности по различным направляющим. Вернее, меня заинтересовал не весь алгоритм, т.к. основа их всех одна (принцип Даламбера, если не считать квазиалгоритма с применением уравнений Лагранжа 2-го рода) и различаются они только способом определения реакций в месте соприкосновения тел. ...

Работаем с MIME
Автор: Немиро Алексей | добавлено: 29.11.2006 / 14:46 | просмотров: 3253

Не так давно мне пришлось немного поработать MIME (Multipurpose Internet Mail Extension) - это стандарт почтовых сообщений, в РуНете (Russian Internet) я не нашел нормального описания спецификации MIME, и посему решил написать небольшую статейку на эту тему. В данной статье вы узнаете об основных особенностях и стандартах MIME, а также научитесь «читать» MIME с использованием синтаксиса языка Visual Basic .NET 2005.

Статьи на Kbyte.Ru

Наверх

Интересные коды и решения

Как получить текущее системное время?
Дата добавления: 16.08.2006 / 20:18 | просмотров: 1675 | платформа: VB

Как сделать, чтобы графика не стиралась?
Дата добавления: 24.03.2007 / 10:18 | просмотров: 812 | платформа: VB .NET

Как узнать дату создания/изменения файла?
Дата добавления: 31.07.2006 / 12:42 | просмотров: 1519 | платформа: VB

Как получить список файлов из определенной директории?
Дата добавления: 24.03.2007 / 12:30 | просмотров: 1605 | платформа: VB .NET

Как запретить пользователю перемещать форму?
Дата добавления: 31.07.2006 / 12:05 | просмотров: 863 | платформа: VB

Как поменять стиль у всех контролов на форме (Form)?
Дата добавления: 24.03.2007 / 11:59 | просмотров: 793 | платформа: VB .NET

Как программно закрыть форму?
Дата добавления: 01.08.2006 / 17:20 | просмотров: 1174 | платформа: VB .NET

Как узнать размер рабочей области экрана?
Дата добавления: 23.08.2006 / 19:03 | просмотров: 1584 | платформа: VB .NET

Проверить корректность E-Mail (стандартный способ)
Дата добавления: 21.08.2006 / 20:23 | просмотров: 1226 | платформа: ASP .NET (VB)

Как сделать полупрозрачную форму?
Дата добавления: 01.08.2006 / 17:25 | просмотров: 1493 | платформа: VB .NET

Универсальные коды на Kbyte.Ru

Наверх

Юмор на Kbyte.Ru

Соседская бабулька отмочила очередную кору.
Она обошла все хозяйственные магазины в районе и наезжала на продавцов с таким вопросом (цитирую дословно):
- "Мне нужны ИМПОРТНЫЕ ДЫРОЧКИ, В КОТОРЫЕ БОЛЬШИЕ ВЛЕЗАЮТ!"
- ??!!!!
Угадайте, что она имела в виду ? .... Вот и продавцы не угадали. Ей приносили все - от парафиновых свечек до дивидюков с крутой порнухой - но бабулька только топала ножками и орала исчо сильнее, типа "Идиоты, ни хрена не понимаете!!!"
Только дома, под перекрестным допросом выяснилось, ЧТО она подразумевала под столь странной фразой. Это оказалась (тут я упал пацтул) ЕВРОРОЗЕТКА (обычная, комнатная, на 220 вольт).
У нее от чайника вилка в обычную советскую розетку ессно не влезала. Но какова формулировка ! :-)))))))

Рейтинг: 854
Всего голосов: 1228