Tags
Author: MuazTurkyilmaz - Replies: 13 - Views: 6410
Iki farkili doviz sayfasinin VB'de uyarlamasi
Asagidaki kodlari kolonlarina denklemek istiyorum

Public Function BtnKurTLAl()
If ResmiTatil(Forms(MuM)!TxtTarih) = False Then
Call mesaj("Resmi Tatil Seçtiniz" & vbCrLf & _
"Lütfen tarihi degistiriniz.", "Uyari", 2, "")
Exit Function
End If
Forms(MuM)!LstKurlar.RowSource = ""
Forms(MuM)!LstKurlar.AddItem ("DovizCinsi" & ";" & "Orjinal Isim" & ";" & "Alis" & ";" & "Satis" & ";" & "Kur")
Dim xmldoc As MSXML2.DOMDocument
Dim DovizListesi As MSXML2.IXMLDOM