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

diadiavova

Дата 22.2.2012, 11:01 (ссылка)

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

Загрузка ...

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

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

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

Feller, в винформ приложении - System.Windows.Forms.Application.StartupPath , а ток вообще можно получить его через System.Windows.Forms.Application.StartupPath, или к примеру через
System.Reflection.Assembly.GetExecutingAssembly().Location

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

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

Feller

Дата 23.2.2012, 09:10 (ссылка)

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

Загрузка ...

Шустрый

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

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

diadiavova, А как получить доступ например у меня в папке приложения есть папки import и экспорт как можно получить путь до них ?

diadiavova

Дата 23.2.2012, 11:17 (ссылка)

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

Загрузка ...

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

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

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

Цитата(Feller @ 23.2.2012, 10:10

)

diadiavova, А как получить доступ например у меня в папке приложения есть папки import и экспорт как можно получить путь до них ?

Ну так построить путь например с помощью методов класса System.IO.Path.

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

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

Feller

Дата 7.6.2012, 07:38 (ссылка)

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

Загрузка ...

Шустрый

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

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

diadiavova, Помогите пожалуйста функцию на C# перевести в VB.net

Код


  public static string Encode(string cStr)
        {
            int length = 0;
            string str = "j,ofzyfghfdktyyjcnmcfvjghjbpdjkmys[ghjwtccjdytnjkmrjzdkztnczghbxbyjqkf,bkmyjcnbdscjrjlbcgthcnys[cbcntvyjbjnrhsdftngenmcnf,bkbpfwbblbcgthcnyjcnbgentvbpvtytybzvt;afpjds[gjdth[yjcntq";
            string str3 = "";
            string str2 = str;
            length = cStr.Length;
            while (length > str.Length)
            {
                str = str + str2;
            }
            for (int i = 0; i < length; i++)
            {
                string str4 = Convert.ToString((int) (cStr[i] ^ str[i])).PadLeft(3, '0');
                str3 = str3 + str4;
            }
            return str3;
        }

diadiavova

Дата 7.6.2012, 09:46 (ссылка)

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

Загрузка ...

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

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

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

Feller, с таким простым кодом вполне справится любой автоматический конвертер. Вот такой например(нашел за пару минут в гугле)
http://converter.foxtools.ru/Default.aspx

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

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

Feller

Дата 7.6.2012, 14:26 (ссылка)

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

Загрузка ...

Шустрый

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

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

diadiavova,
В этом месте возникает ошибка Оператор "Xor" для типов "Char" и "Char" не определен.

Код


Dim str4 As String = Convert.ToString(DirectCast(([cStr](i) Xor str(i)), Integer)).PadLeft(3, "0"c)

diadiavova

Дата 7.6.2012, 14:31 (ссылка)

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

Загрузка ...

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

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

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

Цитата(Feller @ 7.6.2012, 15:26

)

В этом месте возникает ошибка Оператор "Xor" для типов "Char" и "Char" не определен.

Нужно привести к типу Integer, то есть замени

Код


[cStr](i) Xor str(i)

на

Код


CInt([cStr](i)) Xor CInt(str(i))

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

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

Feller

Дата 7.6.2012, 14:48 (ссылка)

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

Загрузка ...

Шустрый

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

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

diadiavova,

Студия выдала ошибку сказала что char нельзя преобразовать в integer, и предложила вариант AscW. Хотя AscW не подходит, он не конвертирует в integer.

Код


 Dim str4 As String = Convert.ToString((CInt(AscW([cStr](i))) Xor (CInt(AscW(str1(i)))))).PadLeft(3, "0"c)

diadiavova

Дата 7.6.2012, 14:51 (ссылка)

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

Загрузка ...

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

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

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

Цитата(Feller @ 7.6.2012, 15:48

)

Хотя AscW не подходит, он не конвертирует в integer.

Ну эта функция делает как раз то, что надо. Есть еще у самой структуры Char метод, который можно использовать. Просто в шарпе это делает компилятор, а в бейсике надо делать вручную.

Добавлено через 1 минуту и 43 секунды
Метод, о котором я написал - System.Char.ConvertToUtf32

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

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

Feller

Дата 7.6.2012, 14:57 (ссылка)

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

Загрузка ...

Шустрый

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

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

diadiavova, Спасибо
А что за метод в Char? А для чего нужен оператор XOR , в msdn почитал но там не множко не понятно.

diadiavova

Дата 7.6.2012, 15:42 (ссылка)

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

Загрузка ...

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

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

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

Цитата(Feller @ 7.6.2012, 15:57

)

А что за метод в Char?

Я же написал

Цитата(diadiavova @ 7.6.2012, 15:51

)

System.Char.ConvertToUtf32

Цитата(Feller @ 7.6.2012, 15:57

)

А для чего нужен оператор XOR , в msdn почитал но там не множко не понятно.

Что именно непонятно? Я знаю ровно то, что написано в мсдн.

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

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

Feller

Дата 29.6.2012, 07:58 (ссылка)

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

Загрузка ...

Шустрый

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

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

Как из строки заменить 3 символа ,:. на пустоту.?Это можно сделать при помощи Replace но тогда Replace придётся писать 3 раза.

diadiavova

Дата 14.7.2012, 19:04 (ссылка)

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

Загрузка ...

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

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

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

Цитата(Feller @ 29.6.2012, 08:58

)

но тогда Replace придётся писать 3 раза.

Если это проблема, то решить можно методом Replace класса Regex.
Нужный тебе паттерн будет выглядеть так

Код


[,:\.]

Это сообщение отредактировал(а) diadiavova - 14.7.2012, 19:05

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

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

gangsterovich

Дата 27.8.2012, 11:46 (ссылка)

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

Загрузка ...

Шустрый

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

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

имеется текст файл.как удалить строчку в файле ,если знаем что строчка должна содержать в себе "строчка".перерыл 4 форума.приемлимого ответа не нашел.код 2-3 строчки должен занимать,как мне кажется

diadiavova

Дата 27.8.2012, 18:01 (ссылка)

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

Загрузка ...

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

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

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

gangsterovich, Так, а в чем проблема-то? Считываешь файл с помощью IO.File.ReadAllLines, получаешь массив строк передаешь их в другую коллекцию, проверяя попутно нет ли там удаляемой строчки(ее пропусти), что останется либо впиши в файл заново построчно( с помощью StreamWriter например), либо объедини с помощью String.Join и запиши в файл в одно действие.

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

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

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