Microsoft Excel é um aplicativo de planilha eletrônica que faz parte da suíte Microsoft Office. Visual Basic.NET é uma linguagem de programação Microsoft que é relativamente fácil de aprender e usar. A Comma-Separated Value (CSV) é um arquivo de texto simples que pode ser facilmente lido por outros aplicativos. Um arquivo CSV também é usado para economizar espaço em disco , já que é muito menor em tamanho do que um arquivo XLS normal. Em alguns passos simples , você pode converter arquivos XLS para arquivos CSV usando VB.NET . Instruções
1
Comece "Microsoft Visual Basic 2008 Express ". Selecione o menu "Arquivo" e clique em "New Project ... " Clique em " Windows Forms Application " em " Visual Studio modelos instalados ". Selecione "OK".
2
Pressione " Ctrl", " Alt " e " X " para abrir a " caixa de ferramentas ". clique duas vezes em "Button " em " controles comuns "para adicionar um novo botão para " Form1 ".
3
Clique em" Project "e selecione" Add Reference. "Click" cOM ", selecione" Microsoft Excel 12.0 Object Biblioteca "e clique em " OK ".
4
clique duas vezes em " Button1 "para abrir o " módulo Form1.vb " . Digite o seguinte no topo da " Form1.vb " para adicionar uma referência :
Imports Microsoft.Office.Interop
5
Digite o seguinte para declarar as variáveis dentro " Sub Button1_Click " :
Dim excelApplication As New Excel.ApplicationDim excelWrkBook Como Excel.Workbook
6
Type" excelApplication.Visible = False "para ocultar Excel.Type " excelApplication.DisplayAlerts = Falso "para desativar a exibição de alertas de mensagens
7
Digite o seguinte para abrir o seu . " " pasta de trabalho e salvá-lo como " XLS CSV " :
excelWrkBook = _FileFormat : . = Microsoft.Office.Interop.Excel.XlFileFormat.xlCSV )
Quando você executar o programa e clique em " Button1 ", este código será executado para converter o arquivo
8
Digite o seguinte para fechar e sair do seu aplicativo :
excelWrkBook.Close () = excelApplication.DisplayAlerts TrueexcelApplication.Quit ()
9
Pressione " F5 " para executar o seu programa . Clique em " Button1 ".
