Bir cümledeki boşluk,kelime,harf sayısını bulma

Visual Basic Visual Basic.net ve Programlama Dilleri • Visual Basic.NET • Visual Basic.NET Kod Bankası (Moderatör: volkancc) • Bir cümledeki boşluk,kelime,harf sayısını bulma

Sayfa: [1] Aşağı git

« önceki sonraki »

Yazdır

	Gönderen	Konu: Bir cümledeki boşluk,kelime,harf sayısını bulma (Okunma Sayısı 728 defa)
0 Üye ve 1 Ziyaretçi konuyu incelemekte.

abcdefg

Aktif Üye

Karma: 36

Offline

Cinsiyet: Bay

Mesaj Sayısı: 704

Bir cümledeki boşluk,kelime,harf sayısını bulma

« : 02 Mayıs 2008, 16:36:26 »

Public Class Form1
Dim a, c, d, w, x, f, I
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
     a = InputBox("cumleyi girin", "cumle")
     c = Len(a)
     LTrim(a)
     For I = 1 To c
        f = Mid(a, I, 2)
        If f = Strings.Space(2) Then
          d = d + 1
        End If
     Next
     For I = 1 To c
        f = Mid(a, I, 1)
        If f = Strings.Space(1) Then
          w = w + 1
        Else
          x = x + 1
       End If
     Next
     MsgBox("cumledeki bosluk sayısı " + CStr(w))
     MsgBox("cumledeki harf sayısı " + CStr(x))
     MsgBox("cumledekı kelime sayısı " + CStr(w - d + 1))
     d = 0
     w = 0
     x = 0
End Sub
End Class


	Logged

Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap

Linklerin Görülmesine Izin Verilmiyor
Linki Görebilmek Için Üye Ol veya Giris Yap

Forum Kuralları

Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap

spilgirl

Yeni Üye

Karma: 0

Offline

Cinsiyet: Bayan

Mesaj Sayısı: 8

Ynt: Bir cümledeki boşluk,kelime,harf sayısını bulma

« Yanıtla #1 : 27 Mayıs 2008, 22:12:20 »

şaka gibi yaa daha 3 hafta önce hocamız bizden bu sorunun aynısı istemişti kimse yapamamıştı ama şuan yapılışının aynısı olan kodları gördüm önce şokoldum sonrada o zmn neden görmedim die üzüldüm.yinede ellerinize sağlık