|
|
| Search result for ghaziasgar |
| Page(s) |
| ghaziasgar |
Iran Update 29 Apr 10 Khamenei's representative in Hajj and Pilgrimage Organization, mullah Seyyed Ghazi Asgar expressed his concern about what he called “export of improper veil” to Saudi Arabia and said: “some Iranian women are negligent even in the land ... Sri Lankan maid returns from Saudi with 24 nails inside body | www ... Manouchehr Mottaki "will pay a visit to Saudi Arabia before the pilgrimage to meet his Saudi counterpart (Prince Saud al-Faisal)," Ali Ghazi Asgar, a senior official in charge of Iranian pilgrims, told AFP.Mottaki will seek "to reassure ... SA's top student programmers head to Imagine Cup in Cairo Nathan Naidoo and Mehrdad Ghaziasgar will be representing South Africa at the finals of the Imagine Cup 2009, a Microsoft-sponsored technology competition, after winning the regional finals in December 2008. ... Students win at mind games - Microsoft Imagine Cup 2009 South Africa's national finalists, Nathan Naidoo and Mehrdad Ghaziasgar, from the University of the Western Cape, competed in the demanding software design category with their iSign application. iSign is a digital phrase book that ... مثال 4 درس 12 مبانی علم رایانه Private Sub Command1_Click() Dim g As Single g = Val(Text1) If g < 10 Then Print Tab(15); "you failed". End Sub. Private Sub Command2_Click() End End Sub. Private Sub Form_Load() Command1.Caption = "Run" Command2.Caption = "Exit" ... مثال 2 درس 12 مبانی علم رایانه Private Sub Command1_Click() Dim x As String, y As String x = Text1 y = Text2 Label3.Caption = "hi" + x + "your phone nambar is" + y End Sub. Private Sub Command2_Click() End End Sub. Private Sub Form_Load() Command1.Caption = "display" ... مثال 5 درس12 مبانی علم رایانه Private Sub Command1_Click() Dim g As Single g = Val(Text1) If g < 10 Then Print Tab(15); "you failed" Else Print Tab(15); "you passed" End If End Sub. Private Sub Command2_Click() End End Sub. Private Sub Form_Load() Command1. ... مثال 7 درس 12 مبانی علم رایانه Private Sub Command1_Click() Dim x As Integer x = Val(Text1) Select Case num Case Is > 0 Label1.Caption = "positive" Case Is < 0 Label1.Caption = "negative" Case Else Label1.Caption = "zero" End Select ... پرسش وتمرین 1- دو نوع درگاه متداول در ریزرایانه ها را با هم مقایسه ... پرسش وتمرین. 1- دو نوع درگاه متداول در ریزرایانه ها را با هم مقایسه کنید. 2- چرا قابلیت توسعه برای یک رایانه مهم است؟ 3- چه عواملی در سرعت یک رایانه مهم موثر هستند؟ 4- رمز گشایی دستور العمل ها از وظایف کدام واحد است؟ ... مثال 11درس 12 مبانی علم رایانه Private Sub Command1_Click() Dim x As String x = InputBox("enter your password", "get password") While x <> "dana" x = InputBox("enter your password", "get password") Wend Label1.Caption = "welcom" End Sub. Private Sub Command2_Click() ...
|
|
|