http://www.vbex.ru/index.php?action=history&feed=atom&title=VB.Net_Tutorial%2FClass_Module%2FSub
VB.Net Tutorial/Class Module/Sub - История изменений
2026-04-05T05:53:13Z
История изменений этой страницы в вики
MediaWiki 1.30.0
http://www.vbex.ru/index.php?title=VB.Net_Tutorial/Class_Module/Sub&diff=3445&oldid=prev
в 16:40, 26 мая 2010
2010-05-26T16:40:30Z
<p></p>
<table class="diff diff-contentalign-left" data-mw="interface">
<tr style="vertical-align: top;" lang="ru">
<td colspan="1" style="background-color: white; color:black; text-align: center;">← Предыдущая</td>
<td colspan="1" style="background-color: white; color:black; text-align: center;">Версия 16:40, 26 мая 2010</td>
</tr><tr><td colspan="2" style="text-align: center;" lang="ru"><div class="mw-diff-empty">(нет различий)</div>
</td></tr></table>
http://www.vbex.ru/index.php?title=VB.Net_Tutorial/Class_Module/Sub&diff=3446&oldid=prev
Admin: 1 версия
2010-05-26T12:55:30Z
<p>1 версия</p>
<p><b>Новая страница</b></p><div>==Define a sub routine and call it==<br />
<br />
<br />
<br />
<source lang="vbnet">Option Strict On<br />
Imports System<br />
<br />
Module Module1<br />
Sub Main( )<br />
Console.WriteLine("In Main! ")<br />
SomeMethod( )<br />
Console.WriteLine("Back in Main( ).")<br />
End Sub "Main<br />
Sub SomeMethod( )<br />
Console.WriteLine("Greetings from SomeMethod!")<br />
End Sub <br />
End Module</source><br />
<pre class=codeResult>In Main!<br />
Greetings from SomeMethod!<br />
Back in Main( ).</pre><br />
<br />
==Sub procedure that prints payment information.==<br />
<br />
<br />
<br />
<source lang="vbnet">Module Tester<br />
Sub Main()<br />
PrintSub(40, 10.5)<br />
PrintSub(38, 21.75)<br />
PrintSub(20, 13)<br />
PrintSub(50, 14)<br />
End Sub<br />
Sub PrintSub(ByVal hours As Double, ByVal wage As Decimal)<br />
Console.WriteLine("The payment is {0:C}", hours * wage)<br />
End Sub<br />
End Module</source><br />
<pre class=codeResult>The payment is $420.00<br />
The payment is $826.50<br />
The payment is $260.00<br />
The payment is $700.00</pre></div>
Admin