Imports System.IO
Imports System.Text
 
Public Class Form1
 
    Private Sub WriteFile()
 
        Dim sw As StreamWriter = Nothing
 
        Try
            sw = New StreamWriter(path:="C:\prueba.txt", append:=False, encoding:=Encoding.Default)
            Using sw
                sw.WriteLine("Primera liinea")
                sw.WriteLine("Segunda linea")
                sw.WriteLine(Me.TextBox1.Text)
            End Using
 
        Catch ex As Exception
            Throw
 
        Finally
            If sw IsNot Nothing Then
                sw.Dispose()
            End If
 
        End Try
 
    End Sub
 
End Class

Imports System.IO
Imports System.Text
 
Public Class Form1
 
    Private Sub WriteFile()
 
        Dim sb As New StringBuilder
        With sb
            .Appendline("Primera liinea")
            .Appendline("Segunda liinea")
            .Appendline(Me.TextBox1.Text)
        End With
 
        Try
            File.WriteAllText("C:\prueba.txt", sb.ToString, Encoding.Default)
 
        Catch ex As Exception
            Throw
 
        Finally
            sb.Clear
 
        End Try
 
    End Sub
 
End Class
 

@Echo OFF 
 
REM Declaro una variable que almacenará el valor de la variable 'path_sql', pero sin comillas dobles, las elimino.
Set sqlPath=%path_sql%
Set sqlPath=%sqlPath:"=%
 
For /F "Tokens=* Delims=" %%a In ('""sqlplus.exe" -s QA_DATAC/qa_dc@orcl_qa @^'%sqlPath%^'ESTADISTICA | "FindStr.exe" "[0-9]""') Do (
	Echo %%~a
)
 
Pause&Exit /B 0

FOR /F "usebackq delims=!" %%c in (`sqlplus -s QA_DATAC/qa_dc@orcl_qa @%PATH_SQL%ESTADISTICA ^|Findstr "[0-9]"`) DO (
SET /A "VALUE=%%c"
ECHO %VALUE%
PAUSE
)

CALL ECHO %%VALUE%%

@Echo OFF
 
For /F "Tokens=* Delims=" %%# In (
	'Echo 123'
) Do (
	Set /A "var=%%#"
	Call Echo Variable dentro del FOR="%%Var%%"
	Call ".\Script2.cmd"
)
 
Pause&Exit

@Echo OFF 
 
Echo Variable desde otro script="%var%"
 
Exit /B 0

ocra script.rb

ocra [options] script.rb [<other files> ...] [-- <script arguments> ...]

ocra --help

# -*- coding: UTF-8 -*-
exit if Object.const_defined?(:Ocra)
 
puts "Hello Ruby"
 
__END__