س !!!!
من یه دیتابیس ساختم، اما تعداد Column ها فقط 2 تا است. من می خوام 5 تا باشه. باید چه کاری رو انجام بدم ؟
دوستان راهنمایی کنید ممنون خواهیم شد !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
یه خورده صریح تر شرح میدین ؟ با چی DB میسازین ؟؟ و در ارتباط با VB چه مشکلی هست ...
ببخشید از ...
من یه دیتابیس با Adodc ساختم و از DataGrid برای نمایش اطلاعات اون استفاده کردم. اما در دیتاگرید تعداد Column ها فقط 2 تا است که من می خواهم 5 تا باشه . مشکل من فقط کم بودن Column ها است که می خواهم بیشتر باشه .
اطلاعاتش رو دادم، کسی نیست کمک کنه؟
(07-04-2012، 09:32 PM)Thewolf نوشته: [ -> ]س !!!!
من یه دیتابیس ساختم، اما تعداد Column ها فقط 2 تا است. من می خوام 5 تا باشه. باید چه کاری رو انجام بدم ؟
دوستان راهنمایی کنید ممنون خواهیم شد !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
This example shows how to use ADO to add and drop columns from a database in Visual Basic 6. The program executes SQL ALTER TABLE statements to add or remove columns.
download:
[
attachment=252]
دوست عزیز از کمکتون ممنون!!!
اما ... !!!
اما منظور من این نبود !!!
من منظورم در دیتاگرید بود. << همون طور که خودتون می دونید اگه در نام Column از فاصله استفاده شود، برنامه خطا می دهد. >>
من تو یه سورس دیدم که تعداد Column ها در دیتاگرید 4 تا بود.
برای همین من می خواهم << وقتی وارد قسمت Custom دیتاگرید شوم و به قسمت Column ها بروم تعداد Column ها از 2 تا به 5 تا تغییر پیدا کند. >>
کد:
DataGrid1.Columns.Add (2)
خیلی ممنون !!!
اما این کد فقط Column به دیتاگرید اضافه کنه، من می خواهم که در آن Coumn خاصیت Caption و DataField را نیزتغییر بدهم.
اینم سه سمپل دیگه :
کد:
Private Sub Form_Load()
DataGrid1.ColumnHeaders = True
For i = 0 To 4
DataGrid1.Columns.Add (i)
Next
DataGrid1.Columns(0).Caption = "wolf"
DataGrid1.Columns(1).Caption = "wolf2"
DataGrid1.Columns(2).Caption = "wolf3"
DataGrid1.Columns(3).Caption = "wolf4"
DataGrid1.Columns(4).Caption = "wolf5"
End Sub
دوست عزیز از کمک هایی که کردید ممنون
در پایان کد به صورت زیر در آمد:
کد:
DataGrid1.Columns(2).Caption = "The Wolf"
DataGrid1.Columns(2).DataField = "Thewolf"