Iranian Programming Support

Welcome To Csharp TeaM Forum.
For Use All Forum Posts And See Links
Please Register
Thanks
www.Programming.MrForum.net
Csharp TeaM Administrator

Join the forum, it's quick and easy

Iranian Programming Support

Welcome To Csharp TeaM Forum.
For Use All Forum Posts And See Links
Please Register
Thanks
www.Programming.MrForum.net
Csharp TeaM Administrator

Iranian Programming Support

Would you like to react to this message? Create an account in a few clicks or log in to continue.
Iranian Programming Support

Csharp TeaM

Top posting users this month

No user

Latest topics

» html to c# source code convert help
by launchar Tue Dec 06, 2016 7:22 am

» User input
by nesraz Sun Dec 20, 2015 8:39 am

» darkhaste source mediaplayer baraye b4a
by parham01 Tue Dec 15, 2015 10:31 am

» Tolide esme file gheire tekrari
by sajjad3011 Fri Jul 31, 2015 5:00 pm

» 368 library basic 4 android
by alimusavi71 Fri Jul 17, 2015 6:45 pm

» نرم افزار دریافت لایسنس آنتی ویروس نود 32
by programmer-x Wed Jul 15, 2015 3:19 pm

» help for java applications
by launchar Wed Jul 01, 2015 12:25 am

» Nimbuzz id Maker auto Captcha & Auto add FlooD & id BloCker
by briant Sat Jun 20, 2015 12:46 pm

» best mobile server v.1.0.0 persian edition
by programmer-x Fri Jun 19, 2015 12:41 am

» plz help me i neez xml code for spy bot
by alone Sun Mar 22, 2015 9:30 pm

» Dialogs Lib {Basic 4 Android}
by abdo0o Mon Mar 09, 2015 4:02 pm

» Room + PV Flooder Nimbuzz 2015
by sholeh Sat Feb 21, 2015 8:06 am

» PV Flooder Nimbuzz 2015
by sholeh Sat Feb 21, 2015 8:03 am

» سی شارپ سورس
by tr0 Wed Dec 24, 2014 12:15 pm

» help plz auto maker ids
by launchar Wed Dec 17, 2014 5:57 pm

» Join Multi Id To Room + Captcha [ Badbuzz Team ] In Seri Ba AgsXMPP !!
by abdo0o Fri Dec 12, 2014 4:47 am

» Amoozesh Ersale Sms Dar B4a
by abdo0o Fri Dec 12, 2014 4:43 am

» help me pls mehran brother
by launchar Wed Dec 03, 2014 6:36 pm

» plz help code Refresh captcha join Room
by ayad53 Wed Dec 03, 2014 12:24 pm

» please Help Me For AutoCaptchaa kardan IdMaker
by abdo0o Tue Dec 02, 2014 12:12 pm

» source C# bot addlist sender by ==> Alone_051@n.c
by walahazrat Mon Dec 01, 2014 2:34 am

» s2a sender tro help me pls
by walahazrat Mon Dec 01, 2014 2:28 am

» Help For {Data id } C# asixmpp.dll
by abdo0o Sun Nov 30, 2014 11:17 pm

» Help C# {Join & Left With Remoter}
by $iahi Tue Nov 25, 2014 10:31 am

» Source Nimbuzz User Searcher By Mehr,an [ Badbuzz TeaM ]
by waseemmalik Wed Nov 19, 2014 11:35 am


2 posters

    Random Giri Dar B4A

    Mehdi izadi
    Mehdi izadi
    Administrator
    Administrator


    Posts : 793
    Points : 1182
    Thanks : 288
    Join date : 2013-06-06
    Age : 32
    Location : Iran,Hormozgan,Bandare Lengeh

    Solved Random Giri Dar B4A

    Post by Mehdi izadi Sun Aug 03, 2014 10:46 am

    Khob Starte Kare Khodamo Ba Ye Amoozeshe Mobtadi Shoroo Mikonam.
    Doost Daram Mesle C# Betoonim Az 0 Va Az Paye Karemun Ro Shoroo Konim Ta Harki Ke
    Hanooz Shoroo Nakarde O Doost Dare Android Kar Kone Betoone Berese !
    Khob Onvane Amoozesh Hast Random Giri.
    Masalan Ma Mikhaym Az Beyne Adade 1 Ta 50 Random Begirim.
    Ebteda Dar Ghesmate Sub Globals Miaeim Ye Int Tarif Mikonim Be In Soorat:

    Code:
    Dim M As Int

    Random Giri Dar B4A Dim_Int_0


    Khob Badesh Tooye Voide Click E Buttonemun Mirim Va Migim:

    Code:
    M = Rnd(1,50)
    Msgbox(M,"R e s u l t")



    Tooye Khatte Aval Miaeim Inte Tarif Shode Ke M Hast Ro Mosavi Gharar Midim Ba Randomi Az Adade Beyne 1 Ta 50.
    Tooye Khatte Dovvom Ham Miaeim Natije Ro Tooye Ye MessageBox Namayesh Midim.
    Random Giri Dar B4A ResulT_Int_0


    In Amoozesh Tooye Hamin Topic Edame Dare !
    In Ghesmat Pish Zamineii Bood Vase Projecti Ke Dar Pish Darim.
    Mehdi izadi
    Mehdi izadi
    Administrator
    Administrator


    Posts : 793
    Points : 1182
    Thanks : 288
    Join date : 2013-06-06
    Age : 32
    Location : Iran,Hormozgan,Bandare Lengeh

    Solved Re: Random Giri Dar B4A

    Post by Mehdi izadi Sun Aug 03, 2014 11:26 am

    Khob Edameye Amooozesh.

    Un Int Va Kollan Khat Code Haei Ro Ke Dashtid Ro Pak Konid.

    Aval Begam Mikhaym Chikar Konim:

    Ma Mikhaym Ba Click Kardan Rooye Button1 , 2 Ta Adade Tasadofi

    Ro Tooye 2 Ta Label E Joda Az Barname Begirim.

    Badesh Tooye Yek EditText Bayad Jam'e Un 2 Adad Ro Benevisim Va Button2 Ro

    Bezanim. Age Textemun Khali Bood Mige Por Konid. Age Khali Nabood Mire

    Tooye Ye Void Va Un Ro Ejra Mikone . Un Void Miad Mige Ke Age Javab Dorost Bood

    Begu Javab Doroste Va Age EshteBah Ham Bood Begu Eshtebahe.




    Start:

    2 Ta Int Tarif Konid:




    Code:
        Dim Number1 As Int
        Dim Number2 As Int



    2 Ta Button Ham Add Konid Dar Design.

    3 Ta Lebel Ham Add Konid Dar Design:

    Label1 Va Label2 Adad Haye Tasadofi Tooshun Gharar Migire Va Label3 Ba Texte + Ast

    Ke Beyne Label1 Va Label2 Gharar Migire.

    Badesh Label Haro Ham Tooye Code Nevisi Tarif Mikonim Chun Bahashun Kar Darim.




    Code:
    Dim Label1,Label2,Label3 As Label



    Khob. Ye Edittext Ham Add Konid Az Design Va Tooye Code Nevisi Ham Tarifesh Konid.




    Code:
    Dim EditText1 As EditText


    Random Giri Dar B4A Axe_Result_3lbl


    Hala Be Voide Click E Button1 Berid Va Code Zir Ro Vared Konid

    Code:
        Number1 = Rnd(1,50)
        Number2 = Rnd(1,50)
        Label1.Text = Number1
        Label2.Text = Number2



    Khob Ta Inja Umadim Adad Haye Tasadofi Ro Gereftim Va Tooye Label Ha Gharar Dadim.

    Hala Mimune Khundan E Javab.

    Tooye Button2 :




    Code:
        If EditText1.Text = "" Then
        ToastMessageShow("Please Answer",True)
        Else
        CheckResult
        End If



    In CheckResult Hamun Voidi Hast Ke Ma Gharare Tarif Konim:





    Code:
    Sub CheckResult
       If EditText1.Text=Number1 + Number2 Then
       ToastMessageShow("Doroste",True)
       Else
       ToastMessageShow("Eshtebahe",True)
       End If
    End Sub



    Mishe Hamin Ro Kheili Pishrafte Tar O Ziba Tar Nevesht Ke Dg Unesh Bar Ohdeye Kasaeie
    Ke Mikhan Az 0 Shoroo Konan O Pishraft Konan Tooye Barname Nevisi B4A.

    Movafagh Bashid.
    iman saeedi
    iman saeedi
    VB & VB.Net Admin
    VB & VB.Net Admin


    Posts : 95
    Points : 201
    Thanks : 54
    Join date : 2013-06-25

    Solved Re: Random Giri Dar B4A

    Post by iman saeedi Sun Aug 03, 2014 11:28 am

    mehdi random text ham haminjore?
    mesal
    Dim M As Int
    M = Rnd(iman,mehdi)
    Msgbox(M,"R e s u l t")
    Mehdi izadi
    Mehdi izadi
    Administrator
    Administrator


    Posts : 793
    Points : 1182
    Thanks : 288
    Join date : 2013-06-06
    Age : 32
    Location : Iran,Hormozgan,Bandare Lengeh

    Solved Re: Random Giri Dar B4A

    Post by Mehdi izadi Sun Aug 03, 2014 11:46 am

    Iman Jan Un Dg Int Nist . Chun Texte Nemishe Az In Ravesh Use Kard.
    Injoori Mirim:

    Code:
        Dim Label1 As Label
        Dim words As List

    Label Ro Az Design Add Kon Faghat.

    Ye Button Ham Az Design Add Kon.
    Tooye Activicy_Create In Ro Ezafe Kon:

    Code:
        words.Initialize
        words.Addall (Array As String ("Mehdi","Iman","2Mehdi","Csharp","Android","VB","VB.Net"))


    Tooye Voide Button Click Ham:



    Code:
        Dim a As Int
        a=Rnd (0,words.Size-1)
         Dim test As String
        test=words.Get(a)
        Label1.Text = test



     Boos 

    Sponsored content


    Solved Re: Random Giri Dar B4A

    Post by Sponsored content


      Current date/time is Sat Apr 27, 2024 5:37 am