コンボボックス 各種プロパティ

##########   アクティブな項目の文字列を取得  ##########

    Dim strProj As String
    
    strProj = frmMain.ComboProj.Text  
	

##########   文字列からアクティブな項目を設定  ##########

    Dim i As Integer
  
    For i = 0 To frmMain.ComboProj.ListCount - 1

        If frmMain.ComboProj.List(i) = WIN32API_Get_INI_strValue("ComboProj", "未選択") Then
        
            'コンボボックスのアクティブな項目を設定
            frmMain.ComboProj.ListIndex = i
            
        End If
    
    Next i
	

---

<戻る>

楽天モバイル[UNLIMITが今なら1円] ECナビでポインと Yahoo 楽天 LINEがデータ消費ゼロで月額500円〜！

無料ホームページ 無料のクレジットカード 海外格安航空券 解約手数料０円【あしたでんき】 海外旅行保険が無料！ 海外ホテル