VS-ModoExecutando

    Um dos problemas que a gente encontra e que tem códigos que só devem ser executados quando o sistema está sendo executado no modo Normal(após compilar), e outros códigos no modo Debug, e ainda outros em modo Release.
    Para resolver isso resolvi publicar esta função que eu mesmo criei.
 
Basta coloca-la em um Módulo e chama-la Ex:
If ModoExecutando() = "Debug" Then
If ModoExecutando() = "Release" Then
If ModoExecutando() = "Normal" Then


    ''' <summary> Verifica se o se o Sistema  esta Executando em modo Debug / Release / Normal .
    '''  <para>if ModoExecutando() = "Debug" Then </para>
    '''  <para>if ModoExecutando() = "Release" Then </para>
    '''  <para>if ModoExecutando() = "Normal" Then </para>
    ''' </summary>
    ''' <returns></returns>
    Public Function ModoExecutando() As String
        '**************************************************************
        On Error Resume Next
        If Not Debugger.IsAttached Then
            'O Sistema foi executado modo Normal /Final
            ModoExecutando = "Normal"
            Exit Function
        End If

#If DEBUG Then
        'O Sistema foi executado modo Release
        ModoExecutando = "Release"

#Else
        'O Sistema foi executado modo Debug
        ModoExecutando = "Debug"
#End If

    End Function



Se você não Sabe o que é modo Debug clique aqui.
Se você não Sabe o que é modo Release clique aqui.
Se você não Sabe o que é Módulo clique aqui.

VS-Pegar Dados do Programa


   As vezes você pode ter a necessidade de pegar dados do seu programa em VB6 era fácil apena digitando App. aparecia um monte de dados em visual studio tenho alguns exemplos.

xAppPath = System.Windows.Forms.Application.StartupPath    'Pega a path da aplicação xAppPath = System.Windows.Forms.Application.ExecutablePath 'Pega a path da aplicação c/ o nome xFilename = AppDomain.CurrentDomain.FriendlyName           'Pega o Nome do executável xAppDomain = AppDomain.CurrentDomain.SetupInformation.ConfigurationFile  'Pega o Arquivo de configuração da aplicação


VS-Format()

Um dos problemas e a formatação de datas e números, e para facilitar estou postando hoje todas as formatações do format().
    

        '% Porcentagem Exibe o caractere de porcentagem (%)
        'E + 0, E - 0, e + 0, e - 0 Exponencial Formata a saída na notação exponencial
        '\ Caractere literal Usado com formatação tradicional \n(nova linha)
        '"" literal string Exibe qualquer string dentro de aspas simples ou duplas
        '; Separador de seção Especifica uma saída diferente se o valor numérico a
        'ser formatado é positivo, negativo ou zero

'Exemplos
' Format(Val(Label.text), "000000000")   'Retorna "000001234"
' Dim Valor As Integer
' Valor=42492.45
        ' Valor.ToString("R$ #,###.00") 'Retorna "R$ 42.492,45"
        ' Valor=0.2678
        ' 2- Valor.ToString("0.000") 'Retorna 0,268
        ' Valor=-24.95
        ' 3- Valor.ToString("R$ #,###.00;(R$ #,###.00)") 'Retorna (R$ 24,95)

Formatação de datas

        'String Retorna
        'DTStr = Now.ToLongDateString  'long date format-terça-Feira, 23 de maio de 2016.
        'DTStr = Format(Now(), "Long Time")     'time in the system-defined long time format.
        'DTStr = Format(Now(), "Long Date") 'date in the system-defined long date format.
        'DTStr = Format(Now(), "D")       'using the single letter code for the format.
        'DTStr = Format(DTDate , "h:m:s")          '"5:4:23".
        'DTStr = Format(DTDate , "hh:mm:ss tt") '"05:04:23 PM".
        'DTStr = Format(DTDate , "dddd, MMM d yyyy")  '"Saturday, Jan 27 2001".
        'DTStr = Format(DTDate , "HH:mm:ss")      '"17:04:23".
        'DTStr = Format(23)                         '"23".
        'DTStr = Format(5459.4, "##,##0.00")        '"5,459.40".
        'DTStr = Format(val("334.9"), "###0.00")  '"334.90".
        'DTStr = Format(5, "0.00%")           '"500.00%".

        'Exemplos:
        'Dim DTDate As Date = Now
        'Dim Valor as String
        'Dim DTStr As String
        'Dias = DateTime.DaysInMonth(Year(Now), Mes)
        'para formatar data tem que converter para data
        'Dim XDatataNova As Date = Data_a_ser_Corrigida   ou "02/04/2015"
        'Format(XDatataNova, "MM/dd/yyyy")  'Obs para formatar data tem que converter para data, a variavel tem que ser data

Introdução ao Visual Studio


    Microsoft Visual Studio


    É um ambiente de desenvolvimento integrado (IDE) da Microsoft para desenvolvimento e software especialmente dedicado ao .NET Framework e às linguagens Visual Basic (VB), C, C++, C# (C Sharp) e J# (J Sharp). Também é um produto de desenvolvimento na área web, usando a plataforma do ASP.NET, como websites, aplicativos web, serviços web e aplicativos móveis. As linguagens com maior frequência nessa plataforma são: VB.NET (Visual Basic.Net) e o C♯ (lê-se C Sharp).
    O Visual Studio é uma IDE para o desenvolvimento de Programas para computadores, Celulares e Tablets, na minha opinião é a ferramenta mais fácil de usar que existe no mercado. Para quem está começando no mundo da programação.    Trata-se de um ambiente e poderoso, que permite criar um Programas do zero em poucos minutos para quem já conhece Visual Basic poderá dar asas à imaginação e aproveitar seu conhecimento para utilizar a ferramenta.

Introdução B4A

Basic4Android


      É um ambiente de desenvolvimento simples, mas poderoso, que tem como alvo os dispositivos Android. Sua linguagem é semelhante à linguagem do Visual Basic com suporte adicional para objetos como aplicações compiladas, que são aplicações Android nativas; não há tempo extra de execução ou dependências.

     O Basic4Android é uma IDE para o desenvolvimento de aplicativos APP e jogos para Celulares, Tablets com o Sistema  Android. Na minha opinião é a ferramenta mais fácil de usar que existe no mercado. Para quem está começando no mundo da programação móvel. Trata-se de um ambiente e poderoso, que permite criar um app do zero em poucos minutos para quem já conhece Visual Basic poderá dar asas à imaginação e aproveitar seu conhecimento para utilizar a ferramenta.

  • Basic4android é um ambiente de desenvolvimento simples e poderoso que tem como alvo os dispositivos Android.
  • Basic4android linguagem é semelhante à linguagem Visual Basic com suporte adicional para objetos.
  • Aplicações Basic4android compilados são aplicativos nativos do Android, não há autonomia extra ou dependências.
  • Ao contrário de outros IDEs Basic4android é 100% focada no desenvolvimento do Android.