VPF::1000 мелочей - Форум программистов

diadiavova

Дата 17.8.2011, 21:22 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

А почему не заменил это

Код


If TextBox1.Text = "" And TextBox2.Text = "" Then
Button1.Enabled = False
Else
Button1.Enabled = True
End If

Этим

Код


Button1.Enabled = Not (TextBox1.Text = "" AndAlso TextBox2.Text = "")

Это сообщение отредактировал(а) diadiavova - 17.8.2011, 21:22

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

andrey1636

Дата 18.8.2011, 10:29 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 10
Регистрация: 13.8.2011

Репутация: нет
Всего: нет

Не знаю

Вот еще вопрос. Программы на написанные на VS2008 требуют установленной NF3.5. Как этого избежать? Или мне переходить с vb.net'а на vb6? smile

diadiavova

Дата 18.8.2011, 10:57 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

Цитата(andrey1636 @ 18.8.2011, 11:29

)

Вот еще вопрос. Программы на написанные на VS2008 требуют установленной NF3.5. Как этого избежать?

В вс 2008 при создании проекта можно выбрать целевой фреймворк. Если выбрать 2.0, то они будут требовать именно его.

Цитата(andrey1636 @ 18.8.2011, 11:29

)

Или мне переходить с vb.net'а на vb6?

Если установка фреймворка на целевом компьютере - проблема, то переходи. Хотя фреймворк уже в состав винды входит.

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

hmaraegor

Дата 8.12.2011, 00:42 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 7.12.2011

Репутация: нет
Всего: нет

Как сделать форму в VB невидимой для мыши.
Есть полупрозрачная форма, надо сделать так, что бы все,
что находится под ней реагировало на мышь(клики и т.д.).
Пример:
Полупрозрачная форма находится над папкой(на рабочем столе),
мы щелкаем по папке, форма нажатия мыши игнорирует, а папка открывается.
Заранее спасибо.

Это сообщение отредактировал(а) hmaraegor - 8.12.2011, 00:54

diadiavova

Дата 8.12.2011, 12:08 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

hmaraegor, честно говоря, не уверен, что такое вообще возможно. А где ты такое видел?

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

hmaraegor

Дата 8.12.2011, 13:31 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 7.12.2011

Репутация: нет
Всего: нет

Не могу вспомнить, но где-то точно было.
Кажется огромные, почти прозрачные, часы во весь экран.
Там можно было и за компьютером нормально работать, и часы видеть.

workout333

Дата 31.1.2012, 19:56 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 4
Регистрация: 31.1.2012
Где: ivanovo

Репутация: нет
Всего: нет

я рад что у вас все получается

ItsAtrap

Дата 6.2.2012, 08:06 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 6.2.2012

Репутация: нет
Всего: нет

Всем привет. Ближайшие несколько месяцев буду докучать нубскими вопросами. Не серчайте.
Видимо эта тема как раз для меня. smile

Начал заниматься по учебнику: Зибиров В.В. - Visual Basic 2010 на примерах.

Первый вопрос:
Уже разобрался (вроде).

Код


    Sub Main()
        Dim X, Y, Z As Single
        Console.WriteLine("Please, enter first number:")
        X = Console.ReadLine()                                        ' Вводим переменную X
        Console.WriteLine("Please, enter second number:")
        Y = Console.ReadLine()                                        ' Вводим переменную Y
        Z = X + Y                                                     ' Присваеваем переменной Z значение X + Y
        Console.WriteLine("здесь текст", X, Y, Z)                     ' Проблема вот здесь. Процедура(?) должна выводить "здесь текст" и значения 3-х переменных. У меня выводит только "здесь текст".
        Console.ReadLine()
    End Sub

Вместо символа "," ставить "&". В учебнике стоят запятые.

Код


        Console.WriteLine(X & " + " & Y & " = " & Z)

Вопрос номер два.
Как сделать самую простую проверку на введение числа, и а не букв или других символов.

Вроде и с этим разобрался. Через IsNumeric.

Это сообщение отредактировал(а) ItsAtrap - 6.2.2012, 09:36

diadiavova

Дата 6.2.2012, 11:21 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

Цитата(ItsAtrap @ 6.2.2012, 09:06

)

Проблема вот здесь. Процедура(?) должна выводить "здесь текст" и значения 3-х переменных. У меня выводит только "здесь текст".
Console.ReadLine()

Ну естественно она будет выводить тот текст, который ты ввел. а ты попробуй написать вот так

Код


Console.WriteLine("{0} + {1} = {2}", X, Y, Z)

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

ItsAtrap

Дата 6.2.2012, 22:26 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 6.2.2012

Репутация: нет
Всего: нет

Ядрён батон! Вот это да =)))) Я и не думал, что он может что-то понимать внутри кавычек.
Спасибо. Впредь обещаю быть внимательнее.

Разбираюсь дальше.

error0x40

Дата 14.2.2012, 21:11 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 7
Регистрация: 14.2.2012

Репутация: нет
Всего: нет

Есть идея для перевода на несколько языков не большой программы.
Пример файла языка:

mnuFile->Файл
mnuFileOpen->Открыть
mnuFileClose->Закрыть

Данные строки относятся к главному меню
Как избежать избыточного кода? Альтернатива следующему:

Код


//код открытия файла языка
//помещение строки в массив Line типа String

//Назначение текста у одного контрола тип MenuItems
Dim nId as Integer

nId = Line.FindString("mnuFile")

If nFind >=0 Then 
Dim Text as String() = Split(Line(nId), "->")
mnuFile.Text = Line(1)
End IF

Т.е. мне нужно получить все имеющиеся контролы на всех формах, и каждому присвоить в свойство Text строку назначенную в файле.
Как реализовать правильней функцию назначения каждому элементу формы?

Буду благодарен за помощь.

Это сообщение отредактировал(а) error0x40 - 14.2.2012, 21:26

error0x40

Дата 14.2.2012, 22:19 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 7
Регистрация: 14.2.2012

Репутация: нет
Всего: нет

Извините за глупый вопрос, собственно решил своими силами:

Код


    Dim MyContol As Control.ControlCollection

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim nID As Integer
        Dim Text As String()
        MyContol = Me.Controls

        For i = 0 To MyContol.Count - 1
            nID = ListText.FindString(MyContol.Item(i).Name)
            If nID >= 0 Then
                Text = Split(ListText.Items(nID), "->")
                If Text(1) <> Nothing Then MyContol.Item(i).Text = Text(1)
            End If
        Next
    End Sub

Выслушаю любые альтернативные варианты

Это сообщение отредактировал(а) error0x40 - 14.2.2012, 22:23

diadiavova

Дата 15.2.2012, 00:09 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

Цитата(error0x40 @ 14.2.2012, 22:11

)

Есть идея для перевода на несколько языков не большой программы.

Хорошая идея, только зачем велосипед изобретать? Поищи в msdn по слову "Локализация" или можно начать к примеру отсюда
http://msdn.microsoft.com/ru-ru/library/y99d1cd3.aspx

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

error0x40

Дата 15.2.2012, 00:56 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 7
Регистрация: 14.2.2012

Репутация: нет
Всего: нет

diadiavova, спасибо, честно говоря я даже не знал=)

Feller

Дата 22.2.2012, 09:48 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 138
Регистрация: 2.7.2010

Репутация: нет
Всего: нет

Как вернуть путь где находится приложение? Ну аналог |DataDirectory|.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB .NET \| Следующая тема »