ValueBox1.Value = perAmnt
2012/7/27 LeszekK :
> ValueBox1.Value = perAmnt & "%"
--
Serdecznie pozdrawiam,
Leszek Kubiszewski
--
Live Security Virtual Conference
Exclusive live event will cover all
'Do not use textboxes for mathematical calculations
Dim prmAmnt As Integer
Dim totAmnt As Integer
Dim perAmnt As Single
prmAmnt = prmBox.value 'valuebox! not textbox
totAmnt = totBox.value 'valuebox! not textbox
perAmnt = Round((prmAmnt / totAmnt * 100), 2)
ValueBox1.Value = perAmnt & "%"
I not
help and guidance.
2012/4/29 Adrien Prokopowicz :
> Le dimanche 29 avril 2012 18:00:11 LeszekK a écrit :
>> xml_r = New XmlReader
>> Dialog.OpenFile
>>
>> Try xml_r.Open(Dialog.Path)
>>
>> Repeat
>> If xml_r.Eof Then Break
>> xml
xml_r = New XmlReader
Dialog.OpenFile
Try xml_r.Open(Dialog.Path)
Repeat
If xml_r.Eof Then Break
xml_r.Read()
ListBox1.Add(xml_r.Node.Name)
ListBox1.Add(xml_r.Node.Value)
Wait 0.1
Until xml_r.Eof
xml_r.Close
The code works correctly, but does not read the