Results 1 - 10 of about 10 sawaal for "seatment"
Public Class VBPrivate Sub Button1ClickByVal sender As System.Object, ByVal e As System.EventArgs Handles Button1.ClickDim startingPosition, sum As IntegerDim digit As StringFor startingPosition = 0 To TextBox1.Text.Length - 1digit = TextBox1.Text.Substringstarti ngPosition, 1 The following line is
Posted in
Computers & Technology by Rakesh Singh at 5:50 PM on May 31, 2008
Well rakesh,Dim x, y, z As IntegerDim b As StringDim f, j, h As IntegerDim c As StringFor x = 220 To 20000For y = 1 To x - 1b = x.ToString / y.ToStringIf InStrb, ".", CompareMethod.Text = False Thenz = yEnd IfIf y = x - 1 ThenFor j = 1 To z - 1c = z.ToString / j.ToStringIf InStrc, ".&
Posted in
Computers & Technology by Rakesh Singh at 5:49 PM on May 31, 2008
2 to the power 3 is equals to 8.this is very easy.assume two long variables "number" and "power".in the above example number=2 and the power=3.then the code will be like this!dim temp as longtemp=1for i=1 to powertemp=tempnumbern ext...I am feeling HAPPY to answer your question ,
Posted in
Computers & Technology by Rakesh Singh at 5:47 PM on May 31, 2008
Function FactorialIterativn As Integer As Double Dim fact As Double fact = 1 Initialize to 1 for product Do While n>0 fact = fact n n=n-1 Next cycle Loop The returned value FactorialIterativ = fact End Function0! = 1n!=nn-1n-2...321 for n>0...You should have to try this code :Function Facto
Posted in
Computers & Technology by Rakesh Singh at 5:44 PM on May 31, 2008
COMPUTE THE GCD AND LCM OF TWO NUMBERS TOGETHER WITH A BEZOUT EQUALITY The rationale is to use the Euclides algorithm and to memorize the results in a 2x2 Matrix Dn such that a Rn-1 = Dn . b Rn-2 if Rn = Qn x Rn-1 Rn1 then Dn1 = Dn . Q , where Qn 1 Q = 1 0 Qo being the identity matrix For performan
Posted in
Computers & Technology by Rakesh Singh at 5:33 PM on May 31, 2008
COMPUTE THE GCD AND LCM OF TWO NUMBERS TOGETHER WITH A BEZOUT EQUALITY The rationale is to use the Euclides algorithm and to memorize the results in a 2x2 Matrix Dn such that a Rn-1 = Dn . b Rn-2 if Rn = Qn x Rn-1 Rn1 then Dn1 = Dn . Q , where Qn 1 Q = 1 0 Qo being the identity matrix For performan
Posted in
Computers & Technology by Rakesh Singh at 5:30 PM on May 31, 2008
Public Class Form1Private Sub btnCountVowelsClickByVal sender As System.Object,ByVal e As System.EventArgs Handles btnCountVowels.ClickDim strPhrase = Me.txtPhrase.Text.ToLowerDim strVowels4 As StringDim lngVowelBreak As LongDim lngNumofVowels As LongDim lngLengthofPhrase As LongDim lngI As LongDim
Posted in
Computers & Technology by Rakesh Singh at 5:29 PM on May 31, 2008
You should have to try this code :Public Class Form1Private Sub btnCountVowelsClickByVal sender As System.Object,ByVal e As System.EventArgs Handles btnCountVowels.ClickDim strPhrase = Me.txtPhrase.Text.ToLowerDim strVowels4 As StringDim lngVowelBreak As LongDim lngNumofVowels As LongDim lngLengthof
Posted in
Computers & Technology by Rakesh Singh at 5:22 PM on May 31, 2008
hi therethe code is Dim txtClient As TextBox This method is the public interface to SnR functionality.Public Sub FindnReplaceByRef Tb As TextBoxSet txtClient = TbMe.Show , txtClient.ParentEnd SubPrivate Sub cmdReplaceClickDim CaseSense As IntegerDim SourceText As StringDim SourceTextCopy As StringDi
Posted in
Computers & Technology by Rakesh Singh at 5:21 PM on May 31, 2008
You should have to try this program which written for check that a string is palindrome or not :Private Sub Command1ClickDim i As IntegerDim isPalindrome As Booleanredimension array to suit the word in the text boxReDim WordLenText1.Textfill the arrayFor i = 1 To LenText1.TextWordi = MidText1.Text,
Posted in
Computers & Technology by Rakesh Singh at 5:18 PM on May 31, 2008
