トップページ⇒tech
27コメント6KB

VB標準のコンボボックス

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさんNGNG
使いにくいよなぁ．みんなどうしてる？
Accessのがそのまま使えると良いんだが．
自作コントロール作るのがベストっすか？
0002デフォルトの名無しさんNGNG
回りのDelphi使いに作って貰え！
0003デフォルトの名無しさんNGNG
>>1
どう使いにくいんだよ？
00041NGNG
選択だけにしたいのにテキスト入力できるところとか、ウザすぎるよ
0005デフォルトの名無しさんNGNG
>>4
ヴォケ。
せめてプロパティの使い方ぐらい一通り調べてからスレ立てろや。
0006デフォルトの名無しさんNGNG
>>4
イタタタ！
0007デフォルトの名無しさんNGNG
>>4
Σ(--;)
本気で言ってるんなら氏ね
ネタで言ってるんなら氏ね
00087NGNG
あ、ageちまった…ｽﾝﾏｾﾝ
0009デフォルトの名無しさんNGNG
>>4
そうだよな、ひどいよな。
VBのテキストボックスは一行しか表示できないしね。
ピクチャーボックスは境界線が表示されるし、
ラベルのフォントは変えられないし、
フォームの大きさは変更できないし。
VBって機能少なすぎですね！

って、おまえ、批判する前に批判できるだけVBを知れ！
0010デフォルトの名無しさんNGNG
VB って有価、標準のコンボって表示できる行数が少なくないか？
0011デフォルトの名無しさんNGNG
使うなよ
0012デフォルトの名無しさんNGNG
＞10
省スペースが標準コンボの売りなのに(笑)。
0013デフォルトの名無しさんNGNG
>>12
そんな売りがあったんかぁ。Enabled False にしたら
文字が薄くなるのも売りなんか？
0014デフォルトの名無しさんNGNG
＞13
そうだ。コントロールが使用不可の時は字が薄くなって、
ユーザに知らせる。これがWindowsの仕様だ。
0015デフォルトの名無しさん NGNG
>>1
お前の脳がノミ以下なだけと思われ
http://www.planet-source-code.com/xq/ASP/txtCodeId.26216/lngWId.1/qx/vb/scripts/ShowCode.htm
0016デフォルトの名無しさんNGNG
>>14
プログラマーがユーザから｢表示される行数が少ない｣
｢字が薄くて見えん｣と言われるのも仕様なんかぁ・・・
0017デフォルトの名無しさんNGNG
色はコントロールパネルで変えられるだろ。
0018デフォルトの名無しさんNGNG
>>16
表示できる行数も、ＡＰＩ使えば簡単に変えられるだろーが
0019デフォルトの名無しさんNGNG
>>18
そ、そうなんですか・・・
どうやったら出来るのですか？ APIの名前だけでも教えて
下さいませ。m(__)m
0020デフォルトの名無しさんNGNG
まずはWindows使ってからプログラミングしろよ
0021デフォルトの名無しさんNGNG
その程度でWinAPI呼ばなきゃならんてダッセー>>18
ActiveXって駄目だね。
0022デフォルトの名無しさんNGNG
Σ(--;) ActiveX ?!
0023デフォルトの名無しさんNGNG
ネタが氾濫しているな・・
002419NGNG
>>20
そ、そんなぁ冷たいこと言わずにぃ〜。
0025デフォルトの名無しさんNGNG
>>19
MoveWindowでOK
002625NGNG
MoveWindow以外でもコントロールのウィンドウサイズを変更できるAPIならできるでしょう。
002719NGNG
>>25
有難う御座います。出来ましたー（滝涙

Private Declare Function MoveWindow Lib "user32" ( _
　　ByVal hWnd As Long, _
　　ByVal X As Long, _
　　ByVal Y As Long, _
　　ByVal nWidth As Long, _
　　ByVal nHeight As Long, _
　　ByVal bRepaint As Long) As Long

Private Sub Form_Load()
　
　　Dim oldscalemode As Integer
　　Dim i As Integer
　
　　Combo1.Clear
　　For i = 1 To 200
　　　　Combo1.AddItem "hoge " & i
　　Next i
　
　　oldscalemode = Combo1.Parent.ScaleMode
　　Combo1.Parent.ScaleMode = vbPixels
　　MoveWindow Combo1.hWnd, Combo1.Left, Combo1.Top, Combo1.Width, 500, True
　　Combo1.Parent.ScaleMode = oldscalemode

End Sub

コンボのサイズは変えられないと思ってました。逝ってきます・・・
■ このスレッドは過去ログ倉庫に格納されています