Windows Việt

Cộng Đồng Công Nghệ Thông Tin Việt

Trang ChínhTrang Chính  Sự kiện  Tìm kiếmTìm kiếm  Đăng kýĐăng ký  Đăng NhậpĐăng Nhập  

Share
 
 gà cần giúp đở
Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Tác giảThông điệp
gavietnam
Member

gavietnam
Member
Giới tính : Nữ
Tuổi : 30
Posts Posts : 23
Coins Coins : 38
Thanked Thanked : 0
gà cần giúp đở Empty
Bài gửiTiêu đề: gà cần giúp đở   gà cần giúp đở EmptyFri 08 Oct 2010, 16:02

hôm rồi mình lam bài tập(vb) xong lưu lại vào máy rồi chép toàn bộ vào usb và bây giờ không biết làm thế nào để mở bài ra cả. Ai tốt bụng thì chỉ giúp mình nha tại sắp nộp bài rồ

※ Bài viết cùng chuyên mục


Tác giảThông điệp
changtraisitinh
Member

changtraisitinh
Member
Giới tính : Nam
Tuổi : 30
Posts Posts : 405
Coins Coins : 914
Thanked Thanked : 113
gà cần giúp đở Empty
Bài gửiTiêu đề: Re: gà cần giúp đở   gà cần giúp đở EmptyFri 08 Oct 2010, 19:00

>>>1.vào thư mục đó mở file project lên.
>>>2.mở visual studio => file => open project >>> mở thư mục project chọn file có đuôi .vbproj


>>> bom


gà cần giúp đở Vtc14653vtc13203nohacks

※ Bài viết cùng chuyên mục


https://windows.forumvi.com
Tác giảThông điệp
boy_saudoi
Member

boy_saudoi
Member
Giới tính : Nam
Tuổi : 30
Posts Posts : 43
Coins Coins : 85
Thanked Thanked : 8
gà cần giúp đở Empty
Bài gửiTiêu đề: Re: gà cần giúp đở   gà cần giúp đở EmptyFri 08 Oct 2010, 20:57

[You must be registered and logged in to see this link.] đã viết:
hôm rồi mình lam bài tập(vb) xong lưu lại vào máy rồi chép toàn bộ vào usb và bây giờ không biết làm thế nào để mở bài ra cả. Ai tốt bụng thì chỉ giúp mình nha tại sắp nộp bài rồ
File -> Open project -> tìm đến địa chỉ đã lưu -> mở file .vbproj hay .sln Very Happy


Sống Trên Đời Phải Có Chữ "Tâm"

gà cần giúp đở Av7005

Muốn Sinh Tồn Phải Thêm Chữ "Nhẫn"

※ Bài viết cùng chuyên mục


Tác giảThông điệp
anhdan3012
Member

anhdan3012
Member
Giới tính : Nam
Tuổi : 29
Posts Posts : 193
Coins Coins : 435
Thanked Thanked : 56
gà cần giúp đở Empty
Bài gửiTiêu đề: Re: gà cần giúp đở   gà cần giúp đở EmptyFri 08 Oct 2010, 22:24

vào mở file sln lên, nếu ko thấy hiển thị j, tức là bạn đã ẩn solution, vì vậy bạn phải vào view và chọn solution để có thể xem những bài mà bạn đã code.


[You must be registered and logged in to see this link.]

gà cần giúp đở 123
Ôi tình iu của tôi!!!

※ Bài viết cùng chuyên mục


http://anhdanblog.tk
Tác giảThông điệp
gavietnam
Member

gavietnam
Member
Giới tính : Nữ
Tuổi : 30
Posts Posts : 23
Coins Coins : 38
Thanked Thanked : 0
gà cần giúp đở Empty
Bài gửiTiêu đề: Re: gà cần giúp đở   gà cần giúp đở EmptySat 09 Oct 2010, 08:59

Cám ơn các bạn rất nhiều. Các bạn cho mình hỏi thêm 1 vấn đề nửa nha. Mình không biết làm thế nào để chia lấy dư cả. ví du:if (dv%2==0) thì máy báo số 2 bị lổi. Ah còn làm thế nào để định nghĩa khác vậy mình định nghĩa cũng không được ví dụ:(t! = 0) thì máy gạch dưới chổ t!. Mong nhận được sự giúp đở của các bạn. cám ơn các bạn nhiều

※ Bài viết cùng chuyên mục


Tác giảThông điệp
changtraisitinh
Member

changtraisitinh
Member
Giới tính : Nam
Tuổi : 30
Posts Posts : 405
Coins Coins : 914
Thanked Thanked : 113
gà cần giúp đở Empty
Bài gửiTiêu đề: Re: gà cần giúp đở   gà cần giúp đở EmptySat 09 Oct 2010, 09:18

MOD chia lấy dư
<> khác


vào đây xem kỹ nha bạn

các toán tử trong VB.NET

[You must be registered and logged in to see this link.]


gà cần giúp đở Vtc14653vtc13203nohacks

※ Bài viết cùng chuyên mục


https://windows.forumvi.com
Tác giảThông điệp
gavietnam
Member

gavietnam
Member
Giới tính : Nữ
Tuổi : 30
Posts Posts : 23
Coins Coins : 38
Thanked Thanked : 0
gà cần giúp đở Empty
Bài gửiTiêu đề: Re: gà cần giúp đở   gà cần giúp đở EmptySat 09 Oct 2010, 10:30

các bạn cho mình hỏi khi nộp 76 bai chi cần nộp file console thoi hay phải nộp hết vậy?

※ Bài viết cùng chuyên mục


Tác giảThông điệp
anhdan3012
Member

anhdan3012
Member
Giới tính : Nam
Tuổi : 29
Posts Posts : 193
Coins Coins : 435
Thanked Thanked : 56
gà cần giúp đở Empty
Bài gửiTiêu đề: Re: gà cần giúp đở   gà cần giúp đở EmptySat 09 Oct 2010, 20:34

nộp nguyên thư mục solution luôn nha bạn !


[You must be registered and logged in to see this link.]

gà cần giúp đở 123
Ôi tình iu của tôi!!!

※ Bài viết cùng chuyên mục


http://anhdanblog.tk
Tác giảThông điệp
Eating
Member

Eating
Member
Giới tính : Nam
Tuổi : 30
Posts Posts : 14
Coins Coins : 10
Thanked Thanked : 0
gà cần giúp đở Empty
Bài gửiTiêu đề: Re: gà cần giúp đở   gà cần giúp đở EmptySun 10 Oct 2010, 16:28

Cho mình hỏi lun là 76 bài phải làm 76 project
hay 1 pro với 76 cái module
Mình làm 1 pro với 1 module có đươc ko
Mong giải đáp giúp
Thanks

※ Bài viết cùng chuyên mục


Tác giảThông điệp
tro.ng_mk
Member

tro.ng_mk
Member
Giới tính : Nam
Tuổi : 29
Posts Posts : 224
Coins Coins : 384
Thanked Thanked : 45
gà cần giúp đở Empty

Làm 1 project 1 module thôi....trong module gồm 76 hàm con....trên hàm main gọi từng bài
Có mẫu trong moodle mà

※ Bài viết cùng chuyên mục


http://bongdaso.com
Tác giảThông điệp
gavietnam
Member

gavietnam
Member
Giới tính : Nữ
Tuổi : 30
Posts Posts : 23
Coins Coins : 38
Thanked Thanked : 0
gà cần giúp đở Empty

Public Class bai1

Private Sub txtbai1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtbai1.TextChanged
Dim n As Double
n = txtbai1.Text
Dim i As Double
Dim s As Double = 0
For i = 1 To n Step 1
s = s + i
Next
txtketqua.Text = s.ToString()
End Sub

Private Sub btkq_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btkq.Click
Dim frm As New bai1
frm.MdiParent = Me
frm.ShowDialog()
End Sub

Private Sub txtketqua_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtketqua.TextChanged

End Sub
End Class


Trong đoạn code trên thì mình chưa nhấn vào nút kết quả thì kết quả đả tự hiện ra. Mình muốn khi người dùng nhấn vào kết quả thì kết quả mới hiện ra nhưng mình không biết sửa như thế nào cả mong các bạn chỉ giúp mình. Thank.

※ Bài viết cùng chuyên mục


Tác giảThông điệp
phungquanghop.com
Member

phungquanghop.com
Member
Giới tính : Nam
Tuổi : 30
Posts Posts : 28
Coins Coins : 64
Thanked Thanked : 22
gà cần giúp đở Empty

Public Class bai1

Private Sub txtbai1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtbai1.TextChanged

End Sub

Private Sub btkq_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btkq.Click
Dim n As Double
n = txtbai1.Text
Dim i As Double
Dim s As Double = 0
For i = 1 To n Step 1
s = s + i
Next
txtketqua.Text = s.ToString()
End Sub

Private Sub txtketqua_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtketqua.TextChanged

End Sub
End Class

※ Bài viết cùng chuyên mục


Tác giảThông điệp
phungquanghop.com
Member

phungquanghop.com
Member
Giới tính : Nam
Tuổi : 30
Posts Posts : 28
Coins Coins : 64
Thanked Thanked : 22
gà cần giúp đở Empty

bạn phải viết code trong buttom kết quả thì mới được

※ Bài viết cùng chuyên mục


Tác giảThông điệp
gavietnam
Member

gavietnam
Member
Giới tính : Nữ
Tuổi : 30
Posts Posts : 23
Coins Coins : 38
Thanked Thanked : 0
gà cần giúp đở Empty

vậy trong button kết quả mình cũng phải khai báo lại các thông số như s... ah? sao mình thử rồi không được vậy bạn có thể làm mẩu bài này giúp mình được không?

※ Bài viết cùng chuyên mục


Tác giảThông điệp
changtraisitinh
Member

changtraisitinh
Member
Giới tính : Nam
Tuổi : 30
Posts Posts : 405
Coins Coins : 914
Thanked Thanked : 113
gà cần giúp đở Empty

[You must be registered and logged in to see this link.] đã viết:
vậy trong button kết quả mình cũng phải khai báo lại các thông số như s... ah? sao mình thử rồi không được vậy bạn có thể làm mẩu bài này giúp mình được không?


không cần phải viết tất cả code trong sự kiện button_click đâu? cứ viết theo dạng hàm bình thường và truyền vào đúng giá trị của nó là dc.(copy 76 hàm console)


Code:
Public Class frmBai_01
    Public Function Bai_01(ByVal n As Integer) As Integer
        Dim i As Integer = 1
        Dim S As Double = 0

        While i <= n
            S += i
            i += 1
        End While
        Return S
    End Function

    Private Sub btnNhap_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnNhap.Click
        If IsNumeric(Me.txtN.Text) Then
            Dim s As Integer = Bai_01(Me.txtN.Text)
            Me.txtKetqua.Text = s
        Else
            MsgBox("Nhập n không hợp lệ.")
            Me.txtN.Focus()
        End If
    End Sub
End Class


gà cần giúp đở Vtc14653vtc13203nohacks

※ Bài viết cùng chuyên mục


https://windows.forumvi.com
Tác giảThông điệp
Sponsored content


gà cần giúp đở Empty

※ Bài viết cùng chuyên mục


 
gà cần giúp đở
Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 
Trang 1 trong tổng số 1 trang

Permissions in this forum:Bạn không có quyền trả lời bài viết
Windows Việt :: Lưu Trữ :: Lưu Trữ - Các môn học cũ :: Lập Trình Ứng Dụng Quản Lý 1-
[Windows Việt] Deverloped by Nguyễn Gia Phú - https://windows.forumvi.com
Powered by © Forumotion.com - phpBB™ version ©phpBB2
Go to top Go to bottom