Menampilkan Form pada Microsoft Visual Studio Express For Windows Phone

Menampilkan/Menjalankan Form pada Microsoft Visual Studio Express For Windows Phone
Dengan menggunakan Passing Variabel

        Dim vTran As String
        vTran = vKode_lok & ";" & vNama_lok & ";" & vTahun
        NavigationService.Navigate(New Uri("/tampil_Iklim_Detail.xaml?msg=" & vTran, UriKind.Relative))

tampil_iklim.xaml adalah nama dari form yang akan ditampilkan
msg adalah variabel yang akan dipassing
sedang kan isinya dari variabel vTran





Sedangkan pada tampil_iklim.xaml.vb ada tambahan procedure sbb

Protected Overrides Sub OnNavigatedTo(ByVal e As    System.Windows.Navigation.NavigationEventArgs)
        MyBase.OnNavigatedTo(e)
        Dim msg As String = ""
        If NavigationContext.QueryString.TryGetValue("msg", msg) Then
            Dim strArr() As String
            strArr = msg.Split(";")
            vKode_lok = strArr(0)
            vNama_lok = strArr(1)
            vTahun = strArr(2)
        End If
   End Sub

perhatikan NavigationContext.QueryString.TryGetValue("msg", msg)
berguna untuk menangkap variabel yg dipassing
 

Split String pada Visual Basic

dim vK as string = "Suku Di Indonesia;Jawa;Bali;Madura"

vArray = Split(vK, ";") 'pisahkan data dengan koma (;)

maka hasilnya adalah:

vArray(0) = "Suku Di Indonesia"

vArray(1) = "Jawa"

vArray(2) = "Bali"

vArray(3) = "Madura"

Demikian

Pendaftaran Mahasiswa Baru UPN Veteran Jawa Timur Telah Selesai Terima kasih atas Partisipasinya

Pendaftaran Mahasiswa Baru UPN Veteran Jawa Timur
Telah Selesai
Terima kasih atas Partisipasinya

Pembayaran SPP Angsuran 1 dimulai pada Tanggal 8 September 2014
di BANK BNI'46 dengan menyebutkan NPM anda




Jadwal Kuliah bisa dilihat di https://siamik.upnjatim.ac.id
dengan memakai NPM dan password anda

Beberapa Trik Sederhana pada Script ASP Classic

1. Untuk Menambahkan Spaci :  

2. Format Number : 

    <% formatnumber(2500,0) %>

3. Format DateTime : 

    <%=FormatDateTime(cDate("09/01/2014"),1)%>

   output : Monday, September, 01, 2014

4. Mengarahkan ke suatu URL :

    response.Redirect("main.asp")

5. Transfer suatu alamat web ke excel

    <%Response.ContentType = "application/vnd.ms-excel"%>

6. Auto Refresh 

    <% Response.AddHeader "Refresh", "10800" %>

7. Transfer suatu alamat web ke Word

    <%Response.ContentType = "application/vnd.ms-word"%>

Demikian

Ditawarkan Agen PPOB dan Pulsa Elektronik, Gratis Biaya Pendaftaran.

Ya Pendaftaran Gratis anda sudah bisa membuka usaha Agen Pulsa Elektronik dengan melayani Semua Operator di Indonesia, harga yang sangat kompetitif.
Juga melayani PPOB yaitu : pln pra bayar, pembayaran Telp, speedy, dll
Ayo Buruan segera buka agen Pulsa ELektronik dengan gratis pendaftarannya.
hub.
- 328288EF
- eMail : admin@sunarto.web.id
- telp : 031-33083055
Semua transaksi bisa dilakukan lewat HP, YM, gTalk (saran Gunakanlah YM atau gTalk karena gratis)
dan Transaksi bisa dilakukan 24Jam Non stop
Deposit bisa lewat BNI,BCA,Mandiri dan semua Support Host2Host
Untuk memantau transaksi disediakan aplikasi under WEB
Jangan lewatkan kesempatan ini