On_LiNe Konu tarihi: 2 Mart 2012 Paylaş Konu tarihi: 2 Mart 2012 Form açın və Forma 1 Button 1 textboxt əlavə edin. Buttona klik edib bu kodlari yazin: Dim eded As Integer Dim kok As Double eded = TextBox1.Text If eded = 0 Then MsgBox("Ədəd Sıfırdır") ElseIf eded < 0 Then MsgBox("Ədəd mənfidir") Else kok = Math.Sqrt(eded) MsgBox(kok) End If Ümumi kod: Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim eded As Integer Dim kok As Double eded = TextBox1.Text If eded = 0 Then MsgBox("Ədəd Sıfırdır") ElseIf eded < 0 Then MsgBox("Ədəd mənfidir") Else kok = Math.Sqrt(eded) MsgBox(kok) End If End Sub End Class Alıntı Link to comment Share on other sites More sharing options...
TΛNNΞЯ Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 Paylasim ucun tesekkurler Alıntı Link to comment Share on other sites More sharing options...
Delphi7 Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 On_LiNe, paylaşım üçün sağ ol. Alıntı Link to comment Share on other sites More sharing options...
On_LiNe Mesaj tarihi: 2 Mart 2012 mövzunu açan Paylaş Mesaj tarihi: 2 Mart 2012 deymez Alıntı Link to comment Share on other sites More sharing options...
Guest Musa_ Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 təşəkkürlər..bilirdim Alıntı Link to comment Share on other sites More sharing options...
zeus Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 Çox sağol Alıntı Link to comment Share on other sites More sharing options...
ZAUR_033 Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 Təşəkkürlər Alıntı Link to comment Share on other sites More sharing options...
=== Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 Təşəkkürlər Alıntı Link to comment Share on other sites More sharing options...
farid.93 Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 paylaşdığın üçün sağol Alıntı Link to comment Share on other sites More sharing options...
Guest musfiq6171 Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 twk Alıntı Link to comment Share on other sites More sharing options...
On_LiNe Mesaj tarihi: 2 Mart 2012 mövzunu açan Paylaş Mesaj tarihi: 2 Mart 2012 Deymez sizde sagolun Alıntı Link to comment Share on other sites More sharing options...
Windows-Master-BoY Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 Məlumata görə Thanks. Alıntı Link to comment Share on other sites More sharing options...
On_LiNe Mesaj tarihi: 2 Mart 2012 mövzunu açan Paylaş Mesaj tarihi: 2 Mart 2012 Deymez sen de sagol Alıntı Link to comment Share on other sites More sharing options...
nurik111 Mesaj tarihi: 2 Mart 2012 Paylaş Mesaj tarihi: 2 Mart 2012 Təşəkkürlər Alıntı Link to comment Share on other sites More sharing options...
On_LiNe Mesaj tarihi: 3 Mart 2012 mövzunu açan Paylaş Mesaj tarihi: 3 Mart 2012 Deymez buyur xosdu Alıntı Link to comment Share on other sites More sharing options...
My-Comp yek Mesaj tarihi: 3 Mart 2012 Paylaş Mesaj tarihi: 3 Mart 2012 Təşəkkürlər Alıntı Link to comment Share on other sites More sharing options...
On_LiNe Mesaj tarihi: 3 Mart 2012 mövzunu açan Paylaş Mesaj tarihi: 3 Mart 2012 My-Comp yek deymez Alıntı Link to comment Share on other sites More sharing options...
Recommended Posts
Sohbete katıl
Şimdi mesajını gönderebilir ve daha sonra kayıt olabilirsin. Bir hesabın varsa, hesabınla göndermek için şimdi oturum aç.