Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - .NET

Страница: 1 | 2 |

 

  Вопрос: Чтение текста при загрузке программы Добавлено: 20.12.11 18:31  

Автор вопроса:  IamProgrammer

Ответить

  Ответы Всего ответов: 20  

Номер ответа: 16
Автор ответа:
 IamProgrammer



Вопросов: 1
Ответов: 13
  Профиль | Цитата | #16 Добавлено: 22.12.11 18:20
=) Ну тогда извиняюсь, что нагрубил, пользуйтесь на здоровье

Ответить

Номер ответа: 17
Автор ответа:
 IamProgrammer



Вопросов: 1
Ответов: 13
  Профиль | Цитата | #17 Добавлено: 22.12.11 18:23
Интересует ещё две вещи, как сделать "Сохранить, сохранить как", я попробывал так, но это билиберда по идее:
  1.  
  2.     Dim saveas As Boolean = True
  3.     Dim filename As String
  4.  
  5.  Private Sub СохранитьToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles СохранитьToolStripMenuItem.Click
  6.         If TabControl1.SelectedTab.Text = "Безимянный" Then
  7.             saveas = True
  8.         Else
  9.             saveas = False
  10.         End If
  11.         If saveas = True Then
  12.             Dim sw As New IO.StreamWriter(SaveFileDialog1.FileName)
  13.             filename = SaveFileDialog1.FileName
  14.             saveas = False
  15.             sw.Write(CType(TabControl1.SelectedTab.Controls.Item(0), TextBox).Text)
  16.             sw.Close()
  17.             sw.Dispose()
  18.             TabControl1.SelectedTab.Text = SaveFileDialog1.FileName
  19.         Else
  20.             Dim sw As New IO.StreamWriter(SaveFileDialog1.FileName)
  21.             sw.Write(filename)
  22.             sw.Close()
  23.             sw.Dispose()
  24.         End If
  25.     End Sub
  26.  
  27.     Private Sub СохранитьКакToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles СохранитьКакToolStripMenuItem.Click
  28.         If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
  29.             Dim sw As New IO.StreamWriter(SaveFileDialog1.FileName)
  30.             filename = SaveFileDialog1.FileName
  31.             saveas = False
  32.             sw.Write(CType(TabControl1.SelectedTab.Controls.Item(0), TextBox).Text)
  33.             sw.Close()
  34.             sw.Dispose()
  35.         End If
  36.     End Sub



И интересует как забить во вкладку имя файла, но не к примеру C:\sasd.txt, а просто sasd.txt

Ответить

Номер ответа: 18
Автор ответа:
 IamProgrammer



Вопросов: 1
Ответов: 13
  Профиль | Цитата | #18 Добавлено: 22.12.11 18:24
а биллиберда это потому что в другую вкладку когда переходишь, сохраняется в файл, который был в первой вкладке, сами попробуйте даже если не понятно =)

Ответить

Номер ответа: 19
Автор ответа:
 IamProgrammer



Вопросов: 1
Ответов: 13
  Профиль | Цитата | #19 Добавлено: 22.12.11 18:24
а биллиберда это потому что в другую вкладку когда переходишь, сохраняется в файл, который был в первой вкладке, сами попробуйте даже если не понятно =)

Ответить

Номер ответа: 20
Автор ответа:
 Cramper



Вопросов: 15
Ответов: 93
  Профиль | Цитата | #20 Добавлено: 23.12.11 08:21
Принято.

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам