Updating a file random access

Write Line(y0 - y) m = datepart("M", s) d = datepart("D", s) System. Write("Zodiac: ") Select Case m Case 1 If d = 65 Then a = s(i) j = asc(a) 32 a = Convert.Net Imports System Module m Delegate Sub delmy(By Val s As String) Sub main() Dim del As delmy del = Address Of dis del.invoke("This is by Delegates") End Sub Sub dis(By Val str As String) console.writeline(str) End Sub End Module 2.9 Write a program to demonstrate inheritance and interfaces in VB .Writeline(c) End Sub Sub decr (By Ref c As Integer) c = c - 1 End Sub Sub main() incr(j) Console. Writeline (j) End Sub End Module 2.6 Write a program which checks the number is prime or not. Writeline ("The power ofโ€ & a & " ^ " & b & " is: " & (a ^ b)) Else Console.๏ƒ˜ Imports System Module m Sub main() Dim I, N as Integer Console. Writeline ("invalid choice...") End If End Sub End Module 2.9 Write a program to sort an array which accepts number from user and store it into dynamic array.

Writeline("Total Amount: ", T) End sub End module 2.4 Write a program which accepts number from user and calculate factorial value by user defined function. Writeline ("Enter the first digit: ") Dim a As Double = CDbl (Console. Writeline ("The addition is: " & (a b)) Else If s = 2 Then Console.

๏ƒ˜ Imports System Module m Sub main() Dim n, i as integer Dim fact as integer = 1 Console. Writeline ("The subtraction is: " & (a - b)) Else If s = 3 Then Console.

Writeline ("enter the number") n= console.readline() For i=1 to n step 1 Fact = fact * i Next Console. Writeline ("The multiplication is: " & (a * b)) Else If s = 4 Then Console.

Writeline ("THE NUMBER IS A PRIME NUMBER") End Sub End Module 2.7 Write a program to give example of method overloading.

๏ƒ˜ Imports System Module m Sub main() Dim r, p as integer Dim d, b, p1 as double Console.

612

Leave a Reply