VERSION 5.00
Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} FormaKonvertor 
   Caption         =   "Evro konvertor"
   ClientHeight    =   5235
   ClientLeft      =   45
   ClientTop       =   405
   ClientWidth     =   4470
   OleObjectBlob   =   "FormaKonvertor.frx":0000
   StartUpPosition =   1  'CenterOwner
End
Attribute VB_Name = "FormaKonvertor"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub m_btnKonverzijaDuE_Click()
    If m_optProdajni.Value Then
      m_txtEvri.Text = m_txtDinari.Text / m_txtProdajni.Text
    Else
      m_txtEvri.Text = m_txtDinari.Text / m_txtKupovni.Text
    End If
End Sub

Private Sub m_btnKonverzijaEuD_Click()
    If m_optProdajni.Value Then
      m_txtDinari.Text = m_txtEvri.Text * m_txtProdajni.Text
    Else
      m_txtDinari.Text = m_txtEvri.Text * m_txtKupovni.Text
    End If

End Sub